Search - WebBrowser1

Search - WebBrowser1 - List

[Internet-Network] IE4SinkDemo DL : 0: unit Cweb2 interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls, SHDocVw, StdCtrls, ActiveX type TForm1 = class(TForm) WebBrowser1: TWebBrowser procedure FormCreate(Sender: TObject) procedure WebBrowser1DocumentComplete(Sender: TObject const pDisp: IDispatch var URL: OleVariant) procedure DemoEventSink(Sender: TObject) private public { Public declarations } end var Form1: TForm1 implementation {$R *.dfm} uses MSHTML, IEDocHostUIHandler, IEConst, DHTMLEvent,comobj var FDocHostUIHandler: TDocHostUIHandler //为屏蔽右键菜单 Doc : IHTMLDocument2 Element : IHTMLElement EventSink: TDHTMLEvent procedure TForm1.FormCreate(Sender: TObject) begin FDocHostUIHandler := TDocHostUIHandler.Create //为屏蔽右键菜单 EventSink := TDHTMLEvent.Create WebBrowser1.Navigate(GetCurrentDir + \\index.htm ) end procedure TForm1.DemoEventSink(Sender: TObject) Var S:String -unit Cweb2 interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls. SHDocVw, StdCtrls. ActiveX type TForm1 = class (TForm) WebBrowser 1 : TWebBrowser procedure FormCreate (Sender : TObject) procedure WebBrowser1DocumentComp lete (Sender : TObject const pDisp : IDispatch var URL : OleVariant) procedure DemoEventSink (Sender : TObject) private public (Public declaration s) var end Form1 : TForm1 implementation ($ R *. dfm) uses MSHTML , IEDocHostUIHandler, IEConst, DHTMLEven t, comobj var FDocHostUIHandler : TDocHostUIHandler / / right-click menu for shielding Doc : IHTMLDocument2 Element : IHTMLElement EventSink : TDHTMLEvent procedure TForm1.FormCreate ( Sender : TObject) begin FDocHostUIHandler : = TDocHostUIHandler.Create / / right-clic
Date : 2008-10-13 Size : 19.4kb User : sbl
[Internet-Network] ShuaQB DL : 0: 以前一直在用这个来通过互联星空刷qb，现在没用了，发出来共享了。主要通过WebBrowser1控件来对网页操作！
Date : 2014-01-07 Size : 207.12kb User : 滔滔
[Internet-Network] form DL : 0: 本程序旨在演示如何使用vb来完成自动填表并提交,包括程序自建浏览器和调用系统IE浏览器2种情形所用到的VB与IE浏览器的交互过程尽量做到不重复,以多种方法展示给大家两款用来测试的游戏登录入口,纵横天下和矩阵本程序中完成提交的方法提供两种,直接提交表单和点击登录按钮提交还有第三种方法填表完成后直接用WebBrowser1.Document.Forms("login").Submit 如果您安装的是IE7,在VB开发环境下运行可能会遇到莫名其妙的浏览器错误-' This procedure aims to demonstrate how to use vb to automatically fill in a form completed and submitted, including the procedures for self-built browser and IE browser called the system two kinds of circumstances' which used VB and IE browser as far as possible the interaction of non-repetition, a number of ways to show you ' two to sign in the entrance test of the game, China the world and the Matrix' to complete the program offers two ways to submit, directly to the form and click the login button to submit ' There is a third method to fill in a form directly after the completion of WebBrowser1.Document.Forms ( " login" ). Submit ' If you install IE7, in the VB development environment may have run under the browser inexplicable error
Date : 2025-12-19 Size : 14kb User : alpha
[Internet-Network] AutomaticPost DL : 0: 本程序旨在演示如何使用vb来完成自动填表并提交,包括程序自建浏览器和调用系统IE浏览器2种情形.所用到的VB与IE浏览器的交互过程尽量做到不重复,以多种方法展示给大家两款用来测试的游戏登录入口,纵横天下和矩阵.本程序中完成提交的方法提供两种,直接提交表单和点击登录按钮提交.还有第三种方法填表完成后直接用WebBrowser1.Document.Forms("login").Submit 如果您安装的是IE7,在VB开发环境下运行可能会遇到莫名其妙的浏览器错误但是编译为本地代码后运行无任何问题,目前还未找到原因为何...有谁知道烦请告知-This procedure aims to demonstrate how to use vb to automatically fill in a form completed and submitted, including the procedures for self-built browser and IE browser called the system two kinds of cases. The use of VB and IE browser as far as possible the interaction of non-repetition, in order to display a number of ways for everyone to test two of the game log entrance, and vertical and horizontal world and the matrix. the completion of the process to provide the two directly to the form and click the login button to submit. There is a third way to fill in a form directly after the completion of WebBrowser1.Document.Forms ( " login" ). Submit If you install IE7, in the VB development environment to run may have inexplicable error but the browser code compiler for the local operation without any problems, the current have not found the reasons for that ... who knows please inform
Date : 2025-12-19 Size : 14kb User : 659
[Internet-Network] codefans.net DL : 0: 用VB制作的一个简单的网页浏览器Private Sub Form_Load() Label2.Left = 0 Label2.Top = Toolbar1.Height Combo1.Top = Toolbar1.Height Label2.Caption = "地址: " Label2.Height = 315 Combo1.Left = Label1.Width Combo1.Width = Form1.Width - Label2.Width WebBrowser1.Width = Form1.ScaleWidth WebBrowser1.Top = Combo1.Top + 500 WebBrowser1.Height = Form1.ScaleHeight - Combo1.Height - StatusBar1.Height - 200 WebBrowser1.Left = 0 Download by http://www.codefans.net StatusBar1.Panels(1).Width = Form1.Width / 2 StatusBar1.Panels(2).Width = Form1.Width / 4 StatusBar1.Panels(3).Width = Form1.Width / 4 StatusBar1.Panels(2).Text = "我的电脑" StatusBar1.Panels(3).Text = Str$(Time) On Error Resume Next Me.Show 内详-VB produced a simple web browser
Date : 2025-12-19 Size : 5kb User : 李贤山
[Internet-Network] SkyFall-WebBrowser1.0 DL : 0: 天际浏览器，十分强大的浏览器，可以换肤哦Q-Skyline browser, very powerful browser, peels Oh Q
Date : 2025-12-19 Size : 1kb User : ngthest