内容发布更新时间 : 2024/8/22 16:55:09星期一 下面是文章的全部内容请认真阅读。

delphi WebBrowser的使用方法详解（四）

delphi WebBrowser的使用方法详解（四）-webbrowser轻松实现自动填表

分类： Delphi Webbrowser TembeddedWB 2013-11-01 17:02 220人阅读 评论(0) 收藏 举报

目录(?)[+]

webbrowser轻松实现自动填表

步骤如下：

第一步：获取网页 调用Webbrowser 的Navigate系列函数。等待网页装载完成，得到document对象。 在调用 webBrowser.Document 之前，请确保 Webbrowser 网页装载完成，可以通过Webbrowser的DocumentCompleted事件进行监视。 小技巧 先指定一个变量 步骤如下：

第一步：获取网页

调用Webbrowser 的Navigate系列函数。等待网页装载完成，

得到document对象。

在调用 webBrowser.Document 之前，请确保 Webbrowser 网页装载完成，可以通过Webbrowser的DocumentCompleted事件进行监视。 小技巧

先指定一个变量： IsCompleted

在调用Webbrowser 的Navigate，Refresh系列函数之前，将IsCompleted设为false。

在DocumentCompleted事件中，如果 ReadyState 为 WebBrowserReadyState.Complete(值为4)，则设IsCompleted为true.

调用webBrowser.Document之前对IsCompleted进行判断。如果不为true，则延时循环等待，直到IsCompleted被设为true.

第二步：设置网页元素数据

确保得到document对象之后，通过 GetElementById 获取网页元素，如： HtmlElement user =

webBrowser.Document.GetElementById(\HtmlElement password =

webBrowser.Document.GetElementById(\设置网页元素值： user.InnerText = \password.InnerText = \小技巧

作用 SetAttribute 设置下拉框，复选框，多选框数据 下拉框：

secret.SetAttribute(\ 复选框

rememberme.SetAttribute(\多选框

cookietime.SetAttribute(\

当然，在SetAttribute 之前，也可以用GetAttribute取相关的属性先进行判断，再根椐需要进行设置。

第三步：提交网页数据 先取提交的按钮对象。 HtmlElement submit =

webBrowser.Document.GetElementById(\ 进行提交

submit.InvokeMember(\