CMD回显模块使用例子&用Telnet访问网页图片

hmyroot

CMD回显模块使用例子：
调用了论坛的DOS模块，这个回显模块有个缺点就是使用ping命令的时候就算结束了易语言exe程序，系统的ping和cmd程序仍然会在后台运行，因为DOS模块的回显功能只是读取管道输出的TXT文本，没有输入功能，所以不能使用Ctrl+C组合键来退出命令。


CMD回显_例子.7z (3.56 KB, 下载次数: 317)

2021-9-14 18:10 上传

点击文件名下载附件
下载积分: 精币 -2 枚

用Telnet访问网页图片：
@tenp00 将精易模块的【程序_延时()】改为易语言自带的【延迟()】命令，Telnet响应速度有所提升。



Telnet访问网页和S5拨号代理.7z (6.77 KB, 下载次数: 52)

2021-9-14 18:53 上传

点击文件名下载附件
下载积分: 精币 -2 枚

  

子程序名	返回值类型	公开	备 注
Telnet_访问百度图片
参数名	类 型	参考	可空	数组	备 注
参_地址	文本型
参_端口	整数型
参_延迟	整数型
参_等待	整数型

变量名	类 型	静态	数组	备 注
Bin	字节集		2

TCP.关闭 ()
如果真 (TCP.创建 () ＝ 假)
TCP.关闭 ()
返回 ()
如果真 (TCP.连接 (参_地址, 到整数 (参_端口)) ＝ 假)
TCP.关闭 ()
返回 ()
TCP.发送 (到字节集 ( #百度图片 ) ＋ { 13, 10 }, 参_等待)
延迟 (参_延迟)
TCP.接收 (Bin [1], 参_等待)
' 调试输出 (Bin [1])
Bin [2] ＝ 取字节集右边 (Bin [1], 取字节集长度 (Bin [1]) － 寻找字节集 (Bin [1], { 13, 10, 13, 10 }, ) － 3)
写到文件 (取当前目录 () ＋ “\百度首页图.png”, Bin [2])
TCP.发送 (到字节集 (“quit”), 参_等待)
TCP.关闭 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 Telnet_访问百度图片<br /> .参数 参_地址, 文本型<br /> .参数 参_端口, 整数型<br /> .参数 参_延迟, 整数型<br /> .参数 参_等待, 整数型<br /> .局部变量 Bin, 字节集, , "2"<br /> <br /> TCP.关闭 ()<br /> .如果真 (TCP.创建 () ＝ 假)<br />     TCP.关闭 ()<br />     返回 ()<br /> .如果真结束<br /> .如果真 (TCP.连接 (参_地址, 到整数 (参_端口)) ＝ 假)<br />     TCP.关闭 ()<br />     返回 ()<br /> .如果真结束<br /> TCP.发送 (到字节集 (#百度图片) ＋ { 13, 10 }, 参_等待)<br /> 延迟 (参_延迟)<br /> TCP.接收 (Bin [1], 参_等待)<br /> ' 调试输出 (Bin [1])<br /> Bin [2] ＝ 取字节集右边 (Bin [1], 取字节集长度 (Bin [1]) － 寻找字节集 (Bin [1], { 13, 10, 13, 10 }, ) － 3)<br /> 写到文件 (取当前目录 () ＋ “\百度首页图.png”, Bin [2])<br /> TCP.发送 (到字节集 (“quit”), 参_等待)<br /> TCP.关闭 ()

补充内容 (2021-9-29 16:17):
改正帖子内容：【程序_延时()】比易语言自带的【延迟()】速度更精准

qq2971358790

支持开源~！感谢分享

qq2971358790

支持开源~！感谢分享

tian1

谢谢分享

pgf125916

参考下，看能不能用于powershell

Rainly

感谢分享

zackisczy

看看看，是不是好东西

q1767995506

正好需要顶顶顶正好需要顶顶顶

q1767995506

感谢大佬感谢大佬感谢大佬感谢大佬感谢大佬感谢大佬感谢大佬

ljscs1

感谢分享，谢谢

已注销571294

不懂了