ASP

C koi ce bug à la con ?

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : C koi ce bug à la con ?

MagicBuzz

Code :

do while not rsAffluent.EOF
affluent = rsAffluent("HTTP_REFERER" )
response.Write "<tr><td>" & affluent & "</td><td>" & rsAffluent("NB" ) & "</td><td>"
dur = 0
nb = 0
nbT = 0
rsAffluent2.MoveFirst()
do while not rsAffluent2.EOF and not rsAffluent2("HTTP_REFERER" ) = affluent
rsAffluent2.MoveNext()
loop
if not rsAffluent2.EOF then
' CA MERDE A LA SECONDE EGALITE DE LA LIGNE SUIVANTE :
do while not rsAffluent2.EOF and rsAffluent2("HTTP_REFERER" ) = affluent
dur = dur + rsAffluent2("DUR" )
nbT = nbT + 1
if rsAffluent2("DUR" ) = 0 then
nb = nb + 1
end if
rsAffluent2.MoveNext()
loop
response.Write cint((nb / nbT) * 1000) / 10 & " %</td><td>" & buildTime(dur / nbT) & "</td></tr>"
else
response.Write "N/A</td><td>N/A</td></tr>"
end if
rsAffluent.MoveNext
loop

J'ai une superbe erreur très explicite :

[quote]error '80020009'
Exception occurred.

/statistics/contents/affluent.asp, line 66[quote]

Ca marche tout le temps, sauf dans certains cas :??:

Voici ce que j'ai dans le cas où ça plante :

rsAffluent contient :
HTTP_REFERER NB
http://forum.hardware.fr/forum2.php3 5
http://www.manga-torii.com/statistics/default.asp 1
http://www.zozoll-online.com/forum/topic.htm 1

rsAffluent2 contient :
HTTP_REFERER DUR
http://www.zozoll-online.com/forum/topic.htm 78
http://www.manga-torii.com/statistics/default.asp 3073
http://forum.hardware.fr/forum2.php3 230
http://forum.hardware.fr/forum2.php3 146
http://forum.hardware.fr/forum2.php3 27
http://forum.hardware.fr/forum2.php3 23
http://forum.hardware.fr/forum2.php3 25

:??:

Publicité

MagicBuzz

Pour résumer, l'algo en pseudo-code :

Code :

Tant que pas la fin de rsAffluent
j'écrit rsAffluent("HTTP_REFERER" ) et rsAffluent("NB" )
j'initialise le nombre de visites nulles à 0
j'initialise le nombre de visites totales à 0
j'initialise la durée des visites à 0
je retourne au début de rsAffluent2
tant que je suis pas à la fin de rsAffluent2 ou que rsAffluent2("HTTP_REFERER" ) = rsAffluent("HTTP_REFERER" )
j'avance dans rsAffluent2
fin tant que
si je ne suis pas à la fin de rsAffluent2
' CA MERDE A LA SECONDE EGALITE DE LA LIGNE SUIVANTE :
tant que je ne suis pas à la fin de rsAffluent2 ou que rsAffluent2("HTTP_REFERER" ) n'est plus égal à rsAffluent("HTTP_REFERER" )
j'avoute la durée de la visite en cours au total des visites
j'incrémente le nombre de visites totales
si la visite à une durée de 0 secondes alors j'incrémente le nombre de visites à une page
j'avance dans rsAffluent2
fin tant que
j'affiche le ration des visites à une page et la durée
j'avance dans rsAffluent
fin tant que

Message édité par MagicBuzz le 21-08-2002 à 01:26:21

MagicBuzz

tiens, je viens de trouver comment faire une grosse optimisation...

(rsAffluent est totalement inutile en fait )

donc pas besoin de continuer à ce prendre la tête

MagicBuzz

Alors ça, c'est la meilleure !

Code :

do while not rsAffluent.EOF
affluent = rsAffluent("HTTP_REFERER" )
dur = 0
nb = 0
nbT = 0
do while not affluent.EOF and rsAffluent("HTTP_REFERER" ) = affluent ' Ligne 46
nbT = nbT + 1
dur = dur + rsAffluent("DUR" )
if rsAffluent("DUR" ) = 0 then
nb = nb + 1
end if
affluent.movenext
loop
response.Write "<tr><td>" & affluent & "</td><td>" & nbT & "</td><td>" & cint((nb / nbT) * 1000) / 10 & " %</td><td>"
if nbT <> nb then
response.Write buildTime(dur / (nbT - nb))
else
response.Write "N/A"
end if
response.Write "</td></tr>"
loop
rsAffluent.Close()
set rsAffluent = nothing