je ne trouve pas l'erreur

Question

salut tout le monde,
j'ai un probleme c'est que quand j'execute mon programme il me donne tjrs la mm erreur c que le mot de passe est invalide pourtant c le mot de passe ke j ds ma base de donnee.

voila le code en qustion 
Dim
req 

As



String
= 

" select AGT_L_AGENT,dlg.DLG_C_DELEG,DLG_L_DELEG,prof_libelle from d_agent agt,p_delegation dlg,p_agent_deleg ad,d_agent_profile_tc ap,p_profile_tc p where agt.AGT_C_AGENT=ad.AGD_C_AGENT and dlg.DLG_C_DELEG=ad.AGD_C_DELEG and agt.AGT_C_AGENT = ap.AGT_AGT_C_AGENT and ap.Prof_Prof_Code = p.prof_code and agt.AGT_L_AGENT='"
& 

Me
.Agent.Text & 

"' and agt.AGT_C_AGENT='"
& 

Me
.Code_Agent.Text & 

"'"







Dim trouve AsBoolean = False





Dim cmd AsNew SqlCommand(req, con) 





Try



con.Open()










Dim dr As SqlDataReader = cmd.ExecuteReader 





Dim gest AsNew Gestion 





Dim f1 AsNew Form1 





Do
While dr.Read 


L_agt = dr.GetValue(0)




agence = dr.GetValue(1) + 




"::" + dr.GetValue(2) 


profile = dr.GetValue(3)




gest.Show()










Me .Hide() 


trouve = 




True



code_agt = 




Me .Code_Agent.Text 





Loop



dr.Close()




con.Close()










If trouve = FalseThen


c += 1




MsgBox(




"Ce compte est invalide, il vous reste " & 3 - c & " tentatives" , MsgBoxStyle.Information, "ATTENTION" ) 





End
If






If c >= 3 Then





Me .Close() 





End


If

merci d'avance

LIBRE_MAX · Answer

Bonsoir, 
peut être que c' est juste parce qu' il n' y a  rien à lire !.
Par conséquent la boucle n' est pas entamée.
Fais un retour sur le nombre d' enregistrements pour vérifier.

<hr />... Y'en a même qui disent qu'ils l'ont vu voler.

PCPT · Answer

salut,

mets tous tes champs et noms de table contenant des espaces entre crochets, et essaye de garder une syntaxe correcte (virgule espace)
par exemple :
,p_delegation dlg,
devient
, [p_delegation dlg],

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

PCPT · Answer

oui en plus ^^, où est la chaîne de connexion?

nada2008 · Answer

la chaine de connexion est en form laod

PCPT · Answer

bien vu, on me l'avait jamais fait.... oùquelle est la chaîne de connexion?

nada2008 · Answer

dsl pour le retard j'ai un probleme de connexion
voila la chaine de coneexion 
Public

 con 
As
New SqlConnection(
"workstation id=NOTEBOOK-4093A0;packet size=4096;integrated security=SSPI;initial catalog=exemple;persist security info=False")

SVP aidez moi j'ai vraiment besoin de votre aide

merci

PCPT · Answer

pas de mot de passe dans cette chaine de connexion, c'est donc rassurant sur les messages d'erreurs de VS

nada2008 · Answer

ya pas des msg d'erreur et le nom d'utilisateur(AGT_L_AGENT) et le mot de passe(AGT_C_AGENT) sont deja enregistré dans la base de donnee
je comprend pas pourquoi il me donne le msg "ce compte est invalide"
merci bcp PCPT

LIBRE_MAX · Answer

tentes d' abord une sélection sans clause where
et regardes si la requete te renvoie qq chose.

" select AGT_L_AGENT,dlg.DLG_C_DELEG,DLG_L_DELEG,prof_libelle from d_agent agt,p_delegation dlg,p_agent_deleg ad,d_agent_profile_tc ap,p_profile_tc p;"

tout court.

<hr />... Y'en a même qui disent qu'ils l'ont vu voler.

Je ne trouve pas l'erreur

9 réponses

Votre réponse

Discussions similaires