局域网聊天的问题

jeaman

我想实现在局域网上的A机器和B机器聊天，但是A机器和B机器之间无法建立连接。
以下的做法是否正确？
在A机器上用TCPListen(@IPAddress1,65432)创建一个套接字(socket)监听，B机器用TCPConnect( $Server_IP,65432 )连接。（$Server_IP为A机器的IP。）
但是发现B机器连接不上A机器。@error的值为10061

服务端（A机器）
[au3]
;服务器的IP
$g_IP = "192.168.1.1"

TCPStartUp()

$MainSocket = TCPListen($g_IP, 65432,  100 )
If $MainSocket = -1 Then Exit
While 1
$ConnectedSocket = TCPAccept( $MainSocket)
If $ConnectedSocket >= 0 Then
    msgbox(0,"", "我的服务器 - 客户端已经连接")
    exit
EndIf
Wend
[/au3]

客户端（B机器）
[au3]
$Server_IP = "192.168.1.1"

TCPStartUp()

$socket = TCPConnect( $g_IP, 65432 )
If $socket = -1 Then Exit
[/au3]

[ 本帖最后由 jeaman 于 2008-6-19 13:26 编辑 ]

zjg2003

客户端（B机器）

The au3 Code:
关于插件打印代码保存代码复制代码普通浏览
$Server_IP = "192.168.1.1"

TCPStartUp()

$socket = TCPConnect( $Server_IP, 65432 )
If $socket = -1 Then Exit


这样就可以，刚好这几天在看这个东西，发现你这个，也让我明白了一些

ueiayz

我现在也需要这方面的资料

bbip

这个还有点难啊

yongyuan527

这也可以？飞鸽行不！

kodin

论坛有相应源码，善用搜索。