马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
自己是小白,抄了青衣老师的网络通信的代码,
网络通信分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"))
功能结束
空间结束
|