想通过鼠标点击IE中的超级链接,然后此链接的名称直接传入VB中,比如 链接名称为 AAA,当我点击AAA时,将"AAA"传入我的VB程序中,请问我该用什么方法?如果有实例最好,麻烦大家了~

解决方案 »

  1.   


    '如果IE是你自己程序中的webbrowser控件就好办.
    Private   Sub   Form_Load() 
      WebBrowser1.Navigate2   "网页地址 " 
    End   Sub 
    Private   Sub   WebBrowser1_BeforeNavigate2(ByVal   pDisp   As   Object,   URL   As   Variant,   Flags   As   Variant,   TargetFrameName   As   Variant,   PostData   As   Variant,   Headers   As   Variant,   Cancel   As   Boolean) 
        MsgBox   URL 
    End   Sub '如果是微软的IE浏览器的话,我不会了.
      

  2.   

    IE并非我程序中的webbrowser,是一个独立的网页,感谢楼上的回复,继续请教大家
      

  3.   

    如果有些源码,请发我一份谢谢
    [email protected]
      

  4.   

    http://www.m5home.com/blog2/blogview.asp?logID=197&cateID=2用这个模块取得鼠标下网页的源代码,然后想干什么都可以了.我这个例子是取得密码框的内容.
      

  5.   

    老马那个多此一举。正确的方法是:
    Private WithEvents IE As InternetExplorer然后就是把你要的那个IE窗体对象赋给这个IE变量
    用set ie= *******
    怎么得到,自己找资料PS:上面三行所讲的东西你得自己搞定。Private Sub IE_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
        '在这个事件里
         '就如楼上那位所说
         msgbox url
    End Sub