输入用户名和密码后回车 错误

zhudizi521

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=F:\AU3\Form1.kxf
$Form1 = GUICreate("北科祥云专用内部测试", 427, 295, 218, 124)
$BY_David = GUICtrlCreateLabel("BY_David", 344, 264, 60, 17)
$Button1 = GUICtrlCreateButton("检查网关", 56, 136, 73, 33, 0)
$Button2 = GUICtrlCreateButton("检查外网", 56, 192, 73, 33, 0)
$Button3 = GUICtrlCreateButton("显示本机IP", 56, 80, 73, 33, 0)
$Button4 = GUICtrlCreateButton("修改IP地址", 56, 24, 73, 33, 0)
$Button5 = GUICtrlCreateButton("控制面板", 280, 24, 73, 33, 0)
$Button6 = GUICtrlCreateButton("TELNET", 288, 128, 73, 33, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
Case $Button6
          Run("telnet 10.1.40.1 "); 检查telnet
WinActivate("telnet 10.1.40.1 ") ;激活窗口
Send("guest {Enter}");输入用户名
WinActivate("telnet 10.1.40.1 ") ;激活窗口
Send("guest {Enter}");输入密码
WinActivate("telnet 10.1.40.1 ") ;激活窗口
Send("netadmin {Enter}")输入高极密码
WinActivate("telnet 10.1.40.1 ") ;激活窗口
        EndSwitch
WEnd
现在问题是输入第一行的guest后.第二行好行就不能输入了.
看上去输入的是uest,而不是guest 了.

[ 本帖最后由 zhudizi521 于 2008-10-28 15:46 编辑 ]

gs008970

Send("1guest {Enter}");输入用户名

试试在guest前面加一位数字或者字母。

还有，好像没有必要要这么多的
WinActivate("telnet 10.1.40.1 ") ;激活窗口
吧。

[ 本帖最后由 gs008970 于 2008-10-28 14:31 编辑 ]

gs008970

或者在  Run("telnet 10.1.40.1 "); 检查telnet
后面设置一个时间延迟。Sleep(2000);脚本暂停2秒
只是这样想，不知道行不行得通。必竟telnet连接会用一定的时间。
而Send("guest {Enter}")的时候正好还在连接等待中。所以有可能会少输入一个字符。

[ 本帖最后由 gs008970 于 2008-10-28 14:41 编辑 ]

liongodmien

这里有可能有一个时间差，延时试一下

zhudizi521

Send("1guest {Enter}");输入用户名
好相是不可以哦.

我在dos下是这样的.:是不是要光标给定位?还是哪的错误
输入第一个guest,回车,到password:输入第二个guest

Sleep(2000);脚本暂停2秒  
加上去了.
为什么,在password:输入第二个guest 后还是反回到login:
* Netcore network products series
login:guest
password:
Welcome guest
7801>

[ 本帖最后由 zhudizi521 于 2008-10-28 14:47 编辑 ]

gs008970

我在二楼说的那个方法不一定行得通。因为是我写QQ自动登录的时候，QQ密码提示不对才出此下策。你用时间延迟的方法试了吗？

[ 本帖最后由 gs008970 于 2008-10-28 14:48 编辑 ]

gs008970

呃。这就不知道了哦。返回到login说明你的密码输入不正确才会返回。

zhudizi521

Case $Button6
          Run("telnet 10.1.40.1 "); 检查telnet
                  Sleep(2000);脚本暂停2秒
WinActivate("telnet 10.1.40.1 ") ;激活窗口
Send("guest {Enter}");
Sleep(1000);脚本暂停1秒

Send("guest {Enter}");
Sleep(1000);脚本暂停1秒


        EndSwitch

zhudizi521

用户名和密码是一样的.我做这个是连接到三层交换机.然后再输出所有的MAC表.

现在怎么也连接不上...

gs008970

用户和密码一样的话，你手动输入肯定是能连上的。现在用代码来实现，连不上，说明问题就出在send第二个guest的时候。

zhudizi521

对.有啥好解决办法吗.

zhudizi521

感谢  liongodmien 的帮助

问题以解决.
Send("guest这里多了一个空格{Enter}");
所以才出现这种问题...


多谢谢
也谢谢.楼上的兄弟帮忙/

gs008970

原来是代码多了个空格。我咋就没看到呢？

[ 本帖最后由 gs008970 于 2008-10-28 15:06 编辑 ]

zhudizi521

感谢  liongodmien 的帮助

问题以解决.
Send("guest这里多了一个空格{Enter}");
所以才出现这种问题...


多谢谢
也谢谢.楼上的兄弟帮忙/

731106

代码收下,刚开始学这个,不错喔,达到我想要的效果了,谢谢,阿门