为编程爱好者分享易语言教程源码的资源网

网站首页 > 易语言相关 > 网络相关源码 正文

易语言伪装虚拟IP例子

三叶资源网 2021-05-23 12:08:54 网络相关源码 2889 ℃ 1 评论
.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

.计次循环首 (10, )
    调试输出 (文本_取出中间文本 (功能_网页访问 (), “ <p>你的外网IP地址是:”, “</p>”, , ))
.计次循环尾 ()

.子程序 功能_网页访问, 文本型, , 本命令由【精易网页调试助手】生成,请配合精易模块使用。
.局部变量 局_网址, 文本型
.局部变量 局_方式, 整数型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量 局_提交协议头, 文本型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型
.局部变量 IP, 文本型

' https://tool.lu/ip/
局_网址 = “https://tool.lu/ip/”
局_方式 = 0
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”, )
局_提交协议头 = ADD_协议头.获取协议头数据 ()
IP = 文本_取随机Ip ()
IP = #换行符 + 文本_替换 (#IP, , , , “wz”, IP, , , , , , , , )
局_结果 = 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头 + IP, , , , , , , , , , , , , )
局_返回 = 到文本 (编码_编码转换对象 (局_结果, , , ))
返回 (局_返回)

@老郑loser


文件下载

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575

已有1位网友发表了看法:

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网⑤群:三叶资源网⑤群

网站分类
随机tag
LOL无限视距自动发布消息易语言5.11易语言多线程检测代理IP项目揭秘ExUI图标列表框复制窗口定时任务扩展库微博授权VMware多功能记事本svg图片转换加载皮肤FTP局域网抖音解析皮肤模块源码PugiXml胆码随机邮箱SSL发信
最新评论