TC官方合作论坛

标题: 求大神帮忙解决一下网络通信的问题 [打印本页]

作者: 天生的叛逆者 时间: 2014-7-12 05:11
标题: 求大神帮忙解决一下网络通信的问题
自己是小白，抄了青衣老师的网络通信的代码，

网络通信分2个脚本，脚本1服务器，脚本2客户端，
方法1
正常情况下，我们先开启脚本1服务器，在开启脚本2客户端，
就可以链接上了，可以正常通信。
方法2
服务器开启，客户端也开启，链接正常，如果把客户端退出，在重新开启客服端，在去链接服务器就链接不上了，
（补充说明，客服端一直在开启，没有关闭）
请大神，给如何写代码
//--------------------------------脚本1----服务器
空间网络通讯
//默认空间
客户端套接字句柄,服务器套接字句柄

功能服务端通信()
客户端套接字句柄=0,对方IP=0
网络.初始化()
服务器套接字句柄=网络.套接字(1)
网络.绑定(服务器套接字句柄,9999)
网络.**(服务器套接字句柄,5)

客户端套接字句柄=网络.接受(服务器套接字句柄,对方IP)//如果,没有客户端连接过来,会一直卡在这里

辅助.等待(50)

辅助.消息框("对方IP;"&对方IP)
功能结束
//开始按钮_点击操作
功能开始_点击()
线程.开启("网络通讯.服务端通信","")
功能结束

//退出按钮_点击操作
功能退出_点击()
网络.关闭套接字(服务器套接字句柄)
辅助.退出()

功能结束

功能按钮0_点击()
//这里添加你要执行的代码
接收到的内容
网络.接收(客户端套接字句柄,接收到的内容)
编辑框.设置文本("编辑框0",接收到的内容)
功能结束

功能按钮1_点击()
//这里添加你要执行的代码

网络.发送(客户端套接字句柄,编辑框.获得文本("编辑框1"))
功能结束

空间结束
//空间结束语句

//--------------------------------脚本2-----客户端--------------------------
空间网络通讯2
//默认空间
客户端套接字句柄
//开始按钮_点击操作
功能开始_点击()
网络.初始化()
客户端套接字句柄=网络.套接字(1)
网络.连接(客户端套接字句柄,编辑框.获得文本("编辑框0"),9999)
辅助.消息框("已连接到服务器,您可以执行其他操作了","提示:")
功能结束

//退出按钮_点击操作
功能退出_点击()
网络.关闭套接字(客户端套接字句柄)
辅助.退出()
功能结束

功能按钮1_点击()
//这里添加你要执行的代码
接收到的数据
网络.接收(客户端套接字句柄,接收到的数据)
编辑框.设置文本("编辑框2",接收到的数据)
功能结束

功能按钮0_点击()
//这里添加你要执行的代码
网络.发送(客户端套接字句柄,编辑框.获得文本("编辑框1"))
功能结束

空间结束

作者: 250366688 时间: 2014-7-12 06:16
客户端套接字句柄=网络.接受(服务器套接字句柄,对方IP)//如果,没有客户端连接过来,会一直卡在这里错误在这里这里应该是个white语句，你这么写连接完了第一次以后，就不会再接受其他连接，用线程开启写成循环就好了

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)