用易语言做自动更换ip软件

Question

导入的ip是 122.72.12.90:80
117.79.237.91:80
113.10.164.137:80
123.196.125.45:80
113.98.193.139:8080
这种格式的 是 花刺代理导出去的大约4000多个
怎么样再导入这个里面呢 然后 按 更换ip 会依次更换
更换结束后会自动从第一个开始 我知道这个做的时候可能比较麻烦 先谢谢你们了

Answer 1

.版本 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个时钟

追问

没法编译的啊 你把编译好的 直接发到我邮箱吧 [email protected] 是 .e这样的文件 不是exe的

追答

源码 发过去了。

追问

按设置代理的时候 它不会一个个的往地下 一个个的设置 只是停留到那里
我不要自动更换 要依次更换的

Answer 2

我用的是兔~~子 转换器，线路多，价格也不贵 质量也挺稳定的
主要不是软件哪个好，而是更适合你的工作，
国内动态，5000＋线路，方便

Answer 3

你可以把所有的IP信息保存在一个文件里，然后用程序进行读取

Answer 4

这个要解锁才行啊。。
你搜下兔子》转换器，去官网下载相应版本安装，
然后打开浏览器再看就可以了，好用有效。

Answer 5

这种语言有什么学的，还不如学c++呢，学会了也没有公司会请你去工作。