(::) de bug...a resoudre pour les experts......
galldup
Messages postés
90
Date d'inscription
vendredi 18 octobre 2002
Statut
Membre
Dernière intervention
27 décembre 2004
-
27 janv. 2003 à 07:56
cs_DeathAngel Messages postés 117 Date d'inscription vendredi 12 avril 2002 Statut Membre Dernière intervention 13 avril 2007 - 27 janv. 2003 à 09:53
cs_DeathAngel Messages postés 117 Date d'inscription vendredi 12 avril 2002 Statut Membre Dernière intervention 13 avril 2007 - 27 janv. 2003 à 09:53
1 réponse
cs_DeathAngel
Messages postés
117
Date d'inscription
vendredi 12 avril 2002
Statut
Membre
Dernière intervention
13 avril 2007
27 janv. 2003 à 09:53
27 janv. 2003 à 09:53
Hello galldup !
dim rst as QueryDef
set rst=dbs.QueryDefs("Nom du Requete")
rst.Parameters (0).Value="Ta_valeur"
Je pense que cela devrait marcher.
Sinon, il reste l'exécution de code SQL , en enlevant de ta requête ton paramètre :
dim strSQL as string
dim rst as recordset
strSQL="SELECT * FROM 'Nom Du Requete' WHERE 'Nom Du Champ'=" & Ta_Valeur
set rst=dbs.OpenRecordset(strSQL)
Voilou
@peluche
DA
dim rst as QueryDef
set rst=dbs.QueryDefs("Nom du Requete")
rst.Parameters (0).Value="Ta_valeur"
Je pense que cela devrait marcher.
Sinon, il reste l'exécution de code SQL , en enlevant de ta requête ton paramètre :
dim strSQL as string
dim rst as recordset
strSQL="SELECT * FROM 'Nom Du Requete' WHERE 'Nom Du Champ'=" & Ta_Valeur
set rst=dbs.OpenRecordset(strSQL)
Voilou
@peluche
DA