pepper
Goto Top

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

Content-ID: 203312

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

Ausgedruckt am: 22.11.2024 um 18:11 Uhr

DerWoWusste
DerWoWusste 14.03.2013 um 09:23:27 Uhr
Goto Top
Hi.

Eigentlich müsste jedem einleuchten, dass man das Skript dafür kennen muss, wenn man hier helfen soll, oder?
Pepper
Pepper 14.03.2013 um 09:27:27 Uhr
Goto Top
Schon Recht, aber ich hatte gehofft, dass es bei irgendjemandem schon Klick macht, wenn er Windows 8 und VBS-Anmeldescript liest...
kontext
kontext 14.03.2013 um 09:54:55 Uhr
Goto Top
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
Pepper
Pepper 14.03.2013 um 10:26:26 Uhr
Goto Top
Hi, meine Murmel ist auch noch was beschlagen... face-smile

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... face-sad
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"

[...]