VBS打开网站后台自动写帐号密码登陆

VBS打开网站后台自动输入帐号密码登陆,验证码我已经去掉了.
Set ie = CreateObject("internetexplorer.application")
ie.navigate "http://www.123.com"
ie.Visible = true

有更好的方法吗?

---

必须要用VBS吗？个人感觉用AutoIt脚本应该要简单得多。

比如下面这段AutoIt脚本就是自动在IE里面行乱打开Google首页，然后自动输入“AutoIt”这个关键字并提交查询。

#include <IE.au3>

$oIE = _IECreate()
_IENavigate($oIE, "http://www.google.com")
$oForm = _IEFormGetObjByName($oIE, "f")
$oQuery = _IEFormElementGetObjByName($oForm, "q")
_IEFormElementSetValue($oQuery, "AutoIt")
_IEFormSubmit($oForm)

所以楼主只要提供网址、表单名称、账号和密码两个表单域的名称，就可以实现完全自动的登陆。

AutoIt是一个很强大的脚本语言，不仅提供了丰富的库扮手函数支持、以及语法高亮的IDE，甚至还可以把脚本直接编译成可执行文件*.exe，运行起来速度更快。楼主可以到网上去搜搜它的官网下载，完全免费的。

至于楼主的问题，如果用AutoIt来做的话，对应的脚本就是：
#include <IE.au3>

$oIE = _IECreate()
_IENavigate($oIE, "网址")
$oForm = _IEFormGetObjByName($oIE, "表单名称")
_IEFormElementSetValue(_IEFormElementGetObjByName($oForm, "账号输入域名称"), "账号")
_IEFormElementSetValue(_IEFormElementGetObjByName($oForm, "密码输入域名称"), "密码")
_IEFormSubmit($oForm)

将上面脚本中的相关参数替换成实际的数据即可。

表单名称，指的是网站HTML中 <form name="表单名称" ..>
输入域名称，指的是网站HTML中 <input name="输入域名称" ...>

要是有档缺档什么问题可以再补充提问或者和我联系。

---

不知道你要的是不是全部的 我就给拿过来吧 呵呵

Set ie=WScript.CreateObject("InternetExplorer.Application"桐闹毁) 'CreateObject
方法 创建 COM 对象
ie.visible=true '1表示能看到，0表示不能看到
ie.navigate "http://192.168.100.99:8080/forp" 'web导航
Do 'Do...Loop 语句，当条件为 True 时或条件变为 True 之前重复执行某语句块。
Wscript.Sleep 1000 '暂停1秒，Sleep 方法弯咐 在指定的时间长度内将脚本执行挂起，然后继续执行。
Loop Until ie.ReadyState=4 '直到网页读取完毕为止
ie.document.getElementById("username").value="huiji" '设置用户名，getElementById获取ID的属性，value值
ie.document.getElementById("password").value="xiaofeng" '设置密码，
tj=ie.document.getElementsBytagname("form") '定义tj的变量，getElementsBytagname获取标签名称
tj.submit '提交局备

---

可以试缓碰试用vbs中的sendkeys来做纯哪升，如果那个网页可以接受tab按键的话

你可以把网址发过来，我看行不行
————————————————————————————
二楼说的有点问题，有的网页元素是不接受tab键的，无法转到，又

怎么定做老位，怎么对元素进行发送击键呢

---

sendkeys VBS键稿指衫盘模拟
也就逗做是说不用鼠标而只用键盘可以操作的东西
都可以键腔用VBS做出来

---

头疼

---