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

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 32099

Url: https://administrator.de/forum/vbs-script-laufwerk-verbinden-32099.html

Ausgedruckt am: 19.04.2025 um 22:04 Uhr

4 Kommentare

Neuester Kommentar

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

Hallo,

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

Gruß
Michael

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

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