Hjælp til lgin script

Ingen der kan Hjælpe ????

Mener du ikke den 4 oktet?

strIP = "192.168.2.123"
arrOkteter = Split(strIP, ".")

str4Oktet = arrOkteter[3];

MsgBox(str4Oktet)

//>Rune

Hey Lauritz !
Du kan i forbindelse med Runes indlæg hente oktet-en på flg. måde :

Set IPConfigSet = GetObject("winmgmts:{impersonationLevel=impersonate}!//localhost").ExecQuery("select IPAddress from Win32_NetworkAdapterConfiguration where IPEnabled=True")
For each IPConfig In IPConfigSet
    Strip = IPConfig.IPAddress(i)
next
StrOck = Split(Strip, ".")
StrOktet = Strock(3) 
msgbox StrOktet

/Killer

Jeg har mange gange gjort det at jeg i stedet har kigge på variablen %LOGONSERVER% så kan jeg jo se hvilken domain controller de er logget på, og så afgør jeg ud fra det hvilken server jeg vil installere software fra.

Du kan hente den variabel via følgende script:

Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
LOGONSERVER = WshShell.ExpandEnvironmentStrings("%LOGONSERVER%")
WshShell.Popup LOGONSERVER

Set WshShell = Nothing