论坛里有人问起,就看了一下,发现代码比较简单.

而且这样子应该能比较通用地完成网页自动填表功能,适合做自动提交之类的.

干脆记下来,免得以后要用到时又忘了...............

代码没几句,就是通过ID或NAME来取得对象,再设置其VALUE值.

程序代码:  
Option Explicit

Private Const sURL As String = "http://218.202.107.178:8081/aincs/webpage/index.jsp?SelfSessionKey=000000000000001a49444c3a687474702f52657150726f636573736f723a312e300000000000000100000000000000ac000102000000000c31302e3232302e332e313900ff8400000000004900504d43000000000000001a49444c3a687474702f52657150726f636573736f723a312e300020200000000974635f61696e6373002020200000000d2f746f6d636174345f706f6100000000000000035649530300000005000507017f000000000000000000000800000000564953000000000100000018000000000001000100000001050100010001010900000000_7A1B861487D6AFEDE237964589A17B26"

Private Sub Form_Load()
    WebBrowser1.Navigate sURL
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    If URL = sURL Then
        Dim Ele As Object
           
        Set Ele = WebBrowser1.Document.getElementById("mobileno")           '根据ID取得对象
        Ele.Value = "www.m5home.com"
        
        Set Ele = WebBrowser1.Document.getElementsByName("password")        '根据Name取得对象
        Ele(0).Value = "www.m5home.com"
        
        Set Ele = WebBrowser1.Document.getElementsByName("operVerifyCode")  '根据Name取得对象
        Ele(0).Value = "www.m5home.com"
    End If
End Sub

在使用getElementsByName取对象时要注意一点,就是NAME是可以有重复的,所以getElementsByName返回的是一个集合,其中包含了所有相同NAME的对象.

而ID是不可能有重复的,所以getElementById返回的就是一个单一对象.

试过了pudn和CSDN等,都可以用这样的方式自动填表.

摘自:http://blog.m5home.com/article.asp?id=279 

VB部分相关文章推荐

※VB快速读取 TextBox 第 N 行的资料

※VB禁止使用 Alt-Tab 或 Ctrl-Alt-Del

※生成迷宫的程序

※另一方法转换大小写

※VB控件注册 - 利用资源文件将dll、ocx打包进exe文件

※VB利用资源文件进行工作

※[转]vb高效编程(优化)

※VB阳历转阴历

※纯VB代码取得硬盘的物理序列号

※VB获得磁盘的文件系统

※做VB的,经常注册和反注册OCX控件和DLL链

※VB从程序中生成Exe文件

※VB6监视/操作剪贴板示例(VB6.0代码)

※VB6里自动提交/自动填表的一种相对通用的方案

※VB移动没有标题的窗体

※VB随机字母的函数

※VB删除带子文件夹和文件的文件夹

※VB怎样屏蔽 Alt+F4键

※VB 隐藏进程

※vb屏蔽文本框点右键时的弹出菜单

※VB手控Combobox的打开或收起

※在VB中INI文件的读写、删除(对中文支持很好)

※vb全局热键的写法(占很少的资源)

※vb取消文本框的粘贴功能

※VB常用文件操作类

※VB获取特殊文件夹

※VB获取windows各常用目录的函数(模块)

※VB生成太极图

※VB:常用内部函数大全,你会了几个呢?

※vb中SendMessage函数

※精简VB程序的代码

※VB:将数字转换为大写中文

※VB:设定 MsgBox 在若干时间之后若无回应则自动关闭

※VB:读取及设定NumLock/CapsLock/ScrollLock的值

※VB:您知道 Mid$ 函量可以放在 '=' 的左方吗

※VB后台获得按键,并执行自己的函数(非钩子及热键)

※VB:将短文件名格式转成长文件名

※在vb中使用Iphlpapi.dll获取网络信息(上)

※在vb中使用Iphlpapi.dll获取网络信息(下)


更多精彩>>>

VB6里自动提交/自动填表的一种相对通用的方案相关推荐

  1. 防止INPUT回车自动提交FORM表单

    在做广菲克项目里的一个修改功能时,发现form表单里只有一个input时,按回车form就自动提交了. form中的input只有一个,input获得焦点时按回车会form自动提交: <!doc ...

  2. mysql自动提交的概念_MySQL入门之事务概念

    MYSQL默认是自动提交的,也就是你提交一个QUERY,它就直接执行!我们可以通过 set autocommit=0 禁止自动提交 set autocommit=1开启自动提交 mysql中INNOD ...

  3. 【PostgreSQL-9.6.3】设置非自动提交

    我们在使用psql工具操作数据库时,事务是自动提交的.也就是说,当我们执行完一条insert或者delete语句后,在不输入commit情况下,这条语句也是提交的.如果不想自动提交,可以使用以下两种方 ...

  4. linux svn自动提交,svn 定时自动提交

    Linux 端的svn 定时自动提交如果一个提交操作是定向定时的重复动作,我们可以把commit 的操作和参数对象抽象出来,封装在脚本中执行.并将脚本配置在crontab 中定时执行. commit ...

  5. 使用RBTool自动提交code review请求

    使用RBTool自动提交code review请求 前言 让我们回想一下手工提交review请求的过程: 首先得用 svn diff > filename.diff 生成diff文件. 然后输入 ...

  6. php 表单提交及验证 tp,ThinkPHP表单自动提交验证实例教程

    ThinkPHP表单自动提交验证实例教程 附加规则 配合验证规则使用,包括: function 使用函数验证,前面定义的验证规则是一个函数名 callback 使用方法验证,前面定义的验证规则是一个当 ...

  7. php自动提交百度收录,wordpress站点如何自动提交百度收录

    三种可以实现自动提交百度收录的方法. 1.php自动提交.function.php模版文件.if(!function_exists('Baidu_Submit')){ function Baidu_S ...

  8. 百度腾讯QQ等网站注册自动提交表单源码2012最新

    闲的无聊的时候研究了下delphi网络模块.就简单模仿了下自动注册或者登陆网站这么一个功能来练手.闲话不多讲,代码奉上~ 以下是腾讯QQ的填写表单和自动提交代码,直供研究学习使用,不得用于其他用途啊~ ...

  9. 域名抢注自动提交程序详解

    随着互联网的普及,域名的价值也逐渐被国人认识.域名投资具有投资少,风险低,回报率高等特点.但并非就是一本万利,他需要投资者具备相关的专业知识,对市场有准确的把握,才能从中获得更多的利益.本文将为大家简 ...

最新文章

  1. 【Zookeeper】源码分析之Leader选举(一)
  2. session传递参数_分布式 Session 之 Spring Session 架构与设计
  3. linux攻击端口,Linux 常见攻击端口封杀表
  4. VC MFC界面上显示BMP图片
  5. vue8种组件通信方式
  6. docker-compose 一键部署分布式配置中心Apollo
  7. 修改vant 弹窗Dialog组件调用是确认按钮与取消按钮的文字
  8. mysql处理重复数据
  9. java jtextfield 事件_java – 处理JTextField中的编辑事件
  10. caj文件浏览器_史上最全:提高律师工作效率必不可少的27款浏览器插件
  11. 肚子上挂张画就能隐身:AI完全看不出我在哪,更看不出我是人类了 | 开源
  12. 浅谈CIVIL 3D
  13. 如何将特定提交推送到远程,而不是之前的提交?
  14. linux如何查看 GPU的信息
  15. 浏览器极速模式和兼容模式差异
  16. Qt语言家使用中遇到的问题及解决方案
  17. java replace会替换吗,java替换字符_java replace字符替换函数
  18. 全量、增量 数据抽取 同步
  19. TP路由器的ip映射配置
  20. 计算机网络安全中的审计,什么是网络安全审计

热门文章

  1. 华为或向苹果出售 5G 芯片;拼多多回应苹果停止供货;微信再推新功能! | 极客头条...
  2. 日本乐天要求员工学编程,AI 进中小学课堂,全民编程时代来了!
  3. 如何使用 Lucene 做网站高亮搜索功能?
  4. 90 后篮球运动员成功转型 iOS 开发,过程超刺激
  5. 今日头条们:一边道歉一边做大
  6. 今日头条们的 App 内容页技术实现与优化 | CSDN技术头条
  7. 限速牌的单位是什么_成熟的造车新势力应该是什么样的?
  8. mysql避免死锁的方法
  9. android 拼接参数,Android 多参数多文件同时上传
  10. linux+arm+移除X11,关于ARM GTK/X11的问题,懂的指点一下