cs_6Po
Messages postés105Date d'inscriptionjeudi 16 mai 2002StatutMembreDernière intervention22 janvier 2009 18 oct. 2002 à 16:44
bhen a vue de nez vu que j'ai pas vb sous les yeux :big)
Private Sub Combo1_Change()
set rstClient = new adodb.recordset
rstClient.Open "Select * from client where nom ='" + combo1 + "'", cnxEssai
if not rs.eof then
Text1.text = rstClient!ville
Test2.text = rstClient!code_postal
end if
rstClient.close
set rstClient = nothing
End sub
NOTE :
====
Tu devrais utilise un numéro de client plustot que de faire des tests sur les nom.
Remarque les ' ' entre Combo1 ceci veut dire qu'on passe des donnee de type Texte à la base de donnée... si tu crees un numéro numérique il faudra les enlever.