Resolve hostname No-ip

[autoitxp]

I am using port forward service at NO-IP which redirects port aswell how i can resolve host name to ip using NO-IP service thanks

TCPNameToIP is not working for me any other solution?

[guinness]

Do they have an API?

[mrflibblehat]

Works for me.

TCPStartup()

   ConsoleWrite(TCPNameToIP("www.google.com") & @CRLF)
   
TCPShutdown()

They also have an API, You just need to send a POST Request

http://www.noip.com/integrate/

Edited May 15, 2013 by mrflibblehat

[guinness]

WinHttp is the way to go if you want to use the API.

Edited May 15, 2013 by guinness

[autoitxp]

how to use WinHttp with no-ip Api ?

Is it possible to just resolve hostname and get ip rather then using api and posting data ?

yes i already tryed above code which is showing other non redricted ip address

Edited May 15, 2013 by autoitxp

[guinness]

Well firstly did you try mrflibblehat's code? If that doesn't work, read, read, read. trancexx and ProgAndy have documented the functions with plenty of examples, so there is no excuse to say there is nothing to help you with WinHttp.

[autoitxp]

i am try to get location in headers but failing

i found page 302 in header bec it redirect page how i can get location ?

HTTP/1.1 302 Found
Date: Thu, 16 May 2013 04:43:17 GMT
Server: Apache/2.2.3 (CentOS)
X-Powered-By: PHP/5.1.6
Location: http://xxx.xxx.xxx.xxx:89
Content-Length: 0
Connection: close
Content-Type: text/html; charset=UTF-8

Opt("MustDeclareVars", 1)

HotKeySet("{ESC}", "_Quit")

Local $url, $WinHttpReq, $oErr, $headerLM, $headerD,$HTMLSource

$WinHttpReq = ObjCreate("winhttp.winhttprequest.5.1")
$oErr = ObjEvent("AutoIt.Error", "_ErrorHandler")

While 1
    $url = 'http://xxxx.no-ip.org'
    $WinHttpReq.open("HEAD",$URL)
    $WinHttpReq.send()
    $headerD = $WinHttpReq.GetResponseHeader('Location')
    ConsoleWrite("Location: " & $headerD & @CRLF)
    Sleep(500)
WEnd

Func _Quit()
    Exit
EndFunc

Func _ErrorHandler()
    ConsoleWrite($oErr.description & @CRLF)
EndFunc

Edited May 16, 2013 by autoitxp

[mrflibblehat]

using your example

$vString = ("HTTP/1.1 302 Found" & _
            "Date: Thu, 16 May 2013 04:43:17 GMT" & _
            "Server: Apache/2.2.3 (CentOS)" & _
            "X-Powered-By: PHP/5.1.6" & _
            "Location: http://255.255.255.255:89" & _
            "Content-Length: 0" & _
            "Connection: close" & _
            "Content-Type: text/html; charset=UTF-8" )

$vRegEx = StringRegExp($vString, "((?:\d{1,3}\.){3}\d{1,3})", 3)

ConsoleWrite($vRegEx[0])

Edited May 16, 2013 by mrflibblehat

[autoitxp]

well i worked so far this works for me if u find any problem let me know this resolve HOST NAME TO IP properly now

expandcollapse popup

Opt("MustDeclareVars", 1)
HotKeySet("{ESC}", "_Quit")



Global $sNewLocation, $WinHttpReq, $oErr, $oHTTP, $oHTTPNameToIp

TCPStartup()


$WinHttpReq = ObjCreate("winhttp.winhttprequest.5.1")
$oErr = ObjEvent("AutoIt.Error", "_ErrorHandler")


While 1

    $oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
    $oHTTP.Option(6) = False ;WinHttpRequestOption_EnableRedirects
    $oHTTP.Open('GET', 'http://google.com')
    $oHTTP.Send()
    $oHTTP.WaitForResponse
    $sNewLocation = $oHTTP.GetResponseHeader('Location')
    Global $oHTTPStringRep[3] = ['/', 'http:', 'www.']
    For $i = 0 To UBound($oHTTPStringRep) - 1
        $sNewLocation = StringReplace($sNewLocation, $oHTTPStringRep[$i], '')
    Next

    $sNewLocation = StringSplit($sNewLocation, ':') ; if port then split and erase

    If UBound($sNewLocation) > 0 Then
        If $sNewLocation[1] <> '' Then
            $oHTTPNameToIp = TCPNameToIP($sNewLocation[1])
            If Not @error Then
                ConsoleWrite($oHTTPNameToIp & @LF)
            EndIf
        EndIf
    EndIf

    Sleep(500)
WEnd


Func _Quit()
    TCPShutdown()
    Exit
EndFunc   ;==>_Quit


Func _ErrorHandler()
    ; ConsoleWrite($oErr.description)
EndFunc   ;==>_ErrorHandler