VB填充IE上的输入框并提交
假设登录页面的HTML代码如下:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title>testPage</title>
</head>
<body>
<FORM name=chh method = "POST" action = "login.asp">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td width="31%" align="center">用户:</td>
<td width="69%" align="left">
<input name="LoginName" type="text" id="LoginName" size="12">
</td>
</tr>
<tr>
<td width="31%" align="center">密码:</td>
<td width="69%" align="left">
<input name="LoginPassword" type="password" id="LoginPassword" size="12">
</td>
</tr>
</table>
<input type = "submit" id = "clickme" value = "提交">
</FORM>
</body>
</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
分享到:
相关推荐
VB调用IE获取当前页面进行填表单提交操作,可用于实现VB与浏览器之间的交互!
VB 仿QQ密码输入框及软键盘 你看到的文件来自:E动天下(http:/www.2e3.org)
本程序旨在演示如何使用Vb来完成自动填表并提交,包括程序自建浏览器和调用系统IE浏览器2种情形 所用到的VB与IE浏览器的交互过程尽量做到不重复,以多种方法展示给大家 两款用来测试的游戏登录入口,纵横天下和矩阵 本...
用ASCII码和正则分别实现限制输入框输入数值
用vb6编写的ip地址输入框,和微软的效果一样
用VB做IE插件(BHO)用VB做IE插件(BHO)用VB做IE插件(BHO)
vb不规则区域的填充源码 vb不规则区域的填充源码 vb不规则区域的填充源码 vb不规则区域的填充源码
我们可以填充Shape控件,可以填充用Line和Circle绘制的矩形和圆形(椭圆,扇形等),但是怎么填充三角形和多边形呢?这是我找到的源码,理解后将注释改成了中文的,用API函数,很短,也很好理解,超实用。
VB演示种子填充算法,VB演示种子填充算法,VB演示种子填充算法
VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码VB IE缓存提取 源代码
VB对IE浏览器完全控制............................................
vb锁ie插件原代码,原代码可以提供给有需要的人。
VB仿IE选项卡浏览控件VB仿IE选项卡浏览控件
VB 图形的填充的实例 VB 图形的填充的实例 VB 图形的填充的实例
VB制作精简IE浏览器 VB代码 浏览器代码
VB6.0使用InPutBox显示密码输入框,InPutBox大部分情况下是用于输入数据,与用户交互,但这些数据并不是密码类型的,本实例是展示是使用InPutBox作为密码输入框,其实也是挺简单的: Private Sub Command1_Click()...
VB按钮调用IEVB按钮调用IEVB按钮调用IE浏览器VB按钮调用IE浏览器VB按钮调用IE浏览器VB按钮调用IE浏览器
VB 读取IE缓存(查看缓存内容) 你看到的文件来自:E动天下(http:/www.2e3.org)
vb删除IE缓存及cookies源码 vb删除IE缓存及cookies源码
VB设置IE代理 例程 Option Explicit Public Enum REG_TOPLEVEL_KEYS HKEY_CLASSES_ROOT = &H80000000; HKEY_CURRENT_CONFIG = &H80000005; HKEY_CURRENT_USER = &H80000001; HKEY_DYN_DATA = &H80000006; HKEY_...