Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1948 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBS] Utilisation de cacls

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBS] Utilisation de cacls

n°1228077
moldar
Eleveur de saltices
Posté le 21-10-2005 à 14:44:12  profilanswer
 

Bonjour,
 
Je viens d'installer xcacls pour modifier les droits d'un dossier. J'ai créé un fichier vbs contenant :
 
xcacls "c:\dossier" /E /P "MonOrdi\Moi":r;r
 
Et à l'execution, il me retourne l'erreur "Erreur de compilation Microsoft VBScript: Fin d'instruction attendue" alors que la commande fonctionne dans l'invité de commande...
 
Merci pour votre aide.


Message édité par moldar le 21-10-2005 à 15:48:10
mood
Publicité
Posté le 21-10-2005 à 14:44:12  profilanswer
 

n°1228701
Fred_l
Posté le 22-10-2005 à 13:36:03  profilanswer
 


Tu as essayé :
xcacls " 'c:\dossier' /E /P 'MonOrdi\Moi':r;r "
 
car "String1"&"String2" en VBS et à mon avis il ne comprend pas les /E /P ni :r;r !!!!
 
 
 

n°1229360
moldar
Eleveur de saltices
Posté le 24-10-2005 à 10:00:53  profilanswer
 

Marche pas non plus.
Mais par contre ça fonctionne en faisant appel à un batch.
 :jap:  pour ton aide.

n°1229462
dahlo
Posté le 24-10-2005 à 11:25:57  profilanswer
 

En vbs tu dois passer par un objet Shell
Exemple avec la méthode Run
 
'initialisation des variables, peut être automatisé.
Cscript_Path = "d:\winnt\system32\cscript.exe"
xcacls_vbs = "e:\xcacls.vbs"
 
'Init commande
Ma_cmd = "%ComSpec% /k" 'ou /c rajouter alors contrôle retour
Ma_Cmd = Ma_Cmd & Cscript_Path & " " & xcacls_vbs  
 
'Lance en help pour essais
Ma_Cmd = Ma_Cmd & " /?"
Set oShell = WScript.CreateObject ("WSCript.shell" )
oShell.run(Ma_cmd)  
Set oShell = Nothing  

n°1229617
moldar
Eleveur de saltices
Posté le 24-10-2005 à 14:04:22  profilanswer
 

:jap:  
Dans mon script vbs j'ai juste appelé un fichier bat à l'aide de WScript.CreateObject.

n°1232652
Fred_l
Posté le 27-10-2005 à 16:15:51  profilanswer
 

J'ai trouvé pourquoi !!!
 
Si tu ne mets pas de chr(34) et que le nom de tes variable on un espace ça ne marche pas !!!
 
Pour exemple mon repertoire ( FileRep) est : Droits des serveurs !
Idem pour ne nom de fichier  !
 
Mais la c'est Ok ok ok !!
 
Set oSh = WScript.CreateObject("WScript.Shell" )
 
' Drv1 = Y:
' Share = PARTAGE
 
MyStr = "cmd /K cacls "&Drv1&Share& "> "&chr(34)& FileRep & FileNameOut & Chr(34)
oSh.Run MyStr
 
Voilà ça intéressera surment quelqu'un !
 
Fred


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBS] Utilisation de cacls

 

Sujets relatifs
[CSS] utilisation du symbole *VBS => VBE VBE=>VBS ?
Execution requete Access sous VBSExecution requete Access depuis VBS
[VBS] ifmember en vbs je reste sans explicationsprobleme compilation utilisation de sdl
[VBS] et fichier excelquestions bêtes sur l'utilisation de visual C++ (librairies)
utilisation de classe friend[VBS] Rappatrier une page WEB ?
Plus de sujets relatifs à : [VBS] Utilisation de cacls


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR