Discussion :

[-ULK-]

Bonjour,

Je viens de scinder ma base et mon interface utilisateur, en utilisant l'assistant "Fractionner une base de données".
Désormais j'obtiens une erreur 3219 avec les quelques lignes suivantes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
    Dim oDb As DAO.Database
    Dim oRst As DAO.Recordset
 
    Set oDb = CurrentDb
    Set oRst = oDb.OpenRecordset("maTable", dbOpenTable)

Le mode debug indique que l'erreur est sur l'instruction OpenRecordset.

Ce code fonctionnait parfaitement avant que je scinde le fichier...
CurrentDb est-il à proscrire lorsque l'application est scindée ?

Merci pour votre aide.

[fgiambelluco]

Bonjour
C'est le dbOpenTable qui pose problème Essaye avec le dbOpenDynaset

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    Dim oDb As DAO.Database
    Dim oRst As DAO.Recordset
 
    Set oDb = CurrentDb
    Set oRst = oDb.OpenRecordset("maTable", dbOpenDynaset)

--------------
Frédéric
http://www.access-developpement.com

[Domi2]

Bonjour,

C'est le type qui n'est pas utilisable avec des tables liées (voir l'aide).

Essaie avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set oRst = oDb.OpenRecordset("maTable", dbOpenDynaset)

Domi2

[-ULK-]

C'était bien ça, merci à vous deux