Script läuft auf meinem Rechner aber auf keinem anderen

Mitglied: Spyder

Spyder (Level 1) - Jetzt verbinden

01.09.2006, aktualisiert 13.10.2006, 4749 Aufrufe, 6 Kommentare

Hallo Leute,

habe hier ein Script welches auf meinem Rechner läuft(XP). Habe es auf anderen Rechnern probiert (win 2000 und XP), dort funktioniert es nicht.


Dim IP, SubNetMask, Ergebnis
Dim objServ, objAdapter

Const COMPUTER = ""
Const ADAPTERINDEX = "1"

Msgbox "IP-Adresse einstellen:"

IP = Array("xxx.xxx.xxx.xxx", "xxx.xxx.xxx.xxx")
SubNetMask = Array("255.255.255.0", "255.255.254.0")

Set objServ = _
GetObject("winmgmts://" & COMPUTER)
Set objAdapter = objServ.Get _
("Win32_NetworkAdapterConfiguration.index=" & ADAPTERINDEX)

Ergebnis = objAdapter.EnableStatic(IP, SubNetMask)

If Ergebnis = 0 Then
MsgBox "IP-Adresse(n) erfolgreich eingestellt."
Else
MsgBox "Fehler: " & Ergebnis
End If

Es kommt immer die Fehlermeldung: Fehler: 84

Kann mir jemand sagen was das bedeutet?
Oder hat jemand eine Idee warum es an meinem Rechner geht, und an anderen nicht?

Gruß Spyder
Mitglied: jarod1701
01.09.2006 um 18:48 Uhr
Hallo,

kann es sein, dass auf den anderen Rechner keine Netzwerkkarte mit dem Index "1" vorhanden ist ? Oder, was etwas wahrscheinlicher ist, dass zwar ein entsprechender Eintrag existiert, die zugehörige Karte (oder der virtuelle Adapter) nicht "IPEnabled" ist ?


mfg,
Kevin
Bitte warten ..
Mitglied: Guenni
01.09.2006 um 21:05 Uhr
@Spyder

Hi,

Oder hat jemand eine Idee warum es an meinem Rechner geht, und an anderen nicht?

Ein Grund "könnte" sein:

Du hast dein Script mit einer Entwicklungsumgebung erstellt, z.B. VB, die
auf deinem PC installiert ist.

Jetzt kopierst du dein Script auf einem PC, auf dem diese Entwicklungsumgebung
NICHT installiert ist.

Also fehlen dem Script wahrscheinlich einige Bibliotheken, DLL's, auf die dein
Script auf deinem PC zurückgreifen kann, aber NICHT ein anderer PC.

Gruß
Günni
Bitte warten ..
Mitglied: jarod1701
01.09.2006 um 21:40 Uhr
Halte ich für unwahrscheinlich. Das einzige, was außer reinem VBScript noch verwendet wird ist WMI, und solange der zugehörige Dienst läuft, läuft auch WMI.
Bitte warten ..
Mitglied: Biber
02.09.2006 um 13:02 Uhr
Moin Spyder,

Der Fehler 84 ist "IP ist auf dem Adapter nicht aktiviert."

Ich würde das Script so ändern, wie es z.B. hier bei M$ skizziert ist.


...wobei das Wesentliche diese Einschränkung ist:
("Select * from Win32_NetworkAdapterConfiguration Where IPEnabled=True")

Deine "Prüfung" Set objAdapter = objServ.Get("Win32_NetworkAdapterConfiguration.index=" & ADAPTERINDEX) jedenfalls ist wirklich keine Garantie dafür, dass es auf irgendeinem anderen Rechner läuft.

Gruß
Biber
Bitte warten ..
Mitglied: Spyder
13.10.2006 um 16:58 Uhr
Leider Antworte ich erst jetzt. Aber es hat funktioniert.

Gruß Spyder
Bitte warten ..
Mitglied: Biber
13.10.2006 um 18:02 Uhr
Moin, Spyder,

freut mich trotzdem, Deine Rückmeldung.
Kannst Du als Threadowner bitte Deine Frage auf "Gelöst" setzen?

Danke und schönes Wochenende

Biber
Bitte warten ..
Heiß diskutierte Inhalte
Sicherheit
Verpackter Laptop entwendet
r0x3llVor 1 TagFrageSicherheit11 Kommentare

Hallo. Mir wurde aus dem Büro ein noch verpackter Dell XPS Laptop mit einem Wert von ca 3.500€ gestohlen. Kann man da was orten? ...

Windows 10
Netzwerkzugriff intern extern blockiert nach Aufbau NordVPN Verbindung
gelöst Slavik-10Vor 1 TagFrageWindows 1030 Kommentare

hallo Leute, ich habe mir vor kurzem ein VPN Anbieter bestellt. Das Problem an der ganzen Sache ist, sobald eine VPN Verbindung zu einem ...

Off Topic
Namenskonzept Kundengeräte
bitnarratorVor 1 TagFrageOff Topic5 Kommentare

Hallo, ich möchte gerne einmal die Diskussion anstoßen, weil ich eine hier in diese Richtung noch nichts gefunden habe. Es geht um die Bennenung ...

Netzwerkgrundlagen
Router für neues Heimnetzwerk - was will man 2021 haben?
billy01Vor 1 TagFrageNetzwerkgrundlagen7 Kommentare

Guten Abend zusammen, nachdem sich bei mir viel getan hat, stehe ich nun vor einem Umzug und dem Neuaufbau meines Heimnetzwerkes. Also weg von ...

Windows Server
Kein Internetzugriff bei einem Domänenclient
KerberoVor 1 TagFrageWindows Server15 Kommentare

Hallo community, ich habe ein ganz komisches Verhalten eines Clients bei mir. Ich habe eine kleine Domäne (6 Clients und ein Windows Server 2016 ...

LAN, WAN, Wireless
2x Fritzbox 7590 mit separatem DSL über WAN verbinden
gelöst FailixVor 21 StundenFrageLAN, WAN, Wireless19 Kommentare

Liebes Administrator Forum, Ich bin schon länger passiver Lese und habe mich jetzt entschlossen mit einer Frage den ersten Post hier zu schreiben. Über ...

Off Topic
Wie sieht eine korrekte IT-Organisation aus?
imebroVor 3 StundenFrageOff Topic17 Kommentare

Hallo, da unser IT-Verantwortlicher ja vor einem Jahr gehen musste, stelle ich mir die Frage, wie denn eine korrekte IT-Organisation überhaupt aussehen muss. Zur ...

LAN, WAN, Wireless
Cat 7 Patchkabel mit nur 11MBits im Download
gelöst RickHHVor 18 StundenFrageLAN, WAN, Wireless7 Kommentare

Moin zusammen, ich habe mir soeben ein paar Patchkabel (aus einem Cat 7 Kabel) fertig gemacht. Die Belegung ist: 1 weiß/grün 2 grün 3 weiß/orange 4 blau 5 weiß/blau ...