Bonjour,
comme toujours, penser à regarder AVANT TOUT dans le script center pour les questions de ce genre (surtout le portable scriptcenter qui te permet de faire des recherches tranquillement sur ton poste dans un CHM)
j'ai trouvé cette exemple qui normalement répond à ta demande :
Code :
- strComputer = "."
- Set objWMIService = GetObject("winmgmts:" _
- & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
- Set colShares = objWMIService.ExecQuery("Select * from Win32_Share" )
- For each objShare in colShares
- Wscript.Echo "Allow Maximum: " & objShare.AllowMaximum
- Wscript.Echo "Caption: " & objShare.Caption
- Wscript.Echo "Maximum Allowed: " & objShare.MaximumAllowed
- Wscript.Echo "Name: " & objShare.Name
- Wscript.Echo "Path: " & objShare.Path
- Wscript.Echo "Type: " & objShare.Type
- Next
|
remplace strComputer par le nom de la machine visée.
---------------
Envie de scripting ? Lisez donc "Scripting Windows" aux Editions Eyrolles ! tout pour apprendre le scripting orienté infrastructure Microsoft, en français dans les textes et exemples. http://www.eyrolles.com/Informatiq [...] 212116922/