拨号

mp624183768

  

子程序名	返回值类型	公开	备 注
重拨	文本型

变量名	类 型	静态	数组	备 注
重试次数	整数型
ip	文本型
取IP	文本型

取IP ＝ 网页_取wai网IP ()
调试输出 (取IP)
判断 (组合框换IP方式.现行选中项 ＝ 0)
ADSL.断开 ()
加入日志 (“断开宽带”)
程序_延时 (到整数 (编辑框_挂断延迟.内容) × 1000)
加入日志 (“软件延迟” ＋ 编辑框_挂断延迟.内容 ＋ “秒开始换Ip”)
ADSL.重拨 (删全部空 (编辑框_连接名称.内容), 删全部空 (编辑框_ADSL账号.内容), 删全部空 (编辑框_ADSL密码.内容))
加入日志 (“开始拨号换Ip”)
延时 (3000)
ip ＝ 取IP



循环判断首 ()
挂断 ()
加入日志 (“断开宽带”)
程序_延时 (到整数 (编辑框_挂断延迟.内容) × 1000)
加入日志 (“软件延迟” ＋ 编辑框_挂断延迟.内容 ＋ “开始换Ip”)
拨号 (删全部空 (编辑框_连接名称.内容), 编辑框_ADSL账号.内容, 编辑框_ADSL密码.内容, 真, )
加入日志 (“开始拨号换Ip”)
ip ＝ 取IP
判断循环首 (ip ＝ “”)
延时 (50)
处理事件 ()
判断循环尾 ()
重试次数 ＝ 重试次数 ＋ 1
如果真 (重试次数 ＝ 到整数 (编辑框_失败重拨.内容))
加入日志 (“开始重拨!”)
返回 (“0.0.0.0”)

循环判断尾 (ip ＝ “”)
返回 (ip)

i支持库列表	支持库注释
spec	特殊功能支持库
internet	互联网支持库

.版本 2<br /> .支持库 spec<br /> .支持库 internet<br /> <br /> .子程序 重拨, 文本型<br /> .局部变量 重试次数, 整数型<br /> .局部变量 ip, 文本型<br /> .局部变量 取IP, 文本型<br /> <br /> 取IP ＝ 网页_取wai网IP ()<br /> <br /> <br /> 调试输出 (取IP)<br /> <br /> .判断开始 (组合框换IP方式.现行选中项 ＝ 0)<br />     ADSL.断开 ()<br />     加入日志 (“断开宽带”)<br />     程序_延时 (到整数 (编辑框_挂断延迟.内容) × 1000)<br />     加入日志 (“软件延迟” ＋ 编辑框_挂断延迟.内容 ＋ “秒开始换Ip”)<br />     ADSL.重拨 (删全部空 (编辑框_连接名称.内容), 删全部空 (编辑框_ADSL账号.内容), 删全部空 (编辑框_ADSL密码.内容))<br />     加入日志 (“开始拨号换Ip”)<br />     延时 (3000)<br />     ip ＝ 取IP<br /> <br /> .默认<br /> <br />     .循环判断首 ()<br /> <br />         挂断 ()<br />         加入日志 (“断开宽带”)<br />         程序_延时 (到整数 (编辑框_挂断延迟.内容) × 1000)<br />         加入日志 (“软件延迟” ＋ 编辑框_挂断延迟.内容 ＋ “开始换Ip”)<br />         拨号 (删全部空 (编辑框_连接名称.内容), 编辑框_ADSL账号.内容, 编辑框_ADSL密码.内容, 真, )<br />         加入日志 (“开始拨号换Ip”)<br />         ip ＝ 取IP<br />         .判断循环首 (ip ＝ “”)<br />             延时 (50)<br />             处理事件 ()<br />         .判断循环尾 ()<br />         重试次数 ＝ 重试次数 ＋ 1<br />         .如果真 (重试次数 ＝ 到整数 (编辑框_失败重拨.内容))<br />             加入日志 (“开始重拨!”)<br />             返回 (“0.0.0.0”)<br />         .如果真结束<br /> <br />     .循环判断尾 (ip ＝ “”)<br /> <br /> .判断结束<br /> 返回 (ip)

[e=0].版本 2

.子程序 网页_取wai网IP, 文本型, 公开, 取本机的wai网IP
.参数 所在省市, 文本型, 可空, 可空。请提供一个文本变量，用于存放您所在的省市
.局部变量 网页源码, 文本型

网页源码 ＝ 到文本 (网页_访问 (“http://www.ip138.com”))
网页源码 ＝ 到文本 (网页_访问 (文本_取出中间文本 (网页源码, “<iframe src="#引号”," “#引号="" rel="#引号nofollow”)))

ypcfly

很牛叉，学习学习

pp2008

mp624183768 发表于 2018-4-25 18:44
就学3个小时 还用了坚持 兄弟 恐怕你不适合这一行！

mp624183768

pp2008 发表于 2018-4-25 17:38
每天学习3小时！坚持坚持再坚持！ 谢谢分享

就学3个小时 还用了坚持 兄弟 恐怕你不适合这一行！

pp2008

每天学习3小时！坚持坚持再坚持！ 谢谢分享

2383156053

mp624183768 发表于 2018-4-18 19:37
不太会0.0....................

勿喷。。。。。

mp624183768

2383156053 发表于 2018-4-18 16:17
抓包直接取文本中间不好吗怎么费事

不太会0.0....................

2383156053

抓包直接取文本中间不好吗怎么费事

mp624183768

.版本 2  .子程序 网页_取wai网IP, 文本型, 公开, 取本机的wai网IP .参数 所在省市, 文本型, 可空, 可空。请提供一个文本变量，用于存放您所在的省市 .局部变量 网页源码, 文本型  网页源码 ＝ 到文本 (网页_访问 (“http://www.ip138.com”)) 网页源码 ＝ 到文本 (网页_访问 (文本_取出中间文本 (网页源码, “<iframe src=#引号”, “#引号 rel=#引号nofollow”))) 所在省市 ＝ 文本_取出中间文本 (网页源码, “来自：”, “</center>”) 返回 (文本_取出中间文本 (网页源码, “您的IP是：[”, “]”))

Bmmug

谢谢大佬分享