Discussion :

[Cryos]

Bonjour à tous,

J'ai réalisé un script tout simple qui s'éxécute au démarrage de la session pour copier les ifchiers de l'utilisateur sur l'emplacement réseau de sauvegarde.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Dim oFSO
Dim WshNetwwork
 
Set oFSO =  CreateObject("Scripting.FileSystemObject")
Set WshNetWork = CreateObject("WScript.NetWork")
 
'msgbox "D:\" & WshNetWork.Username & "-DisqueD"
'msgbox "Z:\Sauvegarde-" & WshNetWork.ComputerName
 
oFSO.CopyFolder "D:\" & WshNetWork.Username & "-DisqueD", "Z:\Sauvegarde-" & WshNetWork.ComputerName, True
msgbox "fini"

Jusque là pas de problème, niveau réalisation du code mais lors de l'éxécution c'est une autre paire de manche. Voici ce que me donne le compilateur.

Code :

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

1
2
3
4
5
6
7
8
Z:\>Wscript //H:CScript
 
Z:\>"D:\Douillet-disqueD\Travail\VBS - Script de sauvegarde\Sauvegarde.vbs"
Microsoft (R) Windows Script Host Version 5.7
Copyright (C) Microsoft Corporation 1996-2001. Tous droits réservés.
 
D:\Douillet-disqueD\Travail\VBS - Script de sauvegarde\Sauvegarde.vbs(10, 1) Err
eur d'exécution Microsoft VBScript: Permission refusée

Donc j'ai vérifié j'ai bien les accès nécessaire sur le dossier de sauvegarde et sur mon disque local D. J'ai aussi spécifié le true pour écraser les fichiers donc je ne comprend pas vraiment le problème.

Merci d'avance de vos réponses

[l_autodidacte]

Ce problème a déjà été évoqué sur ce forum.
Regarde ce post et ceux dans la même page.

[Cryos]

Merci de ta réponse et désolé du retard de la mienne.

J'étais déjà allé sur ce sujet, mais l'erreur que j'ai n'est pas celle qui a été évoquée sur ce sujet.

Cela dit je pense que c'est dû au fait que l'emplacement de la sauvegarde est sur le réseau. Je vais récupéré quelques lignes de code et retester.