fractionnement de base et code vba qui ne fonctionne plus

Question

Bonjour, 

Je viens de fractionner ma base access.
Mon code fonctionnait parfaitement avant, mais depuis, à la fermeture de mon formulaire "interlocuteurs" l'execution d'un code modifiant la table "interlocuteurs" (table source du formulaire) il y a maintenant un message d'erreur d'execution 3048 ("impossible d'ouvrir plus de bases de données")

Extrait du code :

Dim DistantDB As DAO.Database
Dim SQLcode2 as String
SQLcode2 = "DELETE [RETOUR FORMULAIRE PRECEDENT].* FROM [RETOUR FORMULAIRE PRECEDENT];"

DistantDB.Execute SQLcode2

DistantDB.Close
Set DistantDB = Nothing

Mon code bloque sur :

DistantDB.Execute SQLcode2

Merci 

Configuration: Windows 7 / Internet Explorer 9.0

blux · Answer

Salut,

que contient DistantDB ?
Car je ne la vois pas prendre une quelconque valeur dans ton code...

beodeo · Answer

bonsoir,

oups j'avais oublié une ligne

Dim DistantDB As DAO.Database
Dim SQLcode2 as String
SQLcode2 = "DELETE [RETOUR FORMULAIRE PRECEDENT].* FROM [RETOUR FORMULAIRE PRECEDENT];"

Set DistantDB = CurrentDb

DistantDB.Execute SQLcode2

DistantDB.Close
Set DistantDB = Nothing

beodeo · Answer

petites précisions :
1/ : j'ai rapatrié ma table en local et la plus aucun problème...
mais avec la liaison c'est toujours le même message d'erreur.
2/ dans mon formulaire j'ai des sous formulaires qui via des requêtes utilisent cette fameuse table en source.

si ça peut t'éclairer davantage...

Fractionnement de base et code vba qui ne fonctionne plus

3 réponses

Discussions similaires

Newsletters