Smidddi 3 Geschrieben 8. Juni 2013 Melden Teilen Geschrieben 8. Juni 2013 Hallo zusammen, folgendes Szenario:Notebook, Windows 7 professional 64Bit, SP12 lokale Benutzer: Admin (lokaler Administrator), Anwender (lokaler Benutzer sowie Netzwerkkonfigurations-Operator) Der Anwender ist in der Gruppe der Netzwerkkonfigurations-Operatoren, um selbst wählen zu können, ob er eine statische IP (Zugriff im Büro) oder eine dynamische IP via DHCP erhalten soll.Bei manueller Einstellung der jeweiligen Parameter funktioniert das auch wunderbar. Nun möchte ich dem Anwender das Leben allerdings etwas erleichtern und habe ein VBScript zusammengestellt, welches eben genau die gewünschten Einstellungen vornimmt. Das Script zur Einstellung der statischen IP funktioniert sowohl als Admin, als auch als Anwender. Das Script für die dynamische Konfiguration läuft allerdings nur unter dem Admin. 'Variablen strComputer = "." strNIC = "Gigabit-Netzwerkverbindung Intel(R) 82579V" 'Modellbezeichnung Netzwerkkarte 'Objekte Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 'WMI Set colNetAdapters = objWMIService.ExecQuery _ ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")'aktive Netzwerkkarten set objWSHShell = createobject("Wscript.shell") 'WSH Shell 'Durchlauf aller Netzwerkadapter For Each objNetAdapter in colNetAdapters If InStr(objNetAdapter.Caption, strNIC) Then errEnable = objNetAdapter.EnableDHCP errDNS = objNetAdapter.SetDNSServerSearchOrder(dhcp) If errEnable = 0 Then WScript.Echo "Ihre Netzwerkkonfiguration wurde für den mobilen Einsatz angepasst." Else WScript.Echo "Die Netzwerkeinstellungen konnten nicht übernommen werden. Bitte kontaktieren Sie Ihren Administrator." End If End If Next 'Proxy einschalten objWSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD" Die Frage an dieser Stelle: Welche Berechtigungen sind notwendig, um einem lokalen Benutzer die per Script automatisierte Konfiguration der LAN-Schnittstelle auf DHCP zu erlauben? Problem konnte weiter eingeschränkt werden: Offenbar ursächilch dafür ist der von Windows geforderte Neustart des Betriebssystems, sobald von statischer auf dynamische IP umgestellt werden soll. Ich habe nun einiges über besagten Neustart gelesen, gibt es eine Möglichkeit, diesen zu unterbinden? Zitieren Link zu diesem Kommentar
NorbertFe 2.061 Geschrieben 8. Juni 2013 Melden Teilen Geschrieben 8. Juni 2013 Wozu braucht er im Büro denn ne statische ip? Zitieren Link zu diesem Kommentar
Smidddi 3 Geschrieben 8. Juni 2013 Autor Melden Teilen Geschrieben 8. Juni 2013 Hallo Nobert, danke für die Antwort. Die statische IP ist im Büro notwendig, da der Endkunde mit statischen IPs arbeitet und dies auch nicht ändern möchte. Ich habe das Problem mittlerweile aber auch umgangen: 'Objekte Set objShell = WScript.CreateObject("Wscript.Shell") 'IP auf DHCP ändern objShell.Run "netsh interface ip set address name=""Ethernet"" dhcp" objShell.Run "netsh interface ip set dns name=""Ethernet"" dhcp Dies führt nun die gewünschte Änderung durch. Nicht schön, aber als Workaround für den Bedarf funktional. Nur mit der Fehlerbehandlung ist es nun natürlich so eine Sache, die ist nicht so einfach abzuwickeln. Zitieren Link zu diesem Kommentar
Empfohlene Beiträge
Schreibe einen Kommentar
Du kannst jetzt antworten und Dich später registrieren. Falls Du bereits ein Mitglied bist, logge Dich jetzt ein.