中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-07 23:29
48,041 主题排行 / 350,128 发帖 / 今日 3 篇 / 48,252 会员排行
DOS批处理 & 脚本技术(批处理室) » aspx网页脚本登陆问题
可打印版本  876 / 6
第1楼 32225cr 发表于 2008-03-31 23:40
初级用户 发帖 12 积分 25
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
请高手指教
第2楼 32225cr 发表于 2008-04-01 00:05
初级用户 发帖 12 积分 25
我把付值变量 改成 UserName_text 也不行 没有人帮我看看吗
第3楼 32225cr 发表于 2008-04-01 09:51
初级用户 发帖 12 积分 25
哪位好心人帮我看看 啊
第4楼 32225cr 发表于 2008-04-01 10:45
初级用户 发帖 12 积分 25
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}"
这种登陆可以实现 但是容易出错 没有人能帮我想想赋值的办法吗
第5楼 32225cr 发表于 2008-04-01 11:13
初级用户 发帖 12 积分 25
vbscript不能实现在客户端提交吗
第6楼 32225cr 发表于 2008-04-01 11:19
初级用户 发帖 12 积分 25
有没有好心人帮个忙 我是新手
第7楼 abcd 发表于 2008-04-01 13:08
银牌会员 发帖 739 积分 1,436
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023