Discussion :

[TheBlackReverand]

Bonjour,

dans le cadre du deploiement d'une base de donnèes sur un serveur j'aurais besoin de crèè un nouveau dossier dans "ProgramFiles" et de le partager avec les reste du reseaux

comment puis je fair svp??

[SfJ5Rpw8]

issue de MSDN :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 
Const FILE_SHARE = 0
Const MAXIMUM_CONNECTIONS = 25
strComputer = "."
stRep = "c:\tmp" ' Répertoire à partager 
stNomPartage = "MonPartage" 'Nom de partage
stDesc = "Mon répertoire partagé" ' Descriptif partage 
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2")
Set objNewShare = objWMIService.Get("Win32_Share")
 
errReturn = objNewShare.Create _
    (stRep, stNomPartage, FILE_SHARE, _
        MAXIMUM_CONNECTIONS, stDesc)