Discussion :

[tiesto95]

Bonjour , je m'adresse ici parceque j'ai pas trouvé sur google ce que je cherché. jecherche avec vb6 à ouvrir mon programme avec un systeme login et password qui vérifie une base mysql.

login+password = form1
programme = form 2

Je tape mon login et password valide , verification de l'existance de donnée dans la base mysql si ok je passe a la form2.

Votre aide est la bienvenue en vous remerciant

[sovo]

Bonsoir et bienvenu dans le forum.

ta question a deja ete traité plusieur fois dans le forum. fait une recherche :

- pour la connexion avec le mot clé : connexion ou login
- pour mysql avec le mot clé : mysql

[tiesto95]

En faite j'ai trouver une source , mais il refuse la connection.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Option Explicit
Private Sub Cancel_Click()
End
End Sub
 
Private Sub login_Click()
Dim rsado As ADODB.Recordset
Dim Conn As ADODB.Connection
Dim strSQL As String
Set Conn = New ADODB.Connection
  Conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=monserveurext;DATABASE=nomdelabase;UID=login;pwd=password"
  Conn.Open
Set rsado = New ADODB.Recordset
strSQL = ("SELECT login,password FROM admins WHERE login = '" & LoginText.Text & "' AND password = '" & PassText.Text & "'")
Set rsado = New ADODB.Recordset
rsado.CursorLocation = adUseClient
rsado.Open strSQL, Conn, adOpenStatic, adLockReadOnly
If rsado.RecordCount <> 1 Then
MsgBox "mauvais login ou mot de passe !!"
Else
Unload Form1
Form2.Show
End If
End Sub

Il me dit unknown mysql server host , alors que mes donnée son bon
?????????

[ProgElecT]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If rsado.RecordCount <> 1 Then

a l'ouverture RecordCount = 0, fait un rsado.MoveFirst avant ta condition If pour remplir le Recordset

Motif: Complement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=monserveurext;DATABASE=nomdelabase;UID=login;pwd=password"

SERVER=monserveurext, ton serveur s'appel "monserveurext" ?
DATABASE=nomdelabase, ta base s'appel "nomdelabase" ?
UID=login, ton login est bien "login" ?
pwd=password, le mot de passe pour le loging est bien "password" ?
Je pense que tu n'as pas remplacé les données à verifier par les tiennes

[tiesto95]

Sa change rien il me di toujours unknown Mysql server "nom de mon serveur"

[ThierryAIM]

Lorsque RecordCount n'est pas ou pas encore défini, il vaut -1, pas 0


Le pb vient probablement de la chaine de connexion

A vérifier ici : http://www.connectionstrings.com/?carrier=mysql

je m'étonne de la syntaxe !

login et password sont des variables, non ?

[tiesto95]

lol franchement je comprend que dalle sa fonctionne pas , je m'explique je voudrais simplement une explication claire svp.

Je souhaite mettre une form1 avec login et mot de passe , quand un membre se connecte sa vérifie les logins dans une base de donée de mon hebergeur extérieur je précise , si c'est valide passage à la form 2 ds le cas contraire message d'erreur. J'ai surfer toute l'aprés midi pour avoir ces infos même été peché des sources qui fonctionne pas .
Je craque