Pb de déclaration d'une base de données sous VB sous access 2000

simon pierre - 21 sept. 2001 à 10:47
vincefield Messages postés 4 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 25 février 2003 - 25 févr. 2003 à 17:10
Dim DB As Database

Ce genre de déclaration marchait sans pb sous basic sur access2, mais ce n'est plus le cas...

C quoi le pb ?

De plus j'ai du mal à intégrer ma requête au code d'access.

Voilà comment je procède : dites moi si je me goure quelque part

Dim db as Database (déjà là, il reconnait pas Database :(
Dim rs as Recordset
Dim requete as string

Set db = currentdb
requete = "..."
Set rs = db.openrecordset(requete)

'allocation d'une valeur du formulaire en cours
Me.resultat = rs.table1.champ1

close db

Merci de votre aide les prog :)

2 réponses

simon pierre
25 sept. 2001 à 17:47
C bon :) j'ai trouvé la solution à mon pb :)

si certains ne savent pas d'ou ça vient, il faut juste décocher dans VB/Options/références, décocher DAO 2.1 et mettre DAO 3.6 à la place. C un bug normal de VB qui est corrigé sur un forum de microsoft.
Youpi... et merci crosoft, pour ces quelques heures de joie à tourner le pb dans ts le ssens sans comprendre d'ou ça vient...
0
vincefield Messages postés 4 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 25 février 2003
25 févr. 2003 à 17:10
salut

j,ai un probleme ds ma déclaration peux tu m'aider

Dim db As Database
Dim rs As Recordset

Set db = CurrentDb

---> Set rs = db.OpenRecordset("PIXA_STD_QUERY")
RUN TIME ERROR 13 TYPE MISMATCH je ne comprend pas trops... suis en vba ds access 2000

Merci
0
Rejoignez-nous