隐藏界面下，模拟创建一个宽带连接。

qwer123 · 发表于 2009-6-10 17:16:31

本帖最后由 qwer123 于 2009-6-11 09:47 编辑

想在隐藏界面下，模拟创建一个宽带连接。

以下是一部分代码：
run("RUNDLL32 netshell.dll,StartNCW","",@SW_MINIMIZE)
winwait("新建连接向导","欢迎使用新建连接向导")
ControlClick("新建连接向导","欢迎使用新建连接向导","Button2")
;到运行到这步就不能接着下去
winwait("新建连接向导","连接到 Internet")
ControlClick("新建连接向导","欢迎使用新建连接向导","Button6")
winwait("新建连接向导","从 Internet 服务提供商(ISP)列表选择(&L)")
ControlClick("新建连接向导","从 Internet 服务提供商(ISP)列表选择(&L)","Button2")
ControlClick("新建连接向导","从 Internet 服务提供商(ISP)列表选择(&L)","Button12")
winwait("新建连接向导","新建连接向导")
ControlClick("新建连接向导","新建连接向导","Button2")
ControlClick("新建连接向导","新建连接向导","Button15")
winwait("新建连接向导","在下面框中输入您的 ISP 的名称")
ControlClick("新建连接向导","在下面框中输入您的 ISP 的名称","Button15")

不知道到了第二个窗口("新建连接向导","连接到 Internet")就不能接着运行下去，是哪里出错了？

kn007 · 发表于 2009-6-10 17:20:24

给你个可以的

Run("rundll32.exe netshell.dll,StartNCW")
WinWaitActive("新建连接向导")                      ;监视活动窗口
Send("!N")                                          ;发送键盘指令
WinWaitActive("新建连接向导")
send("!N")
WinWaitActive("新建连接向导")
Send("{down}")
send("!N")
WinWaitActive("新建连接向导")
Send("{down}")
send("!N")
WinWaitActive("新建连接向导")
send("!N")
WinWaitActive("新建连接向导")
ControlSend("新建连接向导","用户名", "Edit1", ($name))            ;输入文本输入框变量字符
ControlSend("新建连接向导","密码", "Edit2", ($pass))
ControlSend("新建连接向导","密码", "Edit3", ($pass))
send("!N")
WinWaitActive("新建连接向导")
send("{SPACE}")
send("{enter}")

kn007 · 发表于 2009-6-10 17:21:09

对了，隐藏界面按你的代码是不可能执行的

我有点懒，而且我是英文系统

qwer123 · 发表于 2009-6-10 17:27:11

在有界面的情况下，我自己可以做出来。
你这个不是我想要的，我要隐藏。

隐藏界面同样可以模拟出来呀，我的第一个界面可以执行，到了第二个就不行了

kn007 · 发表于 2009-6-10 17:36:30

你不是最小化而已？

qwer123 · 发表于 2009-6-10 17:40:12

你不是最小化而已？
kn007 发表于 2009-6-10 17:36

是的，是最小化，完全隐藏应该是不行的

kn007 · 发表于 2009-6-10 17:54:39

你最小化后，WinWait是等待窗口出现，你出现在哪啊？所以失败咯，总觉得不可能写成功，除非直接脚本，不能按键脚本，按键是不可能的

qwer123 · 发表于 2009-6-10 18:06:17

你最小化后，WinWait是等待窗口出现，你出现在哪啊？所以失败咯，总觉得不可能写成功，除非直接脚本，不能按键脚本，按键是不可能的
kn007 发表于 2009-6-10 17:54

http://autoitx.com/forum.php?mod ... hlight=%D2%FE%B2%D8

kn007 · 发表于 2009-6-10 21:39:33

那你就试试咯，英文版XP和你中文版XP还是不一样的

winwait('')
winsetstate('', '', @sw_hide)
control******

kn007 · 发表于 2009-6-10 22:06:36

#NoTrayIcon;其实你就一懒猪，知道怎么做，自己也不做   By kn007
Run("RUNDLL32 netshell.dll,StartNCW");最好不动鼠标，不然有时不行的
$hd="New Connection Wizard";把这里改为你中文版的窗口名，一般为 新建连接向导
WinWait($hd)
WinSetState($hd, '', @SW_HIDE)
ControlClick($hd,"","Button2");注意Button后的数字，自己看看相不相同，你按下一步，再按上一步，按键数字会发生变化
Sleep(500);为了确保可行，可以不要的
ControlClick($hd,"","Button6")
Sleep(500)
ControlClick($hd,"","Button2")
Sleep(500)
ControlClick($hd,"","Button9")
Sleep(500)
ControlClick($hd,"","Button2")
Sleep(500)
ControlClick($hd,"","Button12")
Sleep(500)
ControlSetText($hd,"","Edit1","宽带连接")
Sleep(500)
ControlClick($hd,"","Button12")
Sleep(500)
ControlSetText($hd,"","Edit1","test");用户名
ControlSetText($hd,"","Edit2","test");密码
ControlSetText($hd,"","Edit3","test");再次密码
ControlClick($hd,"","Button17")
Sleep(500)
ControlCommand($hd,"","Button1","Check","");加上WinSetState，这句好像失效，ControlClick也不行，UnCheck就更不行。。。也就是说桌面不会出现，就控制面板有
ControlClick($hd,"","Button21")
Sleep(500)
Exit

kn007 · 发表于 2009-6-10 22:19:01

本帖最后由 kn007 于 2009-6-10 22:32 编辑

看看可以不。。。

kn007 · 发表于 2009-6-10 22:32:53

搜索下你的帖子，全部都是求助。。。

qwer123 · 发表于 2009-6-10 23:23:37

本帖最后由 qwer123 于 2009-6-10 23:37 编辑

搜索下你的帖子，全部都是求助。。。
kn007 发表于 2009-6-10 22:32

晕了，我是刚入门的菜鸟，连这种贴都要求救，我能帮别人吗？

谢谢你了，就控制面板有，桌面不会出现

原来我的问题是出现在
run("RUNDLL32 netshell.dll,StartNCW","",@SW_MINIMIZE)

kn007 · 发表于 2009-6-11 00:56:55

假如你的问题得到解决.请发贴人,编辑主题.把分类改为[已解决]
问题解决，超过一个月时间不更改标题为“已解决”的，一律扣分处理！！！
举手之劳,利国利民

好了也不改

kn007 · 发表于 2009-6-11 00:57:36

你给的帖子说的很明白，文盲吧你

		自动登录	找回密码
密码			加入