[VBS] Skript auf einem RemoteRechner ausführen lassen

[freakezoid1604]

Hallo erst mal


ich nutze fast das gleiche script, aber ich habe ein anderes problem ich möchte dieses script nur für eine bestimmte lan verbindung nutzen und nicht für alle. weis jemand wie ich das realisieren kann?

danke schon mal im voraus

gruß

freakezoid1604

Private Sub Command2_Click()
strComputer = "localhost"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
strIPAddress = Array("143.21.72.199")
strSubnetMask = Array("255.255.252.0")
strGateway = Array("143.21.72.1")
strGatewaymetric = Array(1)
For Each objNetAdapter In colNetAdapters
errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
If errEnable = 0 Then
Status.Caption = "The IP address has been changed."
Else
Status.Caption = "The IP address could not be changed."
End If
Next
End Sub

 

[DJBUNDI]

hello,

ich versteh nicht ganz deine frage! was möchtest du genau machen? oder hat sich dein Problem in der Zwischenzeit schon gelöst.?

greez
djbundi

 

[freakezoid1604]

Hallo erst mal

Leider ist mein Problem noch nicht gelöst.

Ich habe mehrere Lan Verbindungen unter anderem auch Vmware.
Dieses Script ändert bei allen Verbindungen die IP.Ich möchte aber z.B. nur die IP von der "LAN-Verbindung-1" von DHCP auf eine Statische IP wechseln, während die anderen noch DHCP bleiben.

Ich hoffe das ist jetzt so rüber gekommen wie ich das meine.

Gruß
freakezoid1604