Discussion :

[Bibi72]

Bonjour,
Je rencontre un problème avec la commande 'FileCopy' pour copier une base access (en cours) (base partagée sur réseau).
En effet, avec des soucis de plantage dû à des problèmes réseaux, je souhaite faire des sauvegardes à chaque fois que l'on sort d'un formulaire.
Le but étant d'avoir des sauvegardes régulières...

J'ai réalisé ces lignes :

Code :

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

1
2
3
4
    Dim Source_1, Destination_1 As String
    Source_1 = "X.accdb"
    Destination_1 = "Y.accdb"
    FileCopy Source_1, Destination_1

mais malheureusement cela ne fonctionne pas car le fichier est ouvert (forcément!)

Voici le message :
"Erreur d'exécution '70' : Permission refusée"

Merci pour votre aide

[loufab]

Bonjour,

Faire des copies d'un fichier ouvert pose souvent des problèmes.

Quel but poursuis-tu ?

Cordialement,

[Bibi72]

Les coupures réseaux sont fréquentes depuis quelques temps et les reprises endommagent ma base. Je dois par conséquent reprendre la dernière sauvegarde (manuelle à aujourd'hui ou automatique (nuit)). Résultat : j'écrase le travail entrepris entre temps par les collègues
Idéalement, une sauvegarde après la fermeture de tel ou tel formulaire serait au top. Dans ce cas, une reprise d'une sauvegarde récente (quelques minutes et non quelques heures) limiterait la casse....

[loufab]

Donc sauvegarde des données uniquement. (L'ihm n'étant pas évolutive suivant les actions de l'utilisateur)

1) supprimer les liaisons (détacher) vers les tables de la BDD de tous les utilisateurs connectés.
2) sauvegarde du fichier dbb.
3) reattacher les tables.

J'espère que ton architecture est bien Frontal/Dorsal.

Honnêtement en multi je ne sais pas comment faire le premier point.

Cordialement,

[Bibi72]

Merci pour la réponse mais le premier point n'est pas possible car la base est utilisée continuellement.... ...impossible de demander à mon équipe de faire une pause tous les 1/4 d'heure....
Par contre, une sauvegarde manuelle soit un simple copier coller via l'explorateur Windows est possible malgré que le fichier soit ouvert!
Bien cordialement. Christophe

[Bibi72]

Je viens de contourner le problème!
1 - Créer un fichier .BAT via le bloc note comme dans le bon vieux temps! (Copy X.ACCDB Y.ACCDB)
2 - Exécuter le fichier dans une procédure VBA (via Shell)
Résultat : le fichier est copié...

[adlinformatik]

Je ne crois pas que le problème viens des coupures réseau mais plutôt des restriction du système Seven et Cie

le mieux c'est d'utiliser le code suivant:

Code :

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

1
2
3
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile strCheminEtNomBaseSource, strCheminEtNomBaseCible