Question

易语言怎么截取网页某段文字,或者IP地址拜托各位大神

访问某网页，然后截取某段文字，或者IP，！

Answer 1

.版本 2 .支持库 internet .支持库 eAPI .支持库 sock .子程序 _IP地址查询_被选择 .局部变量 网页代码, 字节集 .局部变量 查找首, 整数型 .局部变量 查找尾, 整数型 .局部变量 找到的ip, 文本型 .局部变量 文本网页, 文本型 .局部变量 分割找到的ip, 文本型, , "0" .局部变量 ip, 文本型 .局部变量 地址是, 文本型 .局部变量 分割ip, 文本型, , "0" ' 皮肤_加载皮肤 (#皮肤_QQ2010) ' 编辑框2.内容 ＝ “您的本地IP是：”＋取IP地址 () ' 编辑框3.内容 ＝ “您的本机名是：”＋ 取本机名 () .如果 (客户1.连接 (“ip.loveroot.com”, 80)) 网页代码 ＝ HTTP读文件 (“ http://ip.loveroot.com/ ”) 文本网页 ＝ 到文本 (网页代码) 查找首 ＝ 寻找文本 (文本网页, “官方数据查询结果：”, , 假) 查找尾 ＝ 寻找文本 (文本网页, “</p>”, 查找首, 假) 找到的ip ＝ 取文本中间 (文本网页, 查找首, 查找尾 － 查找首) 分割找到的ip ＝ 分割文本 (找到的ip, “  - ”, ) ' ----------------------------------------------------------------- ip ＝ 分割找到的ip [1] 地址是 ＝ 分割找到的ip [2] 输出调试文本 (ip) 输出调试文本 (地址是) ' -------------------------以下是载入时的代码------------------------------ 分割ip ＝ 分割文本 (ip, “：”, ) ip ＝ 删首尾空 (分割ip [2]) ' 编辑框1.内容 ＝ “您本机外网IP是:”＋ ip ' 编辑框4.内容 ＝“ 您是” ＋ 地址是 ＋ “用户” 信息框 (“您成功查询到的本机IP是：”＋取IP地址 () ＋ #换行符 ＋ “您的本机名是：”＋ 取本机名 () ＋ #换行符 ＋ “您本机外网IP是:”＋ ip ＋ #换行符 ＋“ 您是” ＋ 地址是 ＋ “用户”, 0, “易团雪提示您。”) .否则 .如果结束 ' -------------------------查ip的代码---------------- 楼主这个可以取外网本地的，你看看吧！采纳哦。。。。 加入我们一起学习吧！！ 此答案来源于 → 精易论坛,要学习编程的可百度一下"精易论坛" 我们的口号是:帮助别人等于帮助自己 需加入本论坛请点击 http://www.3600gz.cn/?fromuid=12876 进去后注册帐号即可