tcp crashes when trying to connect

[Aiakonai 0]

When attempting to make a basic connection with tcp i received the following error

Line -1:

Error: "long_ptr","int_ptr and "short_port" DLLCall() types have been deprecated. Use "long*","int*" and "short*"

instead.

... I have no idea what causes this

the code is straight from the help files TCPRecv and TCPSend with only a modification on the send (I put in the correct IP address)... the sender in this case was a win2k computer and the receiver was a windows xp machine .. I don't know if that is part of the problem or not.

Any help is appreciated

[rambo3889 0]

it might be the dllcall in the _SocketToIP function which is in that code

here is an modded version i found in one of my scrpt :

Func SocketToIP($zSocket)
    Local $zSockaddr = DLLStructCreate("short;ushort;uint;char[8]")
    Local $aRet = DLLCall("Ws2_32.dll","int","getpeername","int",$zSocket, "ptr",DLLStructGetPtr($zSockaddr),"int*",DLLStructGetSize($zSockaddr))
    If Not @error And $aRet[0] = 0 Then
        $aRet = DLLCall("Ws2_32.dll","str","inet_ntoa","int",DLLStructGetData($zSockaddr,3))
        If Not @error Then $aRet = $aRet[0]
    Else
        $aRet = 0
    EndIf
    $zSockaddr = 0
    Return $aRet
EndFunc

[Aiakonai 0]

it might be the dllcall in the _SocketToIP function which is in that code

here is an modded version i found in one of my scrpt :

Func SocketToIP($zSocket)
    Local $zSockaddr = DLLStructCreate("short;ushort;uint;char[8]")
    Local $aRet = DLLCall("Ws2_32.dll","int","getpeername","int",$zSocket, "ptr",DLLStructGetPtr($zSockaddr),"int*",DLLStructGetSize($zSockaddr))
    If Not @error And $aRet[0] = 0 Then
        $aRet = DLLCall("Ws2_32.dll","str","inet_ntoa","int",DLLStructGetData($zSockaddr,3))
        If Not @error Then $aRet = $aRet[0]
    Else
        $aRet = 0
    EndIf
    $zSockaddr = 0
    Return $aRet
EndFunc

this seems to have cleared up the receiving end side problem but the sending computer popped up with a different error

TCPConnect failed with WSA error: 10060 ... sry nm it works fine ... It was the port number that I had changed ...

But that does bring up another ?

... how can I find a valid port number outside of the one listed in the help file?

Thank you so much for that info

[Kip 7]

basicly every port is ok, but you might want to choose a port which isn't listed here: http://www.iana.org/assignments/port-numbers