Erreur lorsque que j'utilise 2 boucles If Then Else
cs_Cyber
Messages postés12Date d'inscriptionjeudi 16 mai 2002StatutMembreDernière intervention15 mars 2004
-
5 mars 2004 à 09:56
cs_Bud
Messages postés224Date d'inscriptionvendredi 14 septembre 2001StatutMembreDernière intervention14 juillet 2006
-
5 mars 2004 à 10:34
Voici une partie de mon code.
<% Dim objConn, objRec
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRec = Server.CreateObject("ADODB.Recordset")
objConn.Open "DSN=Member"
objRec.Open "Membres",objConn
While Not objRec.EOF
Dim intTrouve
intTrouve= 0
If objRec("Nom_acces") = Request.Form("txtUtil")then
intTrouve = intTrouve + 1
End if
If objRec("Mot_de_passe") Request.Form("txtPass")then
intTrouve = intTrouve + 2
End if
objRec.movenext
Wend
objRec.Close
objConn.Close
%>
Bon voila le pb, j'obtiens cette erreur.
Microsoft VBScript compilation (0x800A03F9)
Expected 'Then'
Peut importe ce que j essaye, je suis incappable de mettre 2 boucles if dans le meme code sinon je recois cette erreur.
Si j'en est qu'une tout marche.
J'utilise IIS 5.0 pour tester.