在线等！判断网页内是否含有“xx”关键字

晓飞

如题，，
需要在窗口创建完毕后，判断某网页的内容中是否含有“xx"关键字，，，
如果有，提示框（”找到xx“）
如果没有，提示框（”未找到xx“）


应该很简单的问题，，多谢大神！

半夏时光

[e]
.版本 2
.支持库 internet

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

.如果 (寻找文本 (到文本 (HTTP读文件 (“你的网址”)), “xx”, , 假) ＝ -1)
    信息框 (“没有找到xx文本”, 0, )
.否则
    信息框 (“找到xx文本”, 0, )
.如果结束



[/e]

99°C

如果(寻找文本(源码,"XX关键字")<>-1) '当不等于-1的时候说明关键字找到了

易尘子

要是死方法就用寻找文本

梦生

[e]
.版本 2

.局部变量 返回文本, 文本型

返回文本 ＝ 网页访问s (“网站地址”)
.判断开始 (寻找文本 (返回文本, “xx”, , 假) ≠ -1)
    信息框 (“找到xx”, 0, )
.默认
    信息框 (“没找到xx”, 0, )
[/e]

可能需要换下编码格式

じMarcusジ

给你一个例子，你可以自己试着修改，或者可以找我~请采纳

易尘子

[e]
.版本 2
.支持库 internet

.如果 (寻找文本 (HTTP读文件 (“你的网址”), “xx”, , 假) ＝ -1)
    信息框 (“没有找到xx文本”, 0, )
.否则
    信息框 (“找到xx文本”, 0, )
[/e]

晓飞

chinasmile2010 发表于 2014-4-30 14:36
[e]
.版本 2
.支持库 internet

错误(10044): 不能将“字节集”数据转换到“文本型”数据。

大神，，，能改改吗？

易尘子

[e]
.版本 2
.支持库 internet

.如果 (寻找文本 (到文本 (HTTP读文件 (“你的网址”)), “xx”, , 假) ＝ -1)
    信息框 (“没有找到xx文本”, 0, )
.否则
    信息框 (“找到xx文本”, 0, )
[/e]

半夏时光

晓飞 发表于 2014-4-30 14:41
错误(10044): 不能将“字节集”数据转换到“文本型”数据。

大神，，，能改改吗？

.版本 2
.支持库 internet

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

.如果 (寻找文本 (到文本 (HTTP读文件 (“你的网址”)), “xx”, , 假) ＝ -1)
    信息框 (“没有找到xx文本”, 0, )
.否则
    信息框 (“找到xx文本”, 0, )
.如果结束