test

Func CheckProxy($ThisIP)

    _FileReadToArray ( "C:\Adminmap\Proxy.txt" )
    $ProxyArray = FileReadToArray ( "C:\Adminmap\Proxy.txt" )
    $PROXYIDX = -1
    For $_i = 0 To UBound($ProxyArray) -1
        If StringInStr($ProxyArray[$_i],@TAB & $ThisIP & @TAB) Then
            $_found = $_i
            ExitLoop
        EndIf
    Next

    If $PROXYIDX = -1 Then
        $VPN = _Inetgetsource.......
        ......
        ....
        .....
        ....
    Else
        $TMPPROXY = StringSplit........
        ......
    EndIf

    Return $VPN

EndFunc