还是没解决 WebBrowser.Navigate问题

sjmsky111 2009-01-13 11:21:21

我用VB.NET2005做个了程序，用了2个WEBBROWSER控件，第一个控件加载一段网页http://www.12333sh.gov.cn/website/frame_1.htm。
如何用第2个WEBBROWSER控件实现在第1个控件中点击超链接不弹出新窗口。
Private Sub WebBrowser1_NewWindow1(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
e.Cancel = True
WebBrowser2.Navigate(WebBrowser1.StatusText)
End Sub
现在遇到的问题是点击普通链接可以实现，但点击如上述网址中的“查询”链接却不能，哪位高手帮忙下，是不是链接的类型不同？

...全文

196 5 打赏收藏转发到动态举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

流年岁月 2009-01-15

打赏
举报

回复

学习了

feiyun0112 2009-01-15

打赏
举报

回复

自带的WEBBROWSER控件做不到，用这个控件的newwindow3事件
http://www.codeproject.com/KB/cpp/ExtendedWebBrowser.aspx

*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)

http://feiyun0112.cnblogs.com/

CloneCenter 2009-01-13

打赏
举报

回复

貌似这个网页是通过提交的办法链接到新窗口的。

fanjingyxl 2009-01-13

打赏
举报

回复

up

lange_love 2009-01-13

打赏
举报

回复

帮你顶下~

VB 6.0演示WebBrowser用法制作简单的网页浏览器，主要是以一些WebBrowser.Navigate、WebBrowser.GoBack、WebBrowser.Stop等基本操作函数的用法演示，利用本程序打开和设置默认主页，具体实现如下所示：　　Private Sub cmdHome_Click() 　　'打开默认主页　　WebBrowser.Navigate "www.codesc.net" 　　txtURL.Text = "http://www.codesc.net" 　　End Sub 　　Private Sub Form_Load() 　　'设置默认主页　　txtURL.Text = "http://www.codesc.net" 　　WebBrowser.Navigate "http://www.codesc.net" 　　End Sub

1，在项目中引用程序集拓展中的Microsoft.mshtml后，可以在公共控件中找到WebBrowser控件。 2，在窗体中加入三个按钮，然后添加WebBrowser控件，右键控件选属性，设置相应的属性。 3，设置WebBrowser控件的属性 public Form1() { InitializeComponent(); webBrowser1.ScriptErrorsSuppressed = true; //跳过脚本错误提示 } 4，双击按钮添加代码，调用WebBrowser控件的Navigate方法实现显示不同网页 private void button1_Click(object sender, EventArgs e) { webBrowser1.Navigate("网址"); } 5，实现点链接而不弹窗，右击WebBrowser控件选择属性，在相应属性面板中查看它所支持的事件，激活NewWindow事件，在事件函数中添加如下代码； private void webBrowser1_NewWindow(object sender, CancelEventArgs e) { //防止弹窗； e.Cancel = true; string url = this.webBrowser1.StatusText; this.webBrowser1.Url = new Uri(url); }

vb6_Webbrowser控件使用技巧 1、获得浏览器信息： Private Sub Command1_Click() WebBrowser1.Navigate "http://www.applevb.com" End Sub Private Sub Command2_Click() Dim oWindow Dim oNav Set oWindow = WebBrowser1.Document.parentWindow Set oNav = oWindow.navigator Debug.Print oNav.userAgent Set oWindow = Nothing Set oNav = Nothing End Sub 点击Command1浏览网页，点击Command2在立即窗口中输出浏览器信息。 2、弹出Webbrowser消息窗口 Dim oWindow Set oWindow = WebBrowser1.Document.parentWindow oWindow.confirm "abcd" VB调用webbrowser技巧集2 向Webbrowser中写入HTML内容的几种方法

使用 WebBrowsersuper(new BorderLayout()); final JPanel webBrowserPanel = new JPanel(new BorderLayout()); webBrowser.setBarsVisible(false); webBrowser.navigate(url); webBrowserPanel.add(webBrowser, BorderLayout.CENTER); add(webBrowserPanel, BorderLayout.CENTER); JPanel panel = new JPanel(new FlowLayout(FlowLayout.CENTER, 4, 4)); System.out.println("======" + Thread.currentThread().getId()); webBrowser.addWebBrowserListener(new WebBrowserAdapter() {

Webbrowser1获取网页源码,实例

16,555

社区成员

110,528

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章