目前的思路是一个窗体,两个文本框,text1内容是要监控的网页网址,text2内容是要监控词汇,一个按钮,command1是启动监控,整个程序的用途是每隔1分钟刷新页面,发现页面中存在设定的词汇,就声音报警第一次用VB就想编个这样的程序还真有点为难自己,希望大虾们指点一下,越细致越好啦:)

解决方案 »

  1.   

    用一个下载控件下载这个文件,然后用input输入到一个string中,最后用instr来查找是否有这个词汇,如果instr的返回值=0
    则表明没有这个词汇,反之是有。
      

  2.   

    1.最麻烦的是根据获取网页内容,你可以参考:
      http://msdn.microsoft.com/archive/default.asp?url=/archive/en-us/samples/internet/browser/walkall/default.asp
    2.关键词比较,容易
    3.报警,也好实现
      

  3.   

    首先你要监控的东西有没有针对性?比如是监控什么软件?还是什么软件都要监控?
    因为看网页的工具现在太多了,比如腾讯TT、MyIE、火狐浏览器、IE浏览器等等,甚至自己都可以开发。
    目标不同方案也会不同。
    如果是针对IE浏览器,那么用BHO技术可以很好的实现监控的要求。
    如果是其他浏览器,那就要根据其他浏览器的接口或单独识别的方法进行处理。
    如果是想对整个网络信息进行监控,那就需要像开发网络防火墙一样的开发程序了。
      

  4.   

    private sub Form_load()
    webbrowser1.navigate "http://www.google.cn/"end subprivate sub webbrowser1_documentcomplete(byval pdisp as object,url as variant)
    if webbrowser1.locationurl="http://www.google.cn/" then
     codes=webbrowser1.document.body.innertext
    if instr(codes,"图片") then 
     '报警
    end if
    end if
    end sub
      

  5.   

    Timer1.Enabled = True
    imer1.Interval = 60000 '1分钟检查一次Private Sub Timer1_Timer()
        
        CheckUrlKeywords txtURL.Text, txtKeyword.Text
    End Sub
      

  6.   

    我把代码运行了,但是为什么text里的内容一换就出错呢?比如把163.com换成了126.com,就出错了
      

  7.   

    侠客网站内容监控系统有你想知道的所有技术信息,很乐意跟你做技术交流 http://www.xiakeweb.com/webmonitor_intro.html