AutoIt 编写telnet程序

最新推荐文章于 2017-10-03 08:32:20 发布

_明天太阳

最新推荐文章于 2017-10-03 08:32:20 发布

阅读量3k

点赞数

文章标签： command user login input

本文链接：https://blog.csdn.net/hao00zzb/article/details/5854116

版权

AutoItSetOption("WinTitleMatchMode", 4)
; Run cmd
Run("Cmd.exe")
Sleep(500)
; Rename window
$WinTitle="Telnet (NE Gateway)"
WinSetTitle("Telnet 192.168.56.101","",$WinTitle)
WinActivate($WinTitle,"")
$hWnd = WinGetHandle("classname=ConsoleWindowClass")

; Login and change to export directory
xSend($WinTitle," telnet ipAddress",$hWnd)
xSend($WinTitle,"username",$hWnd)
xSend($WinTitle,"password",$hWnd)
xSend($WinTitle,"command",$hWnd)
xSend($WinTitle,"",$hWnd)
xSend($WinTitle,"logout",$hWnd)

; Extended send function
func xSend($aWinTitle,$aString,$hWnd)
Sleep(200)
WinActivate($aWinTitle,"")
LoadKeyboardLayout("00000804",$hWnd)
Send($aString & "{ENTER}")
endfunc

;Set current window input method
Func LoadKeyboardLayout($sLayoutID, $hWnd)
    Local $WM_INPUTLANGCHANGEREQUEST = 0x50
    Local $ret = DllCall("user32.dll", "long", "LoadKeyboardLayout", "str", $sLayoutID, "int", 1 + 0)
    DllCall("user32.dll", "ptr", "SendMessage", "hwnd", $hWnd, "int", $WM_INPUTLANGCHANGEREQUEST, "int", 1, "int", $ret[0])
EndFunc