UDP

Übersicht

BlitzMax, BlitzMax NG

Beginners-Corner

	dimaster Betreff: UDP	Fr, Aug 04, 2006 16:52 Antworten mit Zitat
hi ich hab mich ma n bisel mit sockets beschäftigt und dabei einen versuch(siehe unten) gemacht funzt aber net... was is falsch daran? Server: Code: [AUSKLAPPEN] [EINKLAPPEN] Local socket:Tsocket=CreateUDPSocket() BindSocket(socket, 666) SocketListen(socket) For Local ips=EachIn HostIps("") ip=ips Next Repeat receivesocket:TSocket = SocketAccept(socket) stream:TStream = CreateSocketStream(receivesocket) Until receivesocket <> Null Repeat If stream<>Null Then While Not Eof(stream) Local line:String = ReadLine(stream) If line<>"" Then Print line Wend EndIf Until KeyHit(1) CloseSocket(socket) Client: Code: [AUSKLAPPEN] [EINKLAPPEN] socket:Tsocket=CreateUDPSocket() stream=CreateSocketStream(socket) ConnectSocket(socket,-1322331262,666) WriteLine Stream, "Test" CloseSocket(socket) mfg dimaster

dimaster

Betreff: UDP

Fr, Aug 04, 2006 16:52
Antworten mit Zitat

hi

ich hab mich ma n bisel mit sockets beschäftigt und dabei einen versuch(siehe unten) gemacht funzt aber net... was is falsch daran?

Server:
Code: [AUSKLAPPEN]

Local socket:Tsocket=CreateUDPSocket()
BindSocket(socket, 666)
SocketListen(socket)

For Local ips=EachIn HostIps("")
ip=ips
Next

Repeat
receivesocket:TSocket = SocketAccept(socket)
stream:TStream = CreateSocketStream(receivesocket)

Until receivesocket <> Null

Repeat

If stream<>Null Then

While Not Eof(stream)
Local line:String = ReadLine(stream)
If line<>"" Then Print line
Wend
EndIf

Until KeyHit(1)

CloseSocket(socket)

Client:
Code: [AUSKLAPPEN]

socket:Tsocket=CreateUDPSocket()

stream=CreateSocketStream(socket)
ConnectSocket(socket,-1322331262,666)

WriteLine Stream, "Test"

CloseSocket(socket)

mfg dimaster

Zuletzt bearbeitet von dimaster am Fr, Aug 04, 2006 20:03, insgesamt einmal bearbeitet

	FOODy	Fr, Aug 04, 2006 17:52 Antworten mit Zitat
SocketAccept geht sowieso nur mit TCP. Ausschnitt aus der Help: Zitat: [...] Information: The specified socket must be a TCP socket, and must be listening.