4
Anmeldescript (logon.vbs) wird unter Windows 8 nicht ausgeführt.
Hallo zusammen,
ich habe ein Problem, ich habe hier einen Rechner mit Windows 8 Professional (Lenovo Thinkpad Twist), den wir testweise in unsere Domäne bringen möchten.
Das Gerät wurde erfolgreich in die Domäne integriert, aber das Anmeldescript (logon.vbs) wird nicht ausgeführt.
Die Benutzerkontensteuerung ist bereits deaktiviert (Der Schieberegler steht auf "Nie benachrichtigen").
Unter Windows 7 hat diese Einstellung gereicht und das Script lief einwandfrei durch.
Ich hoffe, Ihr könnt mir helfen...
Viele Grüße
Christian
ich habe ein Problem, ich habe hier einen Rechner mit Windows 8 Professional (Lenovo Thinkpad Twist), den wir testweise in unsere Domäne bringen möchten.
Das Gerät wurde erfolgreich in die Domäne integriert, aber das Anmeldescript (logon.vbs) wird nicht ausgeführt.
Die Benutzerkontensteuerung ist bereits deaktiviert (Der Schieberegler steht auf "Nie benachrichtigen").
Unter Windows 7 hat diese Einstellung gereicht und das Script lief einwandfrei durch.
Ich hoffe, Ihr könnt mir helfen...
Viele Grüße
Christian
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: 203312
Url: https://administrator.de/contentid/203312
Printed on: April 18, 2024 at 14:04 o'clock
4 Comments
Latest comment
Hi.
Eigentlich müsste jedem einleuchten, dass man das Skript dafür kennen muss, wenn man hier helfen soll, oder?
Eigentlich müsste jedem einleuchten, dass man das Skript dafür kennen muss, wenn man hier helfen soll, oder?
Schon Recht, aber ich hatte gehofft, dass es bei irgendjemandem schon Klick macht, wenn er Windows 8 und VBS-Anmeldescript liest...
HeyHo,
wie schon @DerWoWusste geschrieben hat - mehr Infos ...
... meine Glaskugel funktioniert aufgrund des Schnees nicht richtig, daher:
Eventlog überprüft - steht da was drinnen?
Schon mal versucht das Anmeldescript manuell zu starten - gleicher Fehler?
Wie hast du das ganze Werk eingerichtet?
Cheers
@zanko
wie schon @DerWoWusste geschrieben hat - mehr Infos ...
... meine Glaskugel funktioniert aufgrund des Schnees nicht richtig, daher:
Eventlog überprüft - steht da was drinnen?
Schon mal versucht das Anmeldescript manuell zu starten - gleicher Fehler?
Wie hast du das ganze Werk eingerichtet?
Cheers
@zanko
Hi, meine Murmel ist auch noch was beschlagen... 
Das Eventlog habe ich mir durchgeschaut, aber nichts auffälliges gesehen.
Egal, ob ich das Script vom Server oder lokal vom PC aus starte, das Ergebnis bleibt das Selbe...
Das Script wird (normalerweise) über das AD-Profil gestartet.
Wenn ich das Script manuell starte, erscheint die 'mpr.html' aber es werden keine Laufwerke gemapped.
Hier (ein Auszug) aus dem Anmeldescript:
Option Explicit
On Error Resume Next
Dim strMappedDrives
Dim strStatus
Dim IE
Dim LogonURL
Dim strUser
Dim strComputer
Dim WshNetwork
Dim WshShell
Dim varNow
Dim strIP
Dim strStd
Dim details
Dim objWMIService
Dim colAdapters
Dim dcServer
dim fso
dcserver = "DC"
strDomain = "Domain"
LogonURL = "\\" & dcserver & "\netlogon\mpr.html"
Call CreateIE()
Set WSHNetwork = WScript.CreateObject("WScript.Network")
strUser = ""
While strUser = ""
strUser = WSHNetwork.UserName
Wend
strComputer = WSHNetwork.ComputerName
strStatus = "Logon Script v1.0 " & Date()
ie.document.all.wstatus.InnerText = strStatus
ie.document.all.Msg1.InnerText = strUser
ie.document.all.Msg3.InnerText = strComputer
ie.document.all.Msg4.InnerText = dcServer
' 3) Put any other WSH commands here
'Installiere den Client für Schattenkopien (Vorherige Dateiversionen)
Set WshShell = CreateObject("WScript.Shell")
'Ausführen der Routenänderung für das B-System
WshShell.run "route add -p 10.xxx.yyy.z mask 255.255.255.0 192.xxx.yyy.zzz", True
'Ausführen des Hinzufügens der 46er-Route für die IP-Telefonie
WshShell.run "route add -p 192.xxx.yyy.zzz mask 255.255.255.0 192.xxx.yyy.zzz", True
'Ausführen des Hinzufügens der neuen Route für die IP-Telefonie (*2)
WshShell.run "route add -p 172.xxx.yyy.zzz mask 255.255.255.248 192.xxx.yyy.zzz", True
'Ausführen des Hinzufügens der neuen Route für die DGB-Reisen (*2)
WshShell.run "route add -p 172.xxx.yyy.zzz mask 255.255.255.248 192.xxx.yyy.zzz", True
' 4) Map Drives
Set ObjUser = Getobject("WinNT://" & strDomain & "/" & strUser)
UserGroups=""
For Each Member in ObjUser.Groups
UserGroups=UserGroups & "[" & member.Name & "]"
next
'Mapping für Alle
MapDrive "K:", "\\Fileserver1\Einkauf"
MapDrive "L:", "\\Fileserver1\Bilder"
MapDrive "P:", "\\Fileserver1\EDV_Statistiken"
MapDrive "S:", "\\Fileserver3\EDV"
MapDrive "U:", "\\Fileserver3\Abwicklungen"
MapDrive "V:", "\\Fileserver1\Vertrieb"
MapDrive "X:", "\\Fileserver1\Versand"
MapDrive "Z:", "\\Fileserver1\Zentral"
[...]
Das Eventlog habe ich mir durchgeschaut, aber nichts auffälliges gesehen.
Egal, ob ich das Script vom Server oder lokal vom PC aus starte, das Ergebnis bleibt das Selbe...
Das Script wird (normalerweise) über das AD-Profil gestartet.
Wenn ich das Script manuell starte, erscheint die 'mpr.html' aber es werden keine Laufwerke gemapped.
Hier (ein Auszug) aus dem Anmeldescript:
Option Explicit
On Error Resume Next
Dim strMappedDrives
Dim strStatus
Dim IE
Dim LogonURL
Dim strUser
Dim strComputer
Dim WshNetwork
Dim WshShell
Dim varNow
Dim strIP
Dim strStd
Dim details
Dim objWMIService
Dim colAdapters
Dim dcServer
dim fso
dcserver = "DC"
strDomain = "Domain"
LogonURL = "\\" & dcserver & "\netlogon\mpr.html"
Call CreateIE()
Set WSHNetwork = WScript.CreateObject("WScript.Network")
strUser = ""
While strUser = ""
strUser = WSHNetwork.UserName
Wend
strComputer = WSHNetwork.ComputerName
strStatus = "Logon Script v1.0 " & Date()
ie.document.all.wstatus.InnerText = strStatus
ie.document.all.Msg1.InnerText = strUser
ie.document.all.Msg3.InnerText = strComputer
ie.document.all.Msg4.InnerText = dcServer
' 3) Put any other WSH commands here
'Installiere den Client für Schattenkopien (Vorherige Dateiversionen)
Set WshShell = CreateObject("WScript.Shell")
'Ausführen der Routenänderung für das B-System
WshShell.run "route add -p 10.xxx.yyy.z mask 255.255.255.0 192.xxx.yyy.zzz", True
'Ausführen des Hinzufügens der 46er-Route für die IP-Telefonie
WshShell.run "route add -p 192.xxx.yyy.zzz mask 255.255.255.0 192.xxx.yyy.zzz", True
'Ausführen des Hinzufügens der neuen Route für die IP-Telefonie (*2)
WshShell.run "route add -p 172.xxx.yyy.zzz mask 255.255.255.248 192.xxx.yyy.zzz", True
'Ausführen des Hinzufügens der neuen Route für die DGB-Reisen (*2)
WshShell.run "route add -p 172.xxx.yyy.zzz mask 255.255.255.248 192.xxx.yyy.zzz", True
' 4) Map Drives
Set ObjUser = Getobject("WinNT://" & strDomain & "/" & strUser)
UserGroups=""
For Each Member in ObjUser.Groups
UserGroups=UserGroups & "[" & member.Name & "]"
next
'Mapping für Alle
MapDrive "K:", "\\Fileserver1\Einkauf"
MapDrive "L:", "\\Fileserver1\Bilder"
MapDrive "P:", "\\Fileserver1\EDV_Statistiken"
MapDrive "S:", "\\Fileserver3\EDV"
MapDrive "U:", "\\Fileserver3\Abwicklungen"
MapDrive "V:", "\\Fileserver1\Vertrieb"
MapDrive "X:", "\\Fileserver1\Versand"
MapDrive "Z:", "\\Fileserver1\Zentral"
[...]
