Originariamente inviato da Shagrat
posta il codice del ciclo -_-
Sto provando così:
codice:
Dim vero
vero = "0"
...........
Rs.MoveFirst
DO WHILE NOT Rs.EOF
IF Rs("accessi") < RsA("accessi") then
vero = vero + '1'
response.write "Hai ancora accessi"
ELSE
false = vero
response.write "Non hai più accessi"
END IF
IF Rs("credito") < RsA("credito") then
response.write "Hai credito sufficiente"
vero = vero + '1'
ELSE
false = vero
response.write "Non hai credito sufficiente"
END IF
IF Rs("conto") < RsA("conto") then
response.write "Il tuo conto è attivo"
vero = vero + '1'
ELSE
false = vero
response.write "Il tuo conto è disattivato"
END IF
if vero > false then
response.write "Confronto KO"
else
response.write "Confronto OK"
end if
dove sbaglio?