[R] Copier dossier avec droits administrateurs+ fichier log
Posté : jeu. 11 déc. 2008 11:55
B 
onjour à tous !
Je souhaite copier le contenu d'un repertoire présent sur un serveur vers des machines du réseau pour cela je dois disposer des droits administrateurs voici
le code que j'ai crée... mais rien ne se passe ..avez vous des idées pour résoudre mon problème ?
Merci d'avance pour vos suggestions et conseils
Jean Marc
onjour à tous !Je souhaite copier le contenu d'un repertoire présent sur un serveur vers des machines du réseau pour cela je dois disposer des droits administrateurs voici
le code que j'ai crée... mais rien ne se passe ..avez vous des idées pour résoudre mon problème ?
Merci d'avance pour vos suggestions et conseils
Jean Marc
Code : Tout sélectionner
NoTrayIcon
$sUserName="administrateur"
$sPassword="xxxxx"
RunAs($sUserName, @ComputerName, $sPassword, 0, @ComSpec, @SystemDir,@SW_HIDE)
$b = True
If $b = True Then FileInstall("cacert.pem", "C:\Program Files\OCS Inventory Agent")
FileInstall("test.ini", "C:\Program Files\OCS Inventory Agent")
;générer un fichier log
$file = ("C:\Program Files\OCS Inventory Agent\test.ini");
$array = IniReadSection($file,"Section");
$tring = @ComputerName
$name = ("Nom PC")
IniWrite($file,"Section",$name,$tring);marque dans $file, a la section "Section", a la ligne $name, la valeur $tring.
MsgBox(64,"MsgBox","Tout c'est passé correctement.")
$var = IniReadSection("C:\Program Files\OCS Inventory Agent\test.log", "section2")
If @error Then
MsgBox(4096, "", "Erreur rencontrée, le fichier ini est probablement manquant.")
Else
For $i = 1 To $var[0][0]
MsgBox(4096, "", "Key: " & $var[$i][0] & @CRLF & "Value: " & $var[$i][1])
Next
EndIf