能让webbrowser上的链接点击打开的时候,弹出网页不要用ie而改用chrome弹出么?本帖最后由 clintonus 于 201
能让webbrowser上的链接点击打开的时候,弹出网页不要用ie而改用chrome弹出么? 本帖最后由 clintonus 于 2011-10-18 14:29:27 编辑 能让webbrowser上弹出的网页不要用ie而改用chrome弹出么? 改默认浏览器显然没用的,试过了.[最优解释]
引用: 大侠们 哪里有关于 拦截 从webbrowser里面弹出网页 的url 的资料?帮贴下,多谢了!!! 就那两行代码,都给你了,怕你不知道还专门用vb code引用起来了。。。。
[其他解释] 引用: 能让webbrowser上弹出的网页不要用ie而改用chrome弹出么? 改默认浏览器显然没用的,试过了. 你在webbrowser中打开,那么默认都是交给webbrowser处理,所以它应该都是ie之类的浏览器打开了。
有个办法就是拦截url,然后自己调用chrome打开,在WebBrowser1_BeforeNavigate2处理。
cancel=true shell "chome的exe文件的全路径 " & url,1 [其他解释] 引用: 引用: 能让webbrowser上弹出的网页不要用ie而改用chrome弹出么? 改默认浏览器显然没用的,试过了. 你在webbrowser中打开,那么默认都是交给webbrowser处理,所以它应该都是ie之类的浏览器打开了。 有个办法就是拦截url,然后自己调用chrome打开,在WebBrowser1_BeforeNavigate2处理。 VB …… 还真的有招啊?我以为根本不可能.
拦截url 要学习下了.
多谢!
[其他解释] 大侠们 哪里有关于 拦截 从webbrowser里面弹出网页 的url 的资料?帮贴下,多谢了!!!
[其他解释] 我是把google放webbrowser里面了,然后我想在点击打开这些google的搜索结果的时候用chrome来打开而不是ie,因为chrome快.
[其他解释] 引用: 就那两行代码,都给你了,怕你不知道还专门用vb code引用起来了。。。。 现在这样: Private Sub Command1_Click() WebBrowser1.Navigate "www.baidu.com" 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) Cancel = True Shell "C:\chrome.exe " & URL, 1 End Sub这个代码会使webbrowser1本身不访问("显示")任何网页,也就是我第一次按下command1的时候就直接用chrome打开网页了.但是我想要的效果是我在webbrowser1中用baidu.com搜索,只是那个搜索结果页面上的一个个结果链我要调用chrome打开,不知道要怎么改一下?
例子:我webbrowser1用百度搜索出"美国大使"的结果有100条,其中的具体的一条我是想用chrome打开的.但是前面的"调用百度搜索"这个过程,我不想用chrome,而是要用webbrowser1.
万分感谢!
[其他解释] 引用: 引用: 就那两行代码,都给你了,怕你不知道还专门用vb code引用起来了。。。。 现在这样: VB code Private Sub Command1_Click() WebBrowser1.Navigate "www.baidu.com" End Sub Private Sub WebBrowser1_BeforeNavigate2(ByVal p…… 可以用if判断URL。
[其他解释] 引用: 引用: 就那两行代码,都给你了,怕你不知道还专门用vb code引用起来了。。。。 现在这样: VB code Private Sub Command1_Click() WebBrowser1.Navigate "www.baidu.com" End Sub Private Sub WebBrowser1_BeforeNavigate2(ByVal p…… 要学会思考,你可以用msgbox url看看它的规律,那些链接的前缀一般都是固定的,这样加下判断就行了。