Question

易语言怎么取本机互联网IP？

请帮忙写这样个程序：
1、按钮1_被单击后 ：读取本机互联网IP，在编辑框1.内容 中显示，再写到C:\我的IP地址.txt；
2、按钮2_被单击后 ：断开ADSL连接，等待10秒，再连接ADSL，(注：“等待10秒”最好是个变量，等于编辑框2.内容 )。
说明：我就是想用ADSL不断换IP,并把ADSL的 IP地址记录下来，还有就是第二次之后取IP并写到C:\我的IP地址.txt里的时候不要把第一次的覆盖了，而是换行再记录

Answer 1

.版本 2
.支持库 internet

.子程序 _按钮1_被单击
.局部变量 ip地址, 文本型

ip地址 ＝ 子文本替换 (到文本 (HTTP读文件 (“http://archive.apnic.net/templates/ipv6man/?id='ipv6'/></iframe>”)), 字符 (0), “”, 1, , 假)
ip地址 ＝ 取文本中间 (ip地址, 寻找文本 (ip地址, “var ipaddress = '”, 1, 真) ＋ 17, 15)
ip地址 ＝ 取文本左边 (ip地址, 寻找文本 (ip地址, “'”, 1, 真) － 1)
编辑框1.内容 ＝ ip地址
写到文件 (“C:\我的IP地址.txt”, 到字节集 (编辑框1.内容))

.子程序 _按钮2_被单击

挂断 ()

Answer 2

1、按钮1_被单击后 ：
.版本 2
.支持库 sock

.子程序 _按钮1_被单击

编辑框1.加入文本 (取本机IP () ＋ #换行符)
写到文件 (“C:\我的IP地址.txt”, 编辑框1.内容)

2、按钮2_被单击后 ：断开ADSL连接用 挂断（）这个代码，等待10秒用 延迟（10000） 再连接ADSL需要知道你的用户名，和密码。

追问

取本机IP () <---这个我试过了，取的不是ADSL宽带的IP，是本地连接的IP，我要ADSL宽带的IP

Answer 3

哦只会取本机互联网IP在编辑框中显示。。。。任务。。

Answer 4

哦哦，我也不知哦。我是来赚奖赏分的。嘻嘻。。。