vman
Goto Top

vbs Script - Laufwerk verbinden

Laufwerk verbinden, wenn User in einer bestimmten Gruppe ist

Hallo.

Wie kann ich im LoginScript ein Laufwerk verbinde, nur wenn der User, der sich anmeldet, in einer bestimmten Gruppe ist ?

Danke

Bernhard

Content-Key: 32099

Url: https://administrator.de/contentid/32099

Ausgedruckt am: 28.03.2024 um 14:03 Uhr

Mitglied: Dani
Dani 10.05.2006 um 10:26:08 Uhr
Goto Top
Hi,
am einfachsten ist es mit den Gruppen mit KIX. Ist zwar ein wenig gewöhnungsbedürftig, aber mit einiger Zeit ist es kinderleicht. Link: http://kixtart.org. Du brauchst aus dem Archiv eigentlich nur die wkix32.exe. Diese musst du mit dem kix Script auf netlogon legen.


Gruß
Dani
Mitglied: Lord-Helmi
Lord-Helmi 10.05.2006 um 10:28:25 Uhr
Goto Top
Hallo,

in einer normalen Batchdatei hast du die Möglichkeit, das mit ifmember zu machen. Den Befehl findest du im Ressource-Kit.

Gruß
Michael
Mitglied: vman
vman 10.05.2006 um 10:58:37 Uhr
Goto Top
Danke.

Habe folgendes geschrieben: Geht aber leider nicht. Das Laufwerk verbindet er bei jedem User.
Bitte um Hilfe.
ifmember tools
if errorlevel 1 goto tools
goto end

:tools
net use f: \\mc-file\tools
goto end

:end
Exit

Danke

Bernhard

ANHANG: muss das Resource Kit am Client auch oben sein ?
habe statt einem net use befehl einfach nur cmd geschrieben.
Und da sagt mir der Client das ifmember falsch geschrieben ist od. es das nicht gibt.

DANKE
Mitglied: gemini
gemini 10.05.2006 um 18:39:36 Uhr
Goto Top
Hi Bernhard,


zunächst mal; dein Code-Schnipsel ist kein VBScript.

Hier ein Schnipsel aus zwei Samples des ScriptCenter.
Es liest alle Member einer AD-Gruppe (hier: Scientists) aus.
Da die Ausgabe (strMember) aus dem DN besteht, wird das Verzeichnis nochmals nach dem Anmeldenamen befragt.
Dieser wird mit der Variablen strUser, die den Namen des gerade anmeldenden Users enthält, verglichen

~~~~~~~~~~~~~~~
On Error Resume Next
Set WshNetwork = Wscript.CreateObject("Wscript.Network")
strUser = Lcase(WshNetwork.UserName)
Set objGroup = GetObject("LDAP:cn=Scientists,ou=R&D,dc=NA,dc=fabrikam,dc=com")
objGroup.GetInfo
arrMemberOf = objGroup.GetEx("member")
For Each strMember in arrMemberOf
Set objUser = GetObject("LDAP:
" & strMember & "")
objUser.GetInfo
If strUser = Lcase(objUser.Get("sAMAccountName")) then
'Was passieren soll, wenn der User Mitglied der Gruppe ist
End If
Next
~~~~~~~~~~~~~~~

Ist nur eine Skizze und natürlich nicht getestet.
Man möge mir daher den schlampigen Stil verzeihen face-wink

Gruß
gemini