这是一份示例:
dim ie
set ie=createobject(“internetexplorer.application”)
ie.visible=true
ie.navigate “http://www.renren.com/PLogin.do”
while ie.busy or ie.readystate<>4
Wend
ie.document.getElementByID(“email”).value=”账号”
ie.document.getElementByID(“password”).value=”密码”
ie.document.getElementByID(“autoLogin”).checked=”如果有自动登陆选项,选择自动登陆值设置为true”
ie.document.all.loginform.submit
不同网站需要修改不同的值。填完信息后应当使用encode工具对脚本进行加密。