Discussion :

[muzele]

Bonsoir tout le monde !
Je sais très bien que c'est le forum dedié au VB6. Ma requête me pose un petit problème sous VB
Voila :

Code :

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

Mon_Recordset.Open "SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = 3, Cnx, adOpenDynamic, adLockOptimistic"

Mon code sert à modifier un enregistrement existant dans une table, Num_Auto: c'est ma clé primaire et est auto incrémentée.
Lorsque je met manuellement le Num_Auto comme ci dessus, aucun problème, tout fonctionne.
Mais lorsque je récupere le numéro à partir d'un label alors là je me plante (suis pas très fort en requête)
J'ai essayée ceci :

Code :

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

Mon_Recordset.Open "SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = '"Mon_label"', Cnx, adOpenDynamic, adLockOptimistic"

Code :

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

Mon_Recordset.Open "SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = Trim$(Mon_Label), Cnx, adOpenDynamic, adLockOptimistic"

et ainsi de suite ...
Mais toujours rien ! Ouf je crois que je me suis expliquer clairement !
Merci d'avance !

[OhMonBato]

Je ne fais pas de SQL mais vu ton code tu ne mets pas la valeur du label dans ta chaine de requete. Juste pour essai tu devrais mettre par exemple

Code :

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

1
2
 
debug.print "SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = '"Mon_label"', Cnx, adOpenDynamic, adLockOptimistic"

Tu verrais ainsi facilement que c'est erroné.
Sans certitude mais essaye plutot un truc du style :

Code :

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

1
2
 
"SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = " & Mon_label & ", Cnx, adOpenDynamic, adLockOptimistic"

[ProgElecT]

Ou peut être

Code :

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

     Mon_Recordset.Open "SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = '" &  Clng(Mon_label.caption) & "' ", Cnx, adOpenDynamic, adLockOptimistic"

[muzele]

Rien ne veut fonctionner !
je sais quand même que je suis sur la voie, parce que lorsque je met directement Num_Auto=0, 1, 2, 3 ... ou n'importe quelle valeur d'une entrée ca fonctionne !
Suis juste bloquer au niveau de la récupération de la valeur du Label7 .

[OhMonBato]

Question bête, c'est quoi le nom de ton label ? Mon_label ou Label7 ? Mets tu bien le nom du label dans l'une des solutions qu'on te propose ?

[ProgElecT]

Dans les deux sujestions, chose bizard, la requete se termine par ", la mienne aussi, donc un mauvais copier/coller.
essais

Code :

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

Mon_Recordset.Open "SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = " & CLng(Mon_label.Caption) & " ", Cnx, adOpenDynamic, adLockOptimistic

de toutes les façons la requete ne doit pas se terminer par "

[muzele]

Excusez moi mais je sais plus ou j'en suis j'ai plein de codes qui tournent dans tête (OhMonBateau: j'ai tout fait pour éviter les réprimandes, j'ai tirer leçons des autres post mais ....)
Quand même j'ai du réessayer une à une les reqûetes de ProgElect et celle-ci fonctionne à merveille :

Code :

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

Mon_Recordset.Open "SELECT champ1, champ2, champ3, champ4 FROM Ma_Table WHERE Num_Auto = " & CLng(Mon_label.Caption) & " ", Cnx, adOpenDynamic, adLockOptimistic

Merci beaucou !

[OhMonBato]

De rien, veille juste à mettre le vrai code qui marche la prochaine fois dans ton premier post