繁体中文
设为首页
加入收藏
当前位置:.Net技术首页 >> VB.Net语言 >> VB填充IE上的输入框并提交

VB填充IE上的输入框并提交

2004-10-01 08:26:10  作者:  来源:互联网  浏览次数:49  文字大小:【】【】【
简介:回答一个网友的问题,假设登录页面的HTML代码如下: ? ? ??? ????? 用户: ????? ????? ? ????? ??? ??? ????? 密码: ????? ????? ? ????? ??? ? 很简单的页面,在上...
关键字:输入

回答一个网友的问题,假设登录页面的HTML代码如下:

?

?

???

????? 用户:

?????

????? ?

?????

???

???

????? 密码:

?????

????? ?

?????

???

?

很简单的页面,在上面有一个登录的Form,一个用户名输入框LoginName,一个密码输入框LoginPassword和一个提交按钮clickme

?

然后用IE打开这个页面,注意页面的title设置为testPage。

?

然后打开VB,在工程中引用Microsoft internet controls:

Private Sub Command1_Click()

??? Dim IEList As New ShellWindows

??? Dim browser

??? Dim Doc

???

??? On Error Resume Next

???

??? '遍历当前地浏览器窗口

??? For Each browser In IEList

??????? '找到需要地IE窗口

??????? If browser.Document.Title = "testPage" Then

??????????? '获得浏览器地文档对象

??????????? Set Doc = browser.Document

???????????

??????????? '填写用户名字段

??????????? Doc.body.All("LoginName").Value = "eddie"

??????????? '填写密码字段

??????????? Doc.body.All("LoginPassword").Value = "123456"

???????????

??????????? '提交

??????????? Doc.body.All("clickme").Click

??????? End If

??? Next

End Sub

责任编辑:admin
相关文章