Parametrer l'onglet securité grace à Visual Basic

Signaler
Messages postés
5
Date d'inscription
jeudi 5 février 2004
Statut
Membre
Dernière intervention
21 octobre 2005
-
Messages postés
5
Date d'inscription
jeudi 5 février 2004
Statut
Membre
Dernière intervention
21 octobre 2005
-
Bonjour,

j'aimerai creer un dossier et y mettre des atributs spécifiques pour certain utilisateurs.

Sachant que je veux passer par Active Directory.

Merci

1 réponse

Messages postés
5
Date d'inscription
jeudi 5 février 2004
Statut
Membre
Dernière intervention
21 octobre 2005

Public
Function PutOffice()



Dim Fso


FichierOffice = CheminRessources & "" & username


Fso = CreateObject("Scripting.FileSystemObject")



If
Not Fso.FolderExists(FichierOffice)
Then


Fso.CreateFolder(FichierOffice)



Else


MsgBox("Fichier de ressources Office déja créé", 16, "Attention !")



End
If



If Err.Number <> 0
Then


MsgBox("probleme dans la création du repertoire Office " & FichierOffice)



End
If



End
Function

J'en suis la, il ne me manque plus que parametrer les autorisations sur le dossier, une idée ou une proposition?
0