Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

IP-Adresse remote ändern per script

Frage Entwicklung VB for Applications

Mitglied: Rauser

Rauser (Level 1) - Jetzt verbinden

06.03.2008, aktualisiert 11:12 Uhr, 10456 Aufrufe, 2 Kommentare

Hallo,

wir führen bei unserer Firma ein ReIP durch. Dazu müssen wir die statischen IP-Adressen auf allen Servern ändern.
Um sich jetzt nicht mit jedem Server (Anzahl > 100) remote zu verbinden und dann die IP-Adresse zu ändern, habe ich ein WMI script erstellt, mit dem man die IP-Adresse remote ändern kann. Dazu gab es auch entsprechende Vorlangen im Netz.
Funktioniert soweit auch alles gut. Das Problem ist jedoch, dass man ja nach der IP-Änderung die Verbindung zum Server verliert und das Script sich dadurch nicht mehr korrekt beendet. (Lässt sich dann nur noch mit Strg C abbrechen)
Hat jemamd eine Idee, wie man das Script nach Verbindungsabbruch noch automatisch beenden kann? Timeout über cscript hat nicht funktioniert... Schon mal Danke!

Das Script sieht für die IP-Änderung folgendermaßen aus:
01.
***************************************************************** 
02.
'Änderung der DNS-, WINS-Server, Default Gateway und IP-Adresse 
03.
'Parameter übergeben (als Administrator) 
04.
'Eingabe über cmd -> "cscript //Nologo  script.vbs alte_IP neue_IP" 
05.
 
06.
strComputer = Wscript.Arguments(0) 
07.
strComputer1 = Wscript.Arguments(1) 
08.
 
09.
 
10.
'IP-Adresse und Gateway festlegen 
11.
On Error Resume Next 
12.
 
13.
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") 
14.
    Set colNetAdapters = objWMIService.ExecQuery ("Select * from Win32_NetworkAdapterConfiguration " & "where IPEnabled=TRUE ") 
15.
    strIPAddress = Array(strComputer1) 
16.
    strSubnetMask = Array("255.255.252.0") 
17.
    strGateway = Array("192.168.x.y") 
18.
    strGatewayMetric = Array(1) 
19.
          
20.
    For Each objNetAdapter in colNetAdapters 
21.
        If Not IsNull(IPConfig.IPAddress) Then 
22.
            For i= LBound(IPConfig.IPAddress) to UBound(IPConfig.IPAddress) 
23.
                if objNetAdapter.IPAddress(i) = strComputer Then 
24.
                    WScript.Echo objNetAdapter.IPAddress(i) 
25.
                    WScript.Echo strComputer 
26.
                    errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric) 
27.
                    errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)             'HIER WIRD IP GEÄNDERT!!!! 
28.
                end if 
29.
            Next 
30.
        End if 
31.
    Next 
32.
    
Mitglied: Rauser
06.03.2008 um 10:53 Uhr
Hat sich erledigt.
Problem tritt nicht auf, wenn man das script über wscript startet. #
Also anstelle von cscript Nologo script.vbs alte_IP neue_IP
wscript
Nologo script.vbs alte_IP neue_IP verwenden
Bitte warten ..
Mitglied: TuXHunt3R
06.03.2008 um 11:12 Uhr
Kannst du den Beitrag dann noch auf "Gelöst" setzen?
In den "Häufigen Fragen" steht, wies geht.
Bitte warten ..
Ähnliche Inhalte
UMTS, EDGE & GPRS
gelöst IP Adresse im Mobilfunknetz bei Geräte-Diebstahl (7)

Frage von Jordi zum Thema UMTS, EDGE & GPRS ...

Exchange Server
Outlook Web Access auf IP Adresse beschränken (6)

Frage von touro411 zum Thema Exchange Server ...

DNS
gelöst Zugriff auf Netzlaufwerk nur über IP-Adresse möglich (18)

Frage von standard zum Thema DNS ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(38)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Heiß diskutierte Inhalte
Festplatten, SSD, Raid
POS Hardware und alternativen zu Raid 1? (21)

Frage von Brotkasten zum Thema Festplatten, SSD, Raid ...

Viren und Trojaner
Verschlüsselungstrojaner simulieren (18)

Frage von AlbertMinrich zum Thema Viren und Trojaner ...

Ubuntu
Nextcloud 12 Antivirus App for Files (8)

Frage von horstvogel zum Thema Ubuntu ...

Server-Hardware
gelöst Empfehlung KVM over IP Switch (8)

Frage von Androxin zum Thema Server-Hardware ...