求高人们帮看下,webbrowser执行yahoo搜索的结果页里的链接,如何调用其他浏览器打开新窗口?
本帖最后由 xinrensheng 于 2011-12-24 14:15:39 编辑 我的代码附后,它老是直接在webbrowser上打开链接,但是我需求:弹出新窗口,用我的默认浏览器打开链接.
其它一般的网页都可以通过run WebBrowser1.Document.activeElement.href来实现,为什么yahoo的不行?它不是activeElement.href吗?要怎么实现呢?
多谢!!
WebBrowser1.Navigate "http://search.yahoo.com/search;_ylt=AgueNHDMH6lE5CJ9Vwdki5GbvZx4?vc=&fp_ip=cn&vc=countrycn&p=111111111111111111111&toggle=1&cop=mss&ei=UTF-8&fr=yfp-t-701"
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Cancel = True
Set w = CreateObject("wscript.shell"): r = w.run(WebBrowser1.Document.activeElement.href)
End Sub
