Ho crato uno script per copiare una immaggine da un disco condiviso da tutti i membri della mia societā nella cartella predefinita di Windows e in seguito vado a scrivere nel reggistro, ma il metodo CopyFile mi dā errore se non si č amministratori della amcchina su cui si lancia lo Script.
Sapete dirmi come posso risolvere tale inconveniente? Di seguito vi inserisco il codice da me scritto!![]()
![]()
-----------------------------------------------------------------
Option Explicit
Dim WSHShell
Dim file
Dim path
Set WSHShell = WScript.CreateObject("WScript.Shell")
Set file = CreateObject("Scripting.FileSystemObject")
path = WSHShell.ExpandEnvironmentStrings("%WinDir%\")
'Percorso del nuovo file da modificare
file.CopyFile "w:\<nome_file.bmp>", path, true
path = path+"<nome_file.bmp>"
'Scrittura chiava "Wallpaper" del Reggistro
WSHShell.RegWrite "HKEY_USERS\.DEFAULT\Control Panel\Desktop\Wallpaper",path
-----------------------------------------------------------------