OVH Cloud OVH Cloud

Requête sous VB6

1 réponse
Avatar
Nicolas
Bonjour,

Ma question est la suivante : comment lancer une requ=EAte=20
d=E9j=E0 enregistr=E9e dans Access 2000 =E0 partir d'une appli=20
vb6 ?

J'ai bien tent=E9 un truc du genre : Set Rs =3D=20
Db.OpenRecordset("Requ=EAte1") mais =E7a ne fonctionne pas

Quelqu'un a t il une solution ?

Merci d'avance

Nico

1 réponse

Avatar
Christophe
Bonjour en DAO:
Dim bd As Database
Dim rq As QueryDef
Dim rst As Recordset

Set bd = OpenDatabase(Emplacementbase)
Set rq = bd.QueryDefs("Rqtoto")
rq.Parameters("idparam") = ptrparam&
rq.Parameters("nomfichier") = ""
Set rst = rq.OpenRecordset


Où Rqtoto est le nom de la requete enregistrée.
N'oubliez pas de referencé le type de parametre sous access dans le menu
création de requete, click droit parametres.

Christophe Vergon


"Nicolas" a écrit dans le message de news:
090401c39884$a2e24a30$
Bonjour,

Ma question est la suivante : comment lancer une requête
déjà enregistrée dans Access 2000 à partir d'une appli
vb6 ?

J'ai bien tenté un truc du genre : Set Rs Db.OpenRecordset("Requête1") mais ça ne fonctionne pas

Quelqu'un a t il une solution ?

Merci d'avance

Nico