中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » aspx网页脚本登陆问题

作者:

标题: aspx网页脚本登陆问题

上一主题 | 下一主题

32225cr
初级用户

积分 25
发帖 12
注册 2006-7-18
状态离线

『楼主』: aspx网页脚本登陆问题使用 LLM 解释/回答一下

想对 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
请高手指教

2008-3-31 23:40

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

32225cr
初级用户

积分 25
发帖 12
注册 2006-7-18
状态离线

『第 2 楼』: 使用 LLM 解释/回答一下

我把付值变量改成 UserName_text 也不行没有人帮我看看吗

2008-4-1 00:05

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

32225cr
初级用户

积分 25
发帖 12
注册 2006-7-18
状态离线

『第 3 楼』: 使用 LLM 解释/回答一下

哪位好心人帮我看看啊

2008-4-1 09:51

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

32225cr
初级用户

积分 25
发帖 12
注册 2006-7-18
状态离线

『第 4 楼』: 使用 LLM 解释/回答一下

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}"
这种登陆可以实现但是容易出错没有人能帮我想想赋值的办法吗

2008-4-1 10:45

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

32225cr
初级用户

积分 25
发帖 12
注册 2006-7-18
状态离线

『第 5 楼』: 使用 LLM 解释/回答一下

vbscript不能实现在客户端提交吗

2008-4-1 11:13

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

32225cr
初级用户

积分 25
发帖 12
注册 2006-7-18
状态离线

『第 6 楼』: 使用 LLM 解释/回答一下

有没有好心人帮个忙我是新手

2008-4-1 11:19

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

abcd
银牌会员

积分 1436
发帖 739
注册 2007-10-11
状态离线

『第 7 楼』: 使用 LLM 解释/回答一下

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

2008-4-1 13:08

查看资料发短消息网志 OICQ

(470237592)

编辑帖子回复引用回复

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: