[url=]网络初始化() //初始化网络环境 变量 ServerHandle=网络套接字(1) //创建流式(TCP)套接字 网络绑定(ServerHandle,9999) //开启了计算机的9999端口,供外界连接 网络**(ServerHandle,5) //**套接字,设置可连接数为5个 变量 rIP,SendTemp="客户端,你好,我是服务器",rRcvTemp 变量 ClientHandle=网络接受(ServerHandle,rIP)//这里程序会挂起等待,直到有客户端连接到来 网络发送(ClientHandle,SendTemp)//向指定客户端发送一串字符串 网络接收(ClientHandle,rRcvTemp) //接收从客户端发送的字串 messagebox(rRcvTemp) //打印从客户端接收的字串 网络关闭套接字(ClientHandle) //关闭套接字释放资源 网络关闭套接字(ServerHandle) //关闭套接字释放资源 网络关闭() //关闭网络环境释放资源 服务器端还用写IP吗? 好多不懂得地方! [/url] |
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) | Powered by Discuz! X3.1 |