TCP PROBLEM

[dnsi 0]

Does anyone know how to detect the clients ip.

Lets say that you were the server and a client connected to your server. The client is unknow. Is there any function in autoit that alow you to see there port and port???

VB has a function where it is:

Winsockcontrol.remoteHostIP

Winsockcontrol.remotePort

ANyone???

[Helge 1]

Included in the example-code for TCPRecv :

Func SocketToIP($SHOCKET)
    Local $sockaddr = DLLStructCreate("short;ushort;uint;char[8]")

    Local $aRet = DLLCall("Ws2_32.dll","int","getpeername","int",$SHOCKET, _
            "ptr",DLLStructGetPtr($sockaddr),"int_ptr",DLLStructGetSize($sockaddr))
    If Not @error And $aRet[0] = 0 Then
        $aRet = DLLCall("Ws2_32.dll","str","inet_ntoa","int",DLLStructGetData($sockaddr,3))
        If Not @error Then $aRet = $aRet[0]
    Else
        $aRet = 0
    EndIf

    $sockaddr = 0

    Return $aRet
EndFunc

[dnsi 0]

Thanks Man