module sous access 2000Résolu

Question

bonjour

je veux cr&#233;er un module sur access 2000, mais des que je d&#233;clare ma base de donn&#233;e, access ne me propose pas database, il y a seulement dataAccessPage !

Sub remplissage()
Dim base As Database     'remarque access: type d&#233;finie par l'utilisateur, non d&#233;finie
Dim rs, rg As Recordset



Set dbs = CurrentDb
Set rs = base.OpenRecordset("decembre2004")


rs.MoveFirst
While Not rs.EOF
    Set rg = base.OpenRecordset("SELECT Right([D&#233;tail poste appelant],4) AS d FROM decembre04")
        rg.MoveFirst
        rs!numposte = rg!d
        rg.MoveNext
        rs.MoveNext
Wend
rg.Close
rs.Close


End Sub

Pierre_faucon · Accepted Answer

Bonjour.

Je pense qu'il faut cocher la r&#233;f&#233;rence "DAO 3.6" dans Outils/R&#233;f&#233;rences, et d&#233;clarer la base
dim Base as dao.database

Ok?

Pierre F.

Module sous access 2000

1 réponse

Discussions similaires