您的位置：程序门 -> windows专区 -> windows nt/2000/xp/2003

vbs脚本自动登陆问题

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

vbs脚本自动登陆问题[已结贴,结贴人:ngod]

发表于：2007-07-06 10:08:04 楼主

我在公司经常会用到oa网，每次都需要登陆，很是麻烦，我就写了下面的脚本自动登陆oa系统，在我的机器上（ie7）没有问题，每次都能正确登陆，但是在我同事的机器上（ie6）本能登陆，每次都能正确输入用户名和密码，在执行wshell.sendkeys "{enter} "时会打开另一个登陆页面，而不是执行登陆操作，各位高手能帮我看一下吗？？
' vbscript source code
set ie = createobject（ "internetexplorer.application ")
ie.visible = 1
ie.navigate "http://127.0.0.1 "
do while ie.busy
loop
ie.document.getelementbyid（ "uid ").value = "用户名 " '这里是你登陆的用户名
ie.document.getelementbyid（ "pwd ").value = "密码 " '这里是你登陆的密码
set wshell=wscript.createobject（ "wscript.shell ")
ie.document.getelementbyid（ "pwd ").focus（)
wshell.sendkeys "{enter} "

set ie = nothing
wscript.quit（0)

发表于：2007-07-06 10:22:441楼得分:20

wshell.sendkeys "{enter} "
在这句前面加一句
让登陆按钮获取焦点

发表于：2007-07-06 10:33:382楼得分:0

ljc007（及时结帖是一种美德)
好像不行啊！因为我让pwd得到焦点回车就可以登陆，而且那个登陆按钮是一个图片。
怎么在vbs中运行web中的javascript函数呢？

发表于：2007-07-06 10:46:013楼得分:0

pwd得到焦点后，在send一个tab键，登陆按钮就获得焦点了吧？

发表于：2007-07-06 11:00:124楼得分:0

我加上了，系统的开始采单出来了，呵呵！我想可能是没有将打开的ie窗口保持在激活状态的原因吧！
我再想法试试

发表于：2007-07-06 11:40:375楼得分:0

我解决了：
' vbscript source code
set ie = createobject（ "internetexplorer.application ")
set wshell=wscript.createobject（ "wscript.shell ")
ie.visible = 1
ie.navigate "http://127.0.0.1 "
do while ie.busy
loop
wshell.appactivate ie '加上这个可以让打开的ie窗口处于激活状态
ie.document.getelementbyid（ "uid ").value = "用户名 " '这里是你登陆的用户名
ie.document.getelementbyid（ "pwd ").value = "密码 " '这里是你登陆的密码

ie.document.getelementbyid（ "pwd ").focus（)
wshell.sendkeys "{enter} "

set ie = nothing
wscript.quit（0)

发表于：2007-07-06 12:03:046楼得分:0

恭喜

下一篇：两台ad域控制服务器的时间不对，如何调整？
上一篇：我的ie不能显示xml文件

其他资讯