vbs script recherche User sous-domaine - VB/VBA/VBS - Programmation
MarshPosté le 19-03-2009 à 15:36:52
Bonjour,
J'ai un script qui regarde les membres dans un groupe, qui vérifie l'identité et map des imprimantes si l'utilisateur fait bien partie du groupe. Mais, mon problème est que les utilisateurs de mon groupe font parti d'un autre domaine que le mien. Alors mon script ne vérifie que les users qui font partie de mon domaine. Donc le objGroup.Members ne me sort que les utilisateurs de mon domaine. Alors je me demande : comment vérifier les utilisateurs d'un d'un groupe même si ceux-ci ne font pas partie de mon domaine?
Merci d'avance!!!!
Dim objNetwork,objGroup,Member
Set objNetwork = CreateObject("Wscript.network" )
Set objGroup = GetObject("WinNT://NomDeMonDomaine/NomDuGroupe,group" )
For Each Member In objGroup.Members
If Member.Name=objNetwork.UserName then objNetwork.AddWindowsPrinterConnection "\\NomDuServeur\NomDeLImprimante" End if
Marsh Posté le 19-03-2009 à 15:36:52
Bonjour,
J'ai un script qui regarde les membres dans un groupe, qui vérifie l'identité et map des imprimantes si l'utilisateur fait bien partie du groupe. Mais, mon problème est que les utilisateurs de mon groupe font parti d'un autre domaine que le mien. Alors mon script ne vérifie que les users qui font partie de mon domaine. Donc le objGroup.Members ne me sort que les utilisateurs de mon domaine. Alors je me demande : comment vérifier les utilisateurs d'un d'un groupe même si ceux-ci ne font pas partie de mon domaine?
Merci d'avance!!!!
Dim objNetwork,objGroup,Member
Set objNetwork = CreateObject("Wscript.network" )
Set objGroup = GetObject("WinNT://NomDeMonDomaine/NomDuGroupe,group" )
For Each Member In objGroup.Members
If Member.Name=objNetwork.UserName then
objNetwork.AddWindowsPrinterConnection "\\NomDuServeur\NomDeLImprimante"
End if
Next
Set objGroup = Nothing
wscript.quit