Board logo

标题: aspx网页脚本登陆问题 [打印本页]

作者: 32225cr     时间: 2008-3-31 23:40    标题: aspx网页脚本登陆问题

想对   http://www.netyi.net/jsLoginStatus.aspx 实现脚本登陆
代码如下
set Wshell=WScript.createobject("WScript.shell")
appname="http://www.netyi.net/jsLoginStatus.aspx"
set ie=WScript.createobject("internetexplorer.application")
ie.visible=true'
ie.navigate "http://www.netyi.net/jsLoginStatus.aspx"
do
Wscript.sleep 400
loop until ie.readystate=4
UserName.value="用户名"
Password.value="密码"
wshell.sendkeys "~"
wscript.sleep 10000

运行后  老是报缺少对象 UserName  但是我看了网站的登陆 是 UserName
请高手指教
作者: 32225cr     时间: 2008-4-1 00:05
我把付值变量 改成 UserName_text 也不行  没有人帮我看看吗
作者: 32225cr     时间: 2008-4-1 09:51
哪位好心人帮我看看 啊
作者: 32225cr     时间: 2008-4-1 10:45
Dim a
Set a=WScript.CreateObject("WScript.shell")
a.run "http://www.netyi.net/jsLoginStatus.aspx"
WScript.Sleep 3000  
a.SendKeys "{TAB}"
a.SendKeys "{TAB}"
a.SendKeys "{TAB}"
a.SendKeys "{TAB}"
a.SendKeys "{TAB}"
a.SendKeys "{TAB}"
a.SendKeys "{TAB}"
a.SendKeys "{TAB}"
a.SendKeys "用户名"
WScript.Sleep 1000
a.SendKeys "{TAB}"
a.SendKeys "密码"
a.SendKeys "{TAB}"
a.SendKeys "{ENTER}"
这种登陆可以实现  但是容易出错 没有人能帮我想想赋值的办法吗
作者: 32225cr     时间: 2008-4-1 11:13
vbscript不能实现在客户端提交吗
作者: 32225cr     时间: 2008-4-1 11:19
有没有好心人帮个忙  我是新手
作者: abcd     时间: 2008-4-1 13:08
CODE:  [Copy to clipboard]
set Wshell=WScript.createobject("WScript.shell")
appname="http://www.netyi.net/jsLoginStatus.aspx"
set ie=WScript.createobject("internetexplorer.application")
ie.visible=true'
ie.navigate "http://www.netyi.net/jsLoginStatus.aspx"
do
   Wscript.sleep 400
loop until ie.readystate=4
ie.document.form2.UserName.value="用户名"
ie.document.form2.Password.value="密码"
wshell.sendkeys "~"
wscript.sleep 10000





欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) Powered by Discuz! 2.5