9
User Logon Script bei Domänenanmeldung (VBS)
Vom User gemappte Laufwerke mit der Einstellung Persistent:Yes lassen sich über das Login Script nicht löschen.
Hallo,
ich möchte ein Loginscript über eine entsprechende GPO bei einer gewisse Anzahl von Usern anwenden. Die Erstellung der GPO funktioniert auch ohne weiteres, nur tritt leider beim Ausführen des Scripts folgender Fehler auf !
Hat der User ein entsprechendes Laufwerk und dem selben Laufwerksbuchstaben mit der Option "Verbindung bei Anmeldung wiederherstellen" gemappt so lässt sich dieses Laufwerk per Script nicht löschen. Diverse Beispiele bei beschreiben alle nur das Mappen eines Laufwerks aber keines der Beispiele beschreibt wie ich meine 4 zu mappenden Freigaben durchsetzen kann wenn vom User diese Laufwerksfreigaben bereits verwendet werden.
Schön wäre wenn mir diesbezüglich jemand ein Script zur Verfügung stellen könnte das ich über eine GPO zuweisen kan, kein net use usw. , sonder entweder ein VBS bzw WSH Script.
Wie sieht es mit Druckern aus ?? Den Test konnte ich leider noch nicht machen,also Drucker bereits vohanden, per Script alle löschen und neu anlegen !!!
Herzlichen Dank
Michael
ich möchte ein Loginscript über eine entsprechende GPO bei einer gewisse Anzahl von Usern anwenden. Die Erstellung der GPO funktioniert auch ohne weiteres, nur tritt leider beim Ausführen des Scripts folgender Fehler auf !
Hat der User ein entsprechendes Laufwerk und dem selben Laufwerksbuchstaben mit der Option "Verbindung bei Anmeldung wiederherstellen" gemappt so lässt sich dieses Laufwerk per Script nicht löschen. Diverse Beispiele bei beschreiben alle nur das Mappen eines Laufwerks aber keines der Beispiele beschreibt wie ich meine 4 zu mappenden Freigaben durchsetzen kann wenn vom User diese Laufwerksfreigaben bereits verwendet werden.
Schön wäre wenn mir diesbezüglich jemand ein Script zur Verfügung stellen könnte das ich über eine GPO zuweisen kan, kein net use usw. , sonder entweder ein VBS bzw WSH Script.
Wie sieht es mit Druckern aus ?? Den Test konnte ich leider noch nicht machen,also Drucker bereits vohanden, per Script alle löschen und neu anlegen !!!
Herzlichen Dank
Michael
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 23677
Url: https://administrator.de/contentid/23677
Printed on: April 19, 2024 at 06:04 o'clock
9 Comments
Latest comment
Servus,
also du möchtest z.B. Laufwerk x: y: und z: mappen.
bevor du Ihn hier machst
net use x: \\meinServer\XXX-Files /persistent:no
machst du einfach eine expliziete Trennung des Laufwerkes
net use x: /delete
Das sollte auch mit von Hand gemappten und als persistent deklarierten Laufwerken klappen.
Grüße
also du möchtest z.B. Laufwerk x: y: und z: mappen.
bevor du Ihn hier machst
net use x: \\meinServer\XXX-Files /persistent:no
machst du einfach eine expliziete Trennung des Laufwerkes
net use x: /delete
Das sollte auch mit von Hand gemappten und als persistent deklarierten Laufwerken klappen.
Grüße
Hallo CouchCoach,
mit net use X: /delete funktioniert es !! Ich möchte aber ganz gern ein VBS bzw. WSK Script !
Dies habe ich ausprobiert und es funktioniert nicht wenn der User den Haken für Persistent:Yes beim mappen des Laufwerks gesetzt hat !!!
Anbei Script:
Region Description
'
' Name:Login Script, für alle User
' Author:Michael
' Version:01.02
' Description:
'
'
' EndRegion
'Script zum Mappen der entsprechenden Laufwerke, die jedem User zur Verfügung stehen sollen !
RemoveDrive "X:"
MapDrive "X:", "\\Server_1\one$"
RemoveDrive "Y:"
MapDrive "Y:", "\\Server_2\two$"
Sub MapDrive(ByVal path, ByVal url)
Set net = CreateObject("WScript.Network")
On Error Resume Next
net.MapNetworkDrive path, url
Set net = Nothing
On Error Goto 0
End Sub
Sub RemoveDrive(ByVal path)
Set onet = CreateObject("WScript.Network")
On Error Resume Next
net.RemoveNetworkDrive path, True, True
Set onet = Nothing
On Error Goto 0
End Sub
mit net use X: /delete funktioniert es !! Ich möchte aber ganz gern ein VBS bzw. WSK Script !
Dies habe ich ausprobiert und es funktioniert nicht wenn der User den Haken für Persistent:Yes beim mappen des Laufwerks gesetzt hat !!!
Anbei Script:
Region Description
'
' Name:Login Script, für alle User
' Author:Michael
' Version:01.02
' Description:
'
'
' EndRegion
'Script zum Mappen der entsprechenden Laufwerke, die jedem User zur Verfügung stehen sollen !
RemoveDrive "X:"
MapDrive "X:", "\\Server_1\one$"
RemoveDrive "Y:"
MapDrive "Y:", "\\Server_2\two$"
Sub MapDrive(ByVal path, ByVal url)
Set net = CreateObject("WScript.Network")
On Error Resume Next
net.MapNetworkDrive path, url
Set net = Nothing
On Error Goto 0
End Sub
Sub RemoveDrive(ByVal path)
Set onet = CreateObject("WScript.Network")
On Error Resume Next
net.RemoveNetworkDrive path, True, True
Set onet = Nothing
On Error Goto 0
End Sub
Hi,
also an sowas wäre ich auch sehr interessiert.
Habe hier leider auch keine Möglichkeit, die wirksam ist.
Lars
also an sowas wäre ich auch sehr interessiert.
Habe hier leider auch keine Möglichkeit, die wirksam ist.
Lars
Hallo Dani,
ich glaube nicht ! Ich wollte versuchen mit den Windows Mitteln dies zu realisieren ! Habe aber bei meiner Suche mir auch dies angeschaut !
Eine Frage hätte ich aber diesbezüglich doch ! Gibt es dafür auch ein deutsches Manual (Version 4.51) ?
Danke
Michael
ich glaube nicht ! Ich wollte versuchen mit den Windows Mitteln dies zu realisieren ! Habe aber bei meiner Suche mir auch dies angeschaut !
Eine Frage hätte ich aber diesbezüglich doch ! Gibt es dafür auch ein deutsches Manual (Version 4.51) ?
Danke
Michael
Moin Skyurmel,
wieso postest Du nicht Dein Skript? Das wäre einfacher.
Du kannst die Netzlaufwerke doch einfach trennen, oder was ist das Problem?
Die Methode heißt .RemoveNetworkDrive und gehört zum WScript.Network-Object.
Biber
[Edit] Sorry, hat sich zeitlich überschnitten mit Skyurmels Posting. Obsolet. [/Edit]
wieso postest Du nicht Dein Skript? Das wäre einfacher.
Du kannst die Netzlaufwerke doch einfach trennen, oder was ist das Problem?
Die Methode heißt .RemoveNetworkDrive und gehört zum WScript.Network-Object.
Biber
[Edit] Sorry, hat sich zeitlich überschnitten mit Skyurmels Posting. Obsolet. [/Edit]
Hallo Michael,
ich hab mir zum trennen sowas gebastelt.
Funktioniert auch ganz gut.
Habs eben nochmal mit Usermappings getestet, bei mir werden diese zuverlässig getrennt
Hope it helps
gemini
ich hab mir zum trennen sowas gebastelt.
Funktioniert auch ganz gut.
Habs eben nochmal mit Usermappings getestet, bei mir werden diese zuverlässig getrennt
Const blnForce = TRUE
strPrintSRV = "Printserver"
Set WshNetwork = Wscript.CreateObject("Wscript.Network")
strComputer = LCase(WshNetwork.ComputerName)
Set colDrives = WshNetwork.EnumNetworkDrives
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _
strComputer & "\root\cimv2")
Set colPrinters = objWMIService.ExecQuery("Select * from Win32_Printer")
On Error Resume Next
If colDrives.Count > 0 Then
For i = 0 To colDrives.Count - 1 Step 2
WshNetwork.RemoveNetworkDrive colDrives(i), blnForce
Next
End If
On Error GoTo 0
For Each objPrinter in colPrinters
If Left(objPrinter.Name, 2) = "\\" Then
WshNetwork.RemovePrinterConnection "\\" & strPrintSRV & "\" & objPrinter.ShareName, blnForce
End If
NextHope it helps
gemini
Meinst du die Dokumentation??
Nein, also soweit es mein Wissen zu lässt. Könnte aber sein, dass es jemand übersetzt hat. Kannst ja mal bei eMule schauen.
Nein, also soweit es mein Wissen zu lässt. Könnte aber sein, dass es jemand übersetzt hat. Kannst ja mal bei eMule schauen.
An was bist du interessiert??
An den VBS Scripting oder Kixtart
An den VBS Scripting oder Kixtart
