Erreur 3021

Erreur 3021 - VB/VBA/VBS - Programmation

Marsh Posté le 02-05-2007 à 19:56:52    

Salut ! j'ai programmé une interface login et password
 
Tout baigne pour le SQL et les valeurs, la petite erreur disons est dans les conditionnels
 
        If rst("num" ) = "" Then
    MsgBox ("Accès Refusé" )
    End If
     
    If rst("num" ) <> "" Then
    MsgBox ("Accés Autorisé" )
    End If
 
Si le mot de passe et le login sont ok , il n'y a pas de problèmes tout marchent !
 
Mais si ces données saisies sont volontairement erronées , j'ai le droit à une erreur 3021, comment éviter cela pour pouvoir afficher un message de type Msgbox à la place ?( plus propre quand même...)

Reply

Marsh Posté le 02-05-2007 à 19:56:52   

Reply

Marsh Posté le 02-05-2007 à 20:45:44    

Bonsoir à tous
 
Je n'ai pas essayé, mais avec ce code cela doit aller :
 
    If rst("num" ) <> "" Then
    MsgBox ("Accés Autorisé" )
else
MsgBox ("Accès Refusé" )  
    End If  
 
Eric

Reply

Marsh Posté le 02-05-2007 à 21:28:13    

J'ai trouvé , il fallait utiliser un "On Error Goto"

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed