Salut à tous.

J'essaye de partager un repertoire avec Inno steup. Donc le partage c'est bon avec ceci :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
function CreateShared(const Path, Name, Description : string):Integer;
var
    FSWbemLocator: Variant;
    FWMIService   : Variant;
    FWbemObjectSet: Variant;
begin
    FSWbemLocator := CreateOleObject('WBEMScripting.SWBEMLocator');
    FWMIService := FSWbemLocator.ConnectServer('', 'root\CIMV2', '', '');
    FWbemObjectSet := FWMIService.Get('Win32_Share');
 
    Result:=FWbemObjectSet.Create(Path, Name, FILE_SHARE, MAXIMUM_CONNECTIONS, Description);
end;
Par contre mon répertoire est partagé en acces restreint à tout le monde.

J'ai bien compris qu'il fallait utiliser SetShareInfo et un Win32_SecurityDescriptor.... mais impossible de le faire marche.
Auriez vous un exemple sous la main ? (ou une autre methode)

Merci d'avance