易语言读取http网页,查找到所要的文本后弹出对话框

2024-11-22 22:57:32
推荐回答(4个)
回答1:

他们都没测试过,给你一个我亲测的源码。
.版本 2
.支持库 internet
.支持库 iconv
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 e, 文本型
.局部变量 网站内容, 字节集

网站内容 = HTTP读文件 (“http://www.baidu.com/”)
e = 到文本 (编码转换 (网站内容, #编码_UTF_8, #编码_GBK, ))
调试输出 (e)
.如果 (寻找文本 (e, “新闻”, , 假) ≠ -1)
信息框 (“123”, 0, )
.否则
返回 ()
.如果结束

回答2:

.如果 (寻找文本 (“新闻”, “2012acv”, , 假) = -1)

//这一句 你在“新闻”二字中寻找 “2012acv”,肯定是找不到。
//你吧“新闻”换成“e”试试。然后在把最后“=-1”换成“≠-1”

回答3:

.版本 2.支持库 internet .子程序 _按钮1_被单击 参数 e, 文本型 e = 到文本 (HTTP读文件 (“www.baidu.com/”)) .如果 (寻找文本 (“新闻”, “2012acv”, , 假) <> -1) 信息框 (“123”, 0, ) .否则 返回 () .如果结束

回答4:

把=-1改为<>-1就OK了