TC官方合作论坛

 找回密码
 立即注册
查看: 75|回复: 2

[源码分享] 中控笔记。局域网,服务端和客户端的实现

[复制链接]
发表于 2019-12-1 22:37:27 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
本帖最后由 剑仙十号 于 2019-12-12 11:40 编辑

中控笔记。局域网,服务端和客户端的实现

按F1_帮助文档, 1.api详解, 18.网络
一、套接字_服务器实现流程
    //建立客户端与服务器的链接
    //1 网络初始化()->(创建)网络套接字()->网络绑定()->网络监*()->网络接受()

    //服务器与客户端通信
    //2 发送数据: 网络发送()/ 网络接收()
    //  发送文件: 网络发送文件()/ 网络接收文件()

    //3 网络关闭套接字(客户端套接字)/ 网络关闭套接字(服务器套接字)

    // 网络关闭()

二、套接字_客户端实现流程
    //建立客户端与服务器的链接
    //1 网络初始化()->(创建)网络套接字()->网络连接()->

    //2 发送数据: 网络发送()/ 网络接收()
    //  发送文件: 网络发送文件()/ 网络接收文件()

    //网络关闭套接字(客户端套接字)
    //网络关闭()

参考资料:
http://52tc.info/forum.php?mod=viewthread&tid=54177

回复

使用道具 举报

 楼主| 发表于 2019-12-1 23:10:41 | 显示全部楼层
按F1_帮助文档, 1.api详解, 18.网络

新建项目1:
一、套接字_服务器实现流程
伪代码:

var run, hServer
功能 启动_热键()
  run = 1
  线程开启("服务器", "")
  控件是否有效("启动", false)
  控件是否有效("终止", true)
结束
功能 终止_热键()
run = 0
网络关闭套接字(hServer)
控件是否有效("启动", true)
控件是否有效("终止", false)
结束

功能 服务器()
网络初始化()
(创建) hServer = 网络套接字(1)
网络绑定(hServer, 9999)
网络监*(hServer, 32)

for(var i = 0; i < 100; i++)
//服务器_网络接受(服务器句柄, 客户端IP)
//脚本会挂起,直到有客户端连接到来。 这跟键盘等待按键()一样。
//对应客户端_网络连接(客户端句柄, "127.0.0.1", 9999)

var hClient, 客户端IP
hClient = 网络接受(hServer, ipClient) //建立服务器与客户端的连接
线程开启("服务器消息", hClient)
end
结束

功能 服务器消息(hClient)
while(run)
  var 发送内容, 接收内容
  发送内容 = 编辑框获取文本("编辑框0")
  网络发送(hClient, 发送内容)
  网络接收(hClient, 接收内容)

  if(接收内容 == "close")
  break
  end

sleep(1000)
end
网络关闭套接字(hClient)
结束
回复 支持 反对

使用道具 举报

 楼主| 发表于 2019-12-1 23:24:18 | 显示全部楼层
新建项目2:
二、套接字_客户端实现流程
伪代码:

var run, hClient
功能 服务器()
网络初始化()
(创建) hClient = 网络套接字(1)
var 服务器IP地址 = "127.0.0.1" //这里测试所以连接的是本机
var 服务器打开的端口 = 9999
网络连接(hClient, 服务器IP地址, 服务器打开的端口) //建立客户端与服务器的连接

while(run)
//2 发送数据: 网络发送()/ 网络接收()
//  发送文件: 网络发送文件()/ 网络接收文件()

var 发送内容, 接收内容
网络接收(hClient, 接收内容) //接收从服务器发送的字串
select(接收内容)
  case 1
  cmd("msconfig", true)
  网络发送(hClient, "已经执行msconfig操作.")//向指定服务器发送一串字符串

  case 2
  cmd("Notepad.exe", true)
  网络发送(hClient, "已经执行Notepad操作.")//向指定服务器发送一串字符串
end
sleep(1000)
end

网络关闭套接字(hClient)
网络关闭()
结束
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2019-12-14 21:17 , Processed in 0.030483 second(s), 22 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表