J'ai un p'tit Pb qui doit pas etre dur a resoudre!!
jcconi
Messages postés72Date d'inscriptionmardi 1 juillet 2003StatutMembreDernière intervention 8 mars 2004
-
28 juil. 2003 à 10:01
jcconi
Messages postés72Date d'inscriptionmardi 1 juillet 2003StatutMembreDernière intervention 8 mars 2004
-
28 juil. 2003 à 10:15
Voici le code suivant:
Dim connect As ADODB.connection
Dim rs As ADODB.Recordset
Dim CodeClient As Integer
Set connect = New ADODB.connection
connect.Open CurrentProject.connection
Set rs = New ADODB.Recordset
CodeClient = Me.dlgCodeClient.Value
rs.Open "select * from TLD_CLIENT where code_tiers =CodeClient", connect, adOpenStatic, adLockOptimistic
Mon proble il est a la derniere ligne! Comment mettre dans le where code_tiers une variable?? car il ne prend pa en compte ma variable CodeClient!!
Merci de votre aide...
A voir également:
J'ai un p'tit Pb qui doit pas etre dur a resoudre!!
jcconi
Messages postés72Date d'inscriptionmardi 1 juillet 2003StatutMembreDernière intervention 8 mars 2004 28 juil. 2003 à 10:02
-------------------------------
Réponse au message :
-------------------------------
>
> Voici le code suivant:
>
> Dim connect As ADODB.connection
> Dim rs As ADODB.Recordset
> Dim CodeClient As Integer
> Set connect = New ADODB.connection
> connect.Open CurrentProject.connection
> Set rs = New ADODB.Recordset
> CodeClient = Me.dlgCodeClient.Value
> rs.Open "select * from TLD_CLIENT where code_tiers =CodeClient", connect, adOpenStatic, adLockOptimistic
>
>
>
> Mon proble il est a la derniere ligne! Comment mettre dans le where code_tiers une variable?? car il ne prend pa en compte ma variable CodeClient!!
>
> Merci de votre aide...
>