Ermitteln des aktiven Netzwerkinterfaces
Hi,
geht um das ermitteln des aktiven Netzwerkinterfaces um automatisiert mit netsh auf diesem Interface Änderungen vorzunehmen.
Entsprechendes Script habe ich mir aus dem Forum geangelt:
http://www.benutzer.de/Name_der_aktiven_Netzwerkkarte(n)_ermiteln.html
Script wie folgt:
Jetzt bräuchte ich das Script aber unter Windows7 und meine Freunde aus dem Hause Redmond haben folgende Zeile:
leider unbrauchbar gemacht. Den Eintrag "IpCheckingEnabled" gibt es unter Windows7 nicht mehr
Irgend jemand ne andere Idee oder Lösung für mich?
Danke euch!
Gruß
Torsten
geht um das ermitteln des aktiven Netzwerkinterfaces um automatisiert mit netsh auf diesem Interface Änderungen vorzunehmen.
Entsprechendes Script habe ich mir aus dem Forum geangelt:
http://www.benutzer.de/Name_der_aktiven_Netzwerkkarte(n)_ermiteln.html
Script wie folgt:
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
strCheckName = "IpCheckingEnabled"
strValueName = "Name"
Set WShell = CreateObject("WScript.Shell")
Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}"
oReg.EnumKey HKEY_LOCAL_MACHINE, strKeyPath, arrSubKeys
For Each subkey In arrSubKeys
strRegKey = "SYSTEM\CurrentControlSet\Control\Network\{4D36E972-E325-11CE-BFC1-08002BE10318}\"
strKeyPath = strRegKey & subkey & "\Connection"
oReg.GetDWORDValue HKEY_LOCAL_MACHINE, strKeyPath, strCheckName, strValue
If strValue <> "" Then
oReg.GetStringValue HKEY_LOCAL_MACHINE, strKeyPath, strValueName, strValue
Wscript.Echo strValue
BefehlDNS = "netsh interface ip set dns name=" & Chr(34) & strValue & Chr(34) &" addr=10.4.10.3 source=static register=PRIMARY"
'Wscript.Echo BefehlDNS
WShell.run BefehlDNS
End If
Next
Wscript.Echo "Done!"
Jetzt bräuchte ich das Script aber unter Windows7 und meine Freunde aus dem Hause Redmond haben folgende Zeile:
strCheckName = "IpCheckingEnabled"
leider unbrauchbar gemacht. Den Eintrag "IpCheckingEnabled" gibt es unter Windows7 nicht mehr
Irgend jemand ne andere Idee oder Lösung für mich?
Danke euch!
Gruß
Torsten
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 129297
Url: https://administrator.de/contentid/129297
Ausgedruckt am: 05.11.2024 um 13:11 Uhr
2 Kommentare
Neuester Kommentar