易语言获取指定网页信息

2024年11月15日 03:27

有5个网友回答

网友（1）：

1、新建一个程序陵桥如。

2、插入图片框。尺启

3、把窗口缩小到图片框大小。

4、写入代码，代码里面的网址就是图片的地址，需要自己去查找。

5、图片框事件，消卜选择单击鼠标左键或其他按键都行，就可以获得网页信息。

6、最后发现获取成功了。

注意事项：

易语言有自主开发的高质量编译器，中文源代码被直接编译为CPU指令，运行效率高，安全可信性高；拥有自己的数据库系统，且支持访问现有所有数据库；内置专用输入法，支持中文语句快速录入，完全解决了中文输入慢的问题。

网友（2）：

.版本 2

.支持谈轮州库 internet

.支持库 spec

.程序集窗口程序集1

.程序集变量号码, 文本型, , "7"

.子程序 __启动窗口_创建完毕

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

.局部变量网页文本, 文本型

.局部变量文本, 文本型, , "0"

.局部变量 i, 整数型

.局部变量 n, 整数型

网页文本＝到文本 (HTTP读文件 (“http://lottery.titan24.com/kaijiang/ssq.html”))

文本＝分割文本 (网页文本, #换行符, )

.计次循环首 (取数组成员数 (文本), i)

处理事件 ()

编辑框1.内容＝ “”

.如果真 (寻找文本 (文本 [i], “福彩双色球第”, , 假) ≠ -1)

调试输出 (文本 [i])

调试输出 (寻找文本 (文本 [i], “12064”, , 假))

标签1.标题＝ “福彩双色球第 ” ＋取文本中间 (文本 [i], 76, 5) ＋桐腊 “ 期开奖公告”

.如果真结束

.如果 (寻找文本 (文本 [i], “开奖结果：”, , 假) ≠ -1)

.计次循环首 (7, n)

号码 [n] ＝文本 [i ＋ n]

调试输出 (号码 [n])

调试输出 (取文含蔽本中间 (号码 [n], 20, 2))

编辑框1.加入文本 (取文本中间 (号码 [n], 20, 2) ＋ “ ”)

编辑框1.加入文本 (取文本中间 (号码 [7], 22, 2))

.计次循环尾 ()

跳出循环 ()

.否则

编辑框1.加入文本 (“正查询开奖结果！请稍等……”)

.如果结束

.计次循环尾 ()

一个窗口上，放3个组建，按钮1，标签1，编辑框1，加上上面的代码。OK了

网友（3）：

版本 2
.支持库 internet
.支持库 spec

.程序集窗口程序集1
.程序集变量号码, 文本型, , "7"

.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击
.局部变量网页文本, 文本型
.局部变量文本, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 n, 整数型

网页文本＝到文本 (HTTP读文件 (“http://lottery.titan24.com/kaijiang/ssq.html”))
文本＝分割文本 (网页文本, #换行符, )
.计次循环首 (取数组成员数 (文本), i)
处理事件 ()
编辑框1.内容＝ “”

.如果真 (寻找文本 (文本 [i], “福彩双色球第”, , 假) ≠ -1)
调试输出 (文本 [i])
调试输出 (寻找文本和掘笑 (文本 [i], “12064”, , 假))
标签1.标题＝ “福彩双色球第 ” ＋取文本中间 (文本 [i], 76, 5) ＋ “ 期开奖公告”

.如果真结束

.如果 (寻找文本 (文本 [i], “开奖结果：”, , 假) ≠ -1)
.计次循环首 (7, n)
号码 [n] ＝文本 [i ＋ n]
调试输出 (号码 [n])
调试输出 (取文本中间 (号码 [n], 20, 2))
编辑框1.加入文本 (取文唤含本中间 (号码 [n], 20, 2) ＋ “ ”)
编辑框1.加入文本 (取文本中间 (号码 [7], 22, 2))

.计次循环尾 ()

跳出循环 ()
.否则
编辑框1.加入文本 (“正查询开奖结果！请稍等散扮……”)
.如果结束

.计次循环尾 ()

网友（4）：

用彗星http模块读网页文本应该可以

网友（5）：

http读文件，然后自己看看返回的文本，可以查找文本或者文本分割取出字符串