Top-Themen

Aktuelle Themen (A bis Z)

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 Wie kann ich über VB-Script das Gateway ändern?

Mitglied: Spyder

Spyder (Level 1) - Jetzt verbinden

15.08.2006, aktualisiert 20.04.2010, 9501 Aufrufe, 2 Kommentare

Hallo,

wie oben der Titel schon sagt, möchte ich über ein VB-Script das Gateway ändern.
Hab auch schon was zusammengebastelt. Die IP-Adressen stellt er mir ja ein, nur der Gateway will nicht.
01.
'############################################# 
02.
Dim IP, SubNetMask, Gateway, Metric, Ergebnis 
03.
Dim objServ, objAdapter 
04.
 
05.
Const COMPUTER = "." 
06.
Const ADAPTERINDEX = "1" 
07.
 
08.
Set objServ = _ 
09.
GetObject("winmgmts://" & COMPUTER) 
10.
Set objAdapter = objServ.Get _ 
11.
    ("Win32_NetworkAdapterConfiguration.index=" & ADAPTERINDEX) 
12.
 
13.
IP = Array("192.168.0.1") 
14.
SubNetMask = Array("255.255.255.0") 
15.
 
16.
Ergebnis = objAdapter.EnableStatic(IP, SubNetMask) 
17.
 
18.
If Ergebnis = 0 Then 
19.
    Gateway = Array("192.168.0.254") 
20.
    Metric = Array("1") 
21.
    Ergebnis = objAdapter.SetGateway(Gateway, Metric) 
22.
 
23.
    If Ergebnis = 0 Then 
24.
        MsgBox "IP-Adresse(n) und Gateway(s) erfolgreich eingestellt." 
25.
    Else 
26.
        MsgBox "Fehler bei der Einstellung des Gateways: " & Ergebnis 
27.
    End If 
28.
Else 
29.
    MsgBox "Fehler bei der Einstellung der IP-Adresse: " & Ergebnis 
30.
End If 
31.
'##################################################
Leider bekomme ich die Meldung. Das object unterstützt diese Eigenschaft oder Methode nicht: SetGateway.

Ich komme hier nicht weiter. kann mir einer helfen?

Gruß Spyder

[Edit Biber] Nur Codetags nachgezogen [/Edit]
Mitglied: MonsterX
15.08.2006 um 12:54 Uhr
Vielleicht hilft dir das weiter:

http://www.cruto.com/resources/vbscript/vbscript-examples/network/clien ...

//edit

Ich glaub ich hab deinen Fehler gefunden: Es heißt nicht "SetGateway", sondern "SetGateways". Mehrzahl, nicht Einzahl.

Gruß,
Denis
Bitte warten ..
Mitglied: Spyder
15.08.2006 um 14:19 Uhr
Danke!!!! Das wars! Prima. *freu*
Dann steht das in dem sch Buch falsch drinne

Gruß Spyder
Bitte warten ..
Ähnliche Inhalte
VB for Applications

VB-Script in VB-Script starten und Parameter übergeben

gelöst Frage von denkisVB for Applications7 Kommentare

Hallo liebe Scriptgemeinde, ich muss mehrere Rechner für den Übergang in eine neue Domäne vorbereiten. Dafür sind drei wesentliche ...

Batch & Shell

Probleme bei der Ausführung eines VB-Scriptes

Frage von AuricGoldfingerBatch & Shell1 Kommentar

Hallo zusammen, ich habe folgendes Script geschrieben: Leider bekomme ich bei der Ausführung den Fehler Was mache ich falsch?? ...

Windows Server

Drucker entfernen in VB-Script

gelöst Frage von NilsvLehnWindows Server2 Kommentare

Hallo ich habe eine kleine Frage bzgl. unseres Anmeldeskriptes. Ich habe ein IT-netzwerk an einer Uni übernommen. Ich arbeite ...

Entwicklung

VB Script Drucker hinzufügen

Frage von Marcel1989Entwicklung3 Kommentare

Funktionsweise sollte definitiv sein das mit einem Script sich 2 verschiedene Betriebssysteme ein und denselben Drucker holen. Mein Script ...

Neue Wissensbeiträge
Sonstige Systeme
Es war einmal ein BeOS - Wer erinnert sich noch?
Information von BassFishFox vor 2 TagenSonstige Systeme5 Kommentare

Hallo, Bin gerade ueber Haiku gestolpert, von dessen Existenz als "Nachfolger des BeOS" ich wusste nur mich nie wirklich ...

Datenschutz

Microsoft und DSGVO - ob das wohl jemals klappt (Probleme beim Datenabfluss für Office Pro Plus)?

Tipp von VGem-e vor 2 TagenDatenschutz3 Kommentare

Servus Kollegen, siehe Aber wer setzt schon MS Office Pro Plus ein? Wie dann der Stand beim "normalen" MS ...

Windows 10

Macht Windows 10.1809 Probleme mit gemappten Netzlaufwerken (betrifft wohl insbes. AMD-Hardware und Trend Micro AV-Produkte)?

Tipp von VGem-e vor 2 TagenWindows 103 Kommentare

Moin Kollegen, grad dazu gefunden und Hatten wir dies nicht bei früheren W10-Upgrades ebenfalls? Da bleibt nur, das Upgrade ...

Humor (lol)

Das neue Miniatur Wunderland OFFICIAL VIDEO - worlds largest model railway - railroad

Information von StefanKittel vor 2 TagenHumor (lol)2 Kommentare

Hallo, wer noch nie im Miniatur Wunderland war, sollte es dringend mal nachholen. Es gibt eine neues Video. Viele ...

Heiß diskutierte Inhalte
Exchange Server
Outlook findet Postfach nicht
Frage von MaximaxExchange Server13 Kommentare

Hallo, und zwar haben wir auf der Arbeit ein kleines (großes) Exchange 2016 Problem. Exchange meldete gestern, dass die ...

Microsoft
Schulungs-Microsoft-Konten zentral verwalten
Frage von thejarneMicrosoft9 Kommentare

Hallo zusammen, wir haben bei uns in der Firma 12 Computer-Arbeitsplätze für EDV-Schulungen, wo u.A. auch Computer-Basics-Kurse (wie verwende ...

Windows 10
TeamViewer bzw. AnyDesk - Schwarzes Fenster
Frage von Questionmark93Windows 108 Kommentare

Hallo, hat schon jemand Erfahrung gemacht mit Teamviewer und Anydesk? Mir zeigt es bei einem Bekannten ein schwarzes Fenster ...

Windows Server
Cisco Annyconnect Secure Mobility Client - Windows2003 Server unable to connect
Frage von novregenWindows Server8 Kommentare

Von einem Windows 2003 Server soll eine Verbindung über Cisco Anyconnect Mobility Client zu einer Gegenstelle aufgebaut werden. Die ...