Function FillAdminAccount() As Boolean
FillAdminAccount = True
Try
SQLconn.ConnectionString = "connect timeout=9999999;" & _
"data source=" & DefaultIserver & ";" & _
"initial catalog=" & DefaultIdBase & "; " & _
"user id=userid;" & _
"password=userpass;" & _
"persist security info=True; " & _
"packet size=4096"
SQLconn.Open()
SQLcmd.CommandType = CommandType.Text
SQLcmd.CommandText = "Select distinct username, cast(convert(varchar,userpassword) as varchar) as 'userpassword' from " & tblUsersList & " where usertype='MainAdmin'"
SQLcmd.Connection = SQLconn
SQLreader = SQLcmd.ExecuteReader
While SQLreader.Read = True
CurrentAdminUser = SQLreader("username").ToString
CurrentAdminPass = SQLreader("userpassword").ToString 'PROBLEM'
End While
Catch ex As Exception
ErrorMessage(ex)
Finally
If SQLconn.State = ConnectionState.Open Then SQLconn.Close()
If SQLreader.IsClosed = False Then SQLreader.Close()
End Try
End Function 'FillAdminAccount
Veuillez voir la ligne avec le commentaire PROBLÈME. Sur ce code, la sortie est égale à "mot de passe utilisateur. Comme vous pouvez le voir, il n'y a pas de guillemet à droite et Je me demande pourquoi.En passant, le type de données du mot de passe utilisateur dans la base de données est Binaire. souhaitez, vous pouvez me aider à ce sujet. Merci you..x_xProblème de chaîne avec SQL Reader?
J'espère que ce n'est pas le vrai mot de passe pour une base de données à votre travail 0_0 – Dana
Quelle est l'erreur que vous obtenez? Est-ce que cela se produit au moment de la compilation ou de l'exécution? Que voulez-vous dire par "comme vous pouvez le voir, il n'y a pas de point d'interrogation sur la droite"? – Danimal
Danimal - >> désolé, j'ai déjà édité le texte.-sef – sef