| ||
Dieser Befehl schließt eine TCP/IP-Verbindung, die mit OPENTCPSTREAM geöffnet wurde. OPENTCPSTREAM liefert einen Wert, der zusammen mit CLOSETCPSTREAM benutzt werden muss. Durch eine TCP/IP-Verbindung kann nicht nur auf ein lokales Netzwerk, sondern auch auf das Internet zugegriffen werden! | ||
Parameter | ||
Stream = Identität des Streams (ermittelt mit OPENTCPSTREAM) | ||
Rückgabewert | ||
- | ||
Beispiel | ||
Dieses Programm demonstriert die Kommunikation zwischen zwei Programmen mittels einer Netzwerkverbindung. Das Programm besteht aus zwei Teilen, die nur in zwei Programm-Instanzen gestartet werden können: Erstes Programm: svrGame=CREATETCPSERVER(8080) IF svrGame<>0 THEN PRINT "Server erfolgreich gestartet" ELSE PRINT "Server konnte nicht gestartet werden" END END IF WHILE NOT KEYHIT(1) strStream=ACCEPTTCPSTREAM(svrGame) IF strStream THEN PRINT READSTRING$(strStream) DELAY 2000 END ELSE PRINT "Keine Daten mehr..." DELAY 1000 END IF WEND CLOSETCPSERVER svrGame END Zweites Programm: strmGame=OPENTCPSTREAM("127.0.0.1",8080) IF strmGame<>0 THEN PRINT "Client erfolgreich verbunden" ELSE PRINT "Konnte keine Verbindung herstellen" WAITKEY END END IF WRITESTRING strmGame,"Dieser Text wird übermittelt..." PRINT "Daten gesendet..." CLOSETCPSTREAM strmGame END | ||
Siehe auch | ||
CLOSETCPSERVER, CLOSEUDPSTREAM, CREATETCPSERVER, CREATEUDPSTREAM, OPENTCPSTREAM |