cs_pluplu
Messages postés615Date d'inscriptionmercredi 18 décembre 2002StatutMembreDernière intervention 4 juillet 2012 15 oct. 2003 à 00:01
Pascal Laurençon
Dim Sql_Str as string
Dim String_out as string
Sql_Str = " select * from matable where matable.monchamp like '" toto "'"
With Adodc1
.ConnectionString = monstring de connexion
.RecordSource = Sql_Str
End With
Adodc1.Refresh
String_out = Adodc1.recordset.Fields![monchamp].Value
en supposant que tu utilise un control Adodc voici à peu près le code que tu pourrais utiliser