Discussion :

[patito1975]

Bonjour,

j'ai créer une base de donnée et j'aimerai la sauvegarder tous les jours à la même heure.
J'ai créer un petit scrip powershell.

copy-item G:\Données\CDSD.accdb -destination c:\Donnéesbackup

Donc ma base se trouve dans le dossier G:\Données et je veux la backuper dans le dossier c:\Donnéesbackup
J'ai donc enregistrer mon scrip en backup.ps1 pour le powershell.
Quand j’enclenche manuellement le script dans powershell ça fonctionne nickel mais quand je crée une tache planifiée et que je met mon script dans action, démarrer un programme et la je place mon script, rien ne ce passe.
Quelqu'un pourrait il m'aider

Merci à vous.

[fab.85]

Bonjour,

et une copie à chaque fermeture de la base à des endroits différents ? cela pourrait-il convenir?

cordialement,

Fabien.

[patito1975]

Bonjour,
ma base est toujours ouverte car elle sert pour des insérer des enregistrements jour et nuit.
Après chaque ouverture j'ai placé un bouton "fermer" qui sauvegarde le nouvel enregistrement dans la table
mais j'aimerai sauvegarder toute la base tous les jours vers 23h30 donc oui si vous avez déja la solution pour la sauvegarder quand on la ferme oui
car je la ferme assez souvent pour maintenance mais mon problème ne sera pas résolu pour autant

Chose que je ne comprend pas c'est pourquoi mon script fonctionne manuellement mais pas dans le planificateur de tâche

[marsouin_89]

Bonjour,

Je fais la même chose que toi mais à chaque fermeture de ma dorsale.
Avant d'en faire la sauvegarde, je supprime toutes mes tables liées mais je crois que le code suivant fonctionne tout de même.

A tester.

Colles le code suivant dans un module :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
'API pour copier un fichier d'un endroit à un autre
Declare Function CopyFile Lib "Kernel32" Alias "CopyFileA" ( _
                 ByVal lpExistingFileName As String, _
                 ByVal lpNewFileName As String, _
                 ByVal bFailIfExists As Long) As Long
 
Public Function CopyFileSauvegarde(ByVal SourceFileName As String, _
                         ByVal DestFileName As String, _
                         ByVal FailIfTargetExists As Boolean) As Long
' Copie de la frontale ou la dorsale lors de sa fermeture (sauvegarde)
Dim strSourceTmp, strDestTmp As String
Dim lgFailIfExists As Long
 
strSourceTmp = SourceFileName & Space$(250 - Len(SourceFileName))
strDestTmp = DestFileName & Space$(250 - Len(DestFileName))
 
lgFailIfExists = CLng(FailIfTargetExists)
 
On Error Resume Next
    Call CopyFile(strSourceTmp, strDestTmp, lgFailIfExists)
On Error GoTo 0
 
If Err.Number <> 0 Then
    MsgBox Err.Description, vbCritical
End If
 
CopyFileSauvegarde = Err.Number
End Function

Pour effectuer ta suavegarde :

Code :

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

Call CopyFileSauvegarde(CheminDorsaleOrigine, CheminDorsaleSauvegarde, False)

[limipl]

As-tu rentré tes login et mot de passe Windows dans le planificateur ?
Sinon sur un forum powershell peut-être auras-tu une réponse.

[patito1975]

Voila résolu,

dans l'onglet action quand on crée une tâche il faut indiqué "C:\WINDOWS\system32\WindowsPowerShell\v1.0\powershell.exe" pour mettre en route Powershell et dans arguments (le champs juste en dessous) il faut indiquer la ligne de commande donc la mienne est "copy-item G:\Données\CDSD.accdb -destination c:\Donnéesbackup".

Ca fonctionne nickel, j'ai fais 3 tâches

1 ère: tous les jours à 23h30, ma base se backup seule.
2 éme : tous les dimanche à 23h00, ma base se backup seule.
3 éme : une fois par mois à la fin du mois, ma base se backup seule.

bien évidement chaque tâche s'enregistre dans des dossiers différents.

Voila, pour celui a qui ça intéresse, la solution est la sans même arrêter la base de donnée ...

Patrick