Hay
Here is the whole script as of now:
mmmh my mistake ($DhcpIPAddress,10,14) but if i set 14 to 3 it still does not work...
$IPinterface = ENUMKEY("$HKLM\System\CurrentControlSet\Services\Tcpip\Parameters\Interfaces", $Index)
Loop while not end of index.
; While @ERROR <> "259"
; $IPinterface = ENUMKEY("$HKLM\System\CurrentControlSet\Services\Tcpip\Parameters\Interfaces", $Index)
; ? ? "IPinterface = $IPinterface"
;
; If @ERROR = 259 Goto EndLoop Endif
;
; $Index = $Index + 1
; $DhcpIPAddress=ReadValue("$HKLM\System\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\$IPinterface","DhcpIPAddress")
; $RASsub = Ltrim(Substr($DhcpIPAddress,10,3))
; ? "RASsub = _ $RASsub _"
;
; $RASip = Ltrim(Substr($DhcpIPAddress,1,8))
; ? "RASip = _ $RASip _"
;
; If $RASip = "10.252.1"
; If ($RASsub>=1 and $RASsub<=39)
; $Done = "1"
; Goto EndLoop
; Endif
; Endif
; Loop
;
; :EndLoop
;Loop
_________________________
greetz dm330, from the Netherlands
