用易语言做自动更换ip软件
117.79.237.91:80
113.10.164.137:80
123.196.125.45:80
113.98.193.139:8080
这种格式的 是 花刺代理导出去的大约4000多个
怎么样再导入这个里面呢 然后 按 更换ip 会依次更换
更换结束后会自动从第一个开始 我知道这个做的时候可能比较麻烦 先谢谢你们了 展开
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 行数, 整数型
.局部变量 当前行, 整数型
.局部变量 当前文本, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 项目文本, 文本型
.局部变量 项目数值, 文本型
行数 = 文本_取行数 (编辑框1.内容)
.计次循环首 (行数, 当前行)
当前文本 = 文本_取指定变量文本行 (编辑框1.内容, 当前行)
数组 = 分割文本 (当前文本, “:”, )
项目文本 = 数组 [1]
项目数值 = 数组 [2]
列表框1.加入项目 (项目文本, 到整数 (项目数值))
.计次循环尾 ()
列表框1.现行选中项 = 0
.子程序 _按钮2_被单击
调试输出 (系统_设置IE代理地址 (列表框1.取项目文本 (列表框1.现行选中项), 到文本 (列表框1.取项目数值 (列表框1.现行选中项))))
调试输出 (列表框1.取项目文本 (列表框1.现行选中项))
调试输出 (列表框1.取项目数值 (列表框1.现行选中项))
.子程序 _按钮3_被单击
.局部变量 间隔时间, 整数型
输入框 (“请输入更换IE代理IP的间隔时间,单位为秒!”, “间隔时间设置:”, “10”, 间隔时间, 2)
时钟1.时钟周期 = 间隔时间 × 1000
.子程序 _时钟1_周期事件
.局部变量 当前要设置的, 整数型
.如果 (系统_设置IE代理地址 (列表框1.取项目文本 (列表框1.现行选中项), 到文本 (列表框1.取项目数值 (列表框1.现行选中项))) = 真)
_启动窗口.标题 = “当前IE代理是 ” + 列表框1.取项目文本 (列表框1.现行选中项)
.如果 (列表框1.取项目数 () > 列表框1.现行选中项)
列表框1.现行选中项 = 列表框1.现行选中项 + 1
.否则
列表框1.现行选中项 = 0
.如果结束
.否则
提示框 (“设置IE代理地址失败。”, 0 + 16, “错误”, )
时钟1.时钟周期 = 0
.如果结束
=============================================
1个编辑框
1个列表框
4个按钮
1个时钟
没法编译的啊 你把编译好的 直接发到我邮箱吧 ppqgt@163.com 是 .e这样的文件 不是exe的
源码 发过去了。
2024-11-15 广告
2020-07-02
主要不是软件哪个好,而是更适合你的工作,
国内动态,5000+线路,方便
2020-06-21
你搜下兔子》转换器,去官网下载相应版本安装,
然后打开浏览器再看就可以了,好用有效。