收录日期:2020/11/30 11:55:45 时间:2016/08/16 10:20:29 标签:VB.NET

webbrowser 自己做的一个组件 为 exbrowser 调用为wb

 Private Sub wb_Navigating(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserNavigatingEventArgs) Handles wb.Navigating
dim myheader as string="User-Agent:Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; Trident/5.0; MALC; 360SE)"

 If isUserAgentSet = False Then
            If Common.menuuseragent <> "" Then
                e.Cancel = True
                isUserAgentSet = True
                wb.Navigate(e.Url.ToString, "", Postdata, "user-agent:" & myheader )
            End If
        Else
            e.Cancel = False
        End If
    End Sub

Private Sub wb_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles wb.DocumentCompleted
        isUserAgentSet = False
    End Sub

这种方式不行 ,就第一打开可以实现 
1.网页刷新或在本窗口打开其它网页,user-agent的值 没有更改
2.提交的Postdata 怎么改
3.网上用 DispId。。。接口,下载了一个源码,不知道怎么修改 

我要要求是想通过自定义的webbrowser ,然后我能自己设置user-agent ,通过改变user-agent 用网页读出来的user-agent也不同

我是菜鸟,拜谢解答!
继续问 ... 
加了DISPID_AMBIENT_USERAGENT实现自定义user-agent之后要用IOleControl::OnAmbientPropertyChange通知控件,不然控件不知道需要查询容器的属性。
能给过例子吗,我不知道怎么写,谢谢你!我很菜鸟
谢谢你的回复,我是菜鸟,能给过例子吗,我不知道代码怎么写,跪地拜谢!
能给个例子吗,不知道怎么写,我是菜鸟,拜谢!
用webclient取网页数据 自定义useragent

取回来的网页数据 写入到webbrowser 我是这样做的

看这个地址 http://www.370b.com/bbsx/bbsuser.html

5d6d 游客不能浏览,但是他允许蜘蛛浏览

模拟下蜘蛛的useragent  就穿透了
引用 2 楼  的回复:
加了DISPID_AMBIENT_USERAGENT实现自定义user-agent之后要用IOleControl::OnAmbientPropertyChange通知控件,不然控件不知道需要查询容器的属性。

能给个例子吗,不知道怎么写,我是菜鸟,拜谢!
http://www.codeproject.com/Articles/18935/The-most-complete-C-Webbrowser-wrapper-control
引用 2 楼  的回复:
加了DISPID_AMBIENT_USERAGENT实现自定义user-agent之后要用IOleControl::OnAmbientPropertyChange通知控件,不然控件不知道需要查询容器的属性。


蒋老大 vb.net的源码有吗 怎么写啊,我写的总是不行 

Public Interface IOleControl
        Sub OnAmbientPropertyChange( _
        ByVal headers As String _
        )

    End Interface
继续问 拜谢
IOleControl是ActiveX实现的,你只要查询控件的接口就可以。
IOleControl oleControl = webBrowser.ActiveXInstance as IOleControl;
oleControl.OnAmbientPropertyChange(HTMLDispIDs.DISPID_AMBIENT_DLCONTROL);
非常不错,mark

CASL与80XX有什么区别?学80XX可以完全代替CASL吗?

祝大家圣诞节快乐!

终于有颗星散分500 HTA 终于有颗星散分500 终于有颗星散分500 请教大家一个问题:谢谢! 看看这个更新错在哪里? 如何在java文本域里任意确定写入(光标)位置,要交了,还无进展:( 终于有颗星散分500 超级简单问题(急!急!急!放分100,在线等待) 如何定位jb中的光标,我的光标总和字符的位置不相符。 看看这个更新错在哪里?! doevents()函数? 如何判断某个文件是否存在? 我和我MM(转) 老婆被撬,能放弃吗? 哪里有LINUX下的GDK包,用于安装ORACLE8的(Brad) 请问pb 和 delphi开发数据库,那一个更好? 老婆被撬,能放弃吗? 紧急求助:关于数据库连接问题! 有关后台保存的讨论。欢迎加入! 急急 response.write \" 内容: \" 有问题 请问有什么办法在我自画TBUTTON时,自画的字不会被覆盖? 怎么把tiff格式图像转化为jpeg 或gif格式图像,谢谢. (((((((((((((有谁知道高级程序员考试什么时候查分?有没有网址?)))))))))))))
有问题? 如何用vb建立文件夹? heap和stack的区别是什么 为什么我的jsp文件在localhost下大不开??(在线等待)