[分享源码] 2017更新！宽带自动拨号换IP软件、保证同一ip一天内不会重复！自动检测帐

zhifu3158 · 发表于 2017-3-18 01:04:01

[分享源码] 2017更新！宽带自动拨号换IP软件、保证同一ip一天内不会重复！

原帖子：http://125.confly.eu.org/forum.php?mod=viewthread&tid=88352

本来以为没人会看，但是发现最近几天还有人在下载回复，为此我将现在正在用的源码拿出来给大家，

其实就是一个超级简单的拨号换ip的例程而已！

2017更新：！原先发布的不能用，一开始没有在意，不过看到大家有很多人在下载，为了不耽误大家，在此我将源码修改升级后发出来，

可以控制拨号换的ip每天的ip都不会相同！！
1.优化代码，前一个是不能用的，现在这个可以。
2增加了对ip的控制功能，保证同一ip一天内不会重复！
3这次很少依赖精易模块！

这个只支持宽带拨号的移动3G也能有但是网吧不能用！路由器好像也不行的！

源码：

宽带操作历程.zip (170.48 KB, 下载次数: 2773) 调用了精易模块，请自行加上！

补充内容 (2017-10-22 21:01):
138ip 获取ip连接又变了。现在统一写成：

补充内容 (2017-10-22 21:02):
.版本 2

程序集_获取ip ＝到文本 (HTTP读文件 (“https://www.51dydl.com/ip.asp”))
.如果真 (寻找文本 (程序集_获取ip, “ip138.com”, , 真) ＝ -1)
程序集_获取ip ＝ “http://2017.ip138.com/ic.asp”

.版本 2

.子程序获取ip地址, 文本型
.局部变量局_临时记录, 文本型

局_临时记录＝到文本 (网页_访问_对象 (程序集_获取ip, , , , , , , , , , , ))
局_临时记录＝文本_取出中间文本 (局_临时记录, “您的IP是：[”, “]”)
返回 (局_临时记录)

風乄雲 · 发表于 2022-10-12 13:03:38

感谢分享

stevenlaw6933 · 发表于 2022-7-29 23:58:01

66666666支持

stevenlaw6933 · 发表于 2022-5-17 22:59:40

6666666666666666666666666666666

夜踹寡妇门 · 发表于 2022-4-23 22:06:23

感谢分享谢谢

yongxuan · 发表于 2022-4-9 21:03:58

学习一下

小小神g · 发表于 2021-10-22 16:14:50

6666666666666666

guozige · 发表于 2021-9-2 21:04:53

小牛咪咪 · 发表于 2021-9-1 22:11:45

by怒神 · 发表于 2020-7-29 14:32:35

荷风送香气，竹露滴清响。

z605079231 · 发表于 2020-3-17 17:36:22

楼主永远滴神

		自动登录	找回密码
密码			注册

[易源码分享] [分享源码] 2017更新！宽带自动拨号换IP软件、保证同一ip一天内不会重复！自动检测帐

评分

本帖被以下淘专辑推荐: