找回密码
 加入
搜索
查看: 2906|回复: 3

求教:登陆宽带猫的窗口,如何输入用户名密码

[复制链接]
发表于 2008-9-6 23:00:07 | 显示全部楼层 |阅读模式

#include<ie.au3>
dim $name1="admin",$pass1="admin",$name2="telecomadmin",$pass2="nE7jA%5m"
$soie=_IECreate("192.168.1.1")
WinActivate("连接到 192.168.1.1","此服务器要求")
if winwait("连接到 192.168.1.1","")Then
        ControlSetText("连接到 192.168.1.1","","Edit2",$name1)
        ControlSetText("连接到 192.168.1.1","","Edit3",$pass1)
        send("enter")
        EndIf
        Exit
刚学一个星期,请教下各们高手,如何能自动填入用户名和密码呢?
始终等不到这窗口,为什么

[ 本帖最后由 冲盈 于 2008-9-7 12:46 编辑 ]
发表于 2008-9-7 00:03:48 | 显示全部楼层
应该是先等窗口出现才操作的。建议尝试一下:

WinWait("连接到 192.168.1.1", "", 10)
If WinExists("连接到 192.168.1.1") Then
        WinActivate("连接到 192.168.1.1")
        ControlSetText("连接到 192.168.1.1","","Edit2",$name1)
        ControlSetText("连接到 192.168.1.1","","Edit3",$pass1)
        Send("{ENTER}")
EndIf
发表于 2008-9-7 11:10:28 | 显示全部楼层
Run ( @ProgramFilesDir & "\Internet Explorer\iexplore.exe 192.168.1.1" )
WinWaitActive ( "连接到 192.168.1.1" )
WinActivate( "连接到 192.168.1.1" )
ControlSetText ( "连接到 192.168.1.1", "", "Edit2", "admin" )
ControlSetText ( "连接到 192.168.1.1", "", "Edit3", "admin" )
ControlClick ( "连接到 192.168.1.1", "", "Button2" )


这样写应该没问题吧

评分

参与人数 1金钱 +5 收起 理由
冲盈 + 5 高手呀!感谢非常,

查看全部评分

 楼主| 发表于 2008-9-7 12:40:49 | 显示全部楼层
谢谢楼上的两位热心兄弟,再次感谢
3楼的代码可以解决,
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-11 18:11 , Processed in 0.078389 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表