Discussion :

[frmouza]

Bonjour,

J'accède depuis Excel à une base de données Access.
Pour cela je crée un objection ADODB.connection puis j'ouvre la BDD avec la commande Open:

Code :

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

1
2
3
4
5
6
7
 
Set vcn = New ADODB.Connection
With vcn
 .Provider = "Microsoft.ACE.OLEDB.12.0"
 .ConnectionString = vAccessDDBFile
 .Open
End With

Lorsqu'à la fin de mon script j'utilise la commande vcn.close pour clore la connexion, il me 'détruit' la base de données associée, c'est à dire qu'il supprime le fichier base.accdb associé sous Windows. Or, j'ai besoin de fermer la dite connexion afin de pouvoir lancer la commande de compactage de la base.

Sauriez-vous comment fermer la connexion sans 'détruire' la base de données, svp ?

Merci d'avance

[Invité]

Bonjour,
je pensais que le problème venait à la clôture de la connexion et tu nous montre que l'ouverture.

enlève le compactage automatique de ta base et refais un test!

Code :

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

1
2
3
4
5
6
7
8
Set vcn = New ADODB.Connection
With vcn
 .Provider = "Microsoft.ACE.OLEDB.12.0"
 .ConnectionString = vAccessDDBFile
 .Open
 .Close
End With
Set vcn = Nothing

[frmouza]

Bonjour,

Pour la fermeture, j'utilise à la fin du script simple :

Code :

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

1
2
3
 
vcn.close
set vcn = nothing

Lorsque ce code est exécuté, mon fichier de base de données est supprimé du répertoire.
Par ailleurs, je n'ai pas encore intégré à mon code le compactage de la base.

Merci,

[Invité]

ça fait vingt ans que je travail journellement avec ado et c'est la première fois que j’entends parlé de ça!

un peu plus de code serait le bien venu!