Script Login 2003 R2
Fermé
vanzouille
Messages postés
68
Date d'inscription
vendredi 21 mars 2008
Statut
Membre
Dernière intervention
27 septembre 2012
-
29 mai 2008 à 14:51
dje-dje Messages postés 10415 Date d'inscription mardi 6 janvier 2004 Statut Modérateur Dernière intervention 28 janvier 2011 - 29 mai 2008 à 16:42
dje-dje Messages postés 10415 Date d'inscription mardi 6 janvier 2004 Statut Modérateur Dernière intervention 28 janvier 2011 - 29 mai 2008 à 16:42
3 réponses
dje-dje
Messages postés
10415
Date d'inscription
mardi 6 janvier 2004
Statut
Modérateur
Dernière intervention
28 janvier 2011
755
29 mai 2008 à 14:54
29 mai 2008 à 14:54
Pourquoi t'utilises pas une GPO?
vanzouille
Messages postés
68
Date d'inscription
vendredi 21 mars 2008
Statut
Membre
Dernière intervention
27 septembre 2012
2
29 mai 2008 à 15:26
29 mai 2008 à 15:26
Quaisment.
Mais le but est de mapper (entre autres) des lecteurs réseau en fonction de l'appartenance du groupe de l'utilisateur dans l'OU.
Mais le but est de mapper (entre autres) des lecteurs réseau en fonction de l'appartenance du groupe de l'utilisateur dans l'OU.
dje-dje
Messages postés
10415
Date d'inscription
mardi 6 janvier 2004
Statut
Modérateur
Dernière intervention
28 janvier 2011
755
29 mai 2008 à 15:30
29 mai 2008 à 15:30
Bah les GPO doivent exister... C'est pas possible que ca existe pas...
Essaie de les ouvrir depuis la console AD tu verras s'il te jette en disant que ca n'existe pas ou s'il n'y a pas de menu.
Essaie de les ouvrir depuis la console AD tu verras s'il te jette en disant que ca n'existe pas ou s'il n'y a pas de menu.
vanzouille
Messages postés
68
Date d'inscription
vendredi 21 mars 2008
Statut
Membre
Dernière intervention
27 septembre 2012
2
29 mai 2008 à 15:48
29 mai 2008 à 15:48
Voila mon script.
Y a pas plus simple.
Const MSAP = "cn=g_msap"
Const RESP = "cn=g_responsable"
on error resume next
Set wshNetwork = CreateObject("WScript.Network")
Set ADSysInfo = CreateObject("ADSystemInfo")
Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName)
strGroups = LCase(Join(CurrentUser.MemberOf))
wshNetwork.MapNetworkDrive "p:","\\server\pourtous"
If InStr(strGroups, MSAP) then
wshNetwork.MapNetworkDrive "m:","\\server\documents_msap"
wshNetwork.MapNetworkDrive "p:","\\server\pourtous"
End if
If InStr(strGroups, RESP) then
wshNetwork.MapNetworkDrive "r:","\\server\responsable_msap"
End if
Y a pas plus simple.
Const MSAP = "cn=g_msap"
Const RESP = "cn=g_responsable"
on error resume next
Set wshNetwork = CreateObject("WScript.Network")
Set ADSysInfo = CreateObject("ADSystemInfo")
Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName)
strGroups = LCase(Join(CurrentUser.MemberOf))
wshNetwork.MapNetworkDrive "p:","\\server\pourtous"
If InStr(strGroups, MSAP) then
wshNetwork.MapNetworkDrive "m:","\\server\documents_msap"
wshNetwork.MapNetworkDrive "p:","\\server\pourtous"
End if
If InStr(strGroups, RESP) then
wshNetwork.MapNetworkDrive "r:","\\server\responsable_msap"
End if
dje-dje
Messages postés
10415
Date d'inscription
mardi 6 janvier 2004
Statut
Modérateur
Dernière intervention
28 janvier 2011
755
29 mai 2008 à 16:42
29 mai 2008 à 16:42
Si ton script s'exécute il est possible de le mettre dans une GPO pour qu'il se lance automatiquement à l'ouverture de session.
29 mai 2008 à 14:56
29 mai 2008 à 15:11
Sinon, script d'ouverture de session de compte. Mais faut se le rentrer user par user :-/