bin0131 发表于 2009-1-27 19:21:41

为什么send输出不正确那

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
dim $a
GUICreate("",400,400)
$a=GUICtrlCreateInput("",80,30,280,20)
GUISetState(@SW_SHOW)
Func copy()
        run("telnet")
        sleep(1000)
        send($a)
        EndFunc
while 1
        HotKeySet("{F6}","copy")
        $msg=GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
        WEnd

[ 本帖最后由 bin0131 于 2009-1-29 21:33 编辑 ]

sxd 发表于 2009-1-27 20:00:32

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Dim $a
HotKeySet("{F6}", "copy")

GUICreate("", 400, 400)
$Input1 = GUICtrlCreateInput("", 80, 30, 280, 20)
GUISetState(@SW_SHOW)

While 1
        $msg = GUIGetMsg()
        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

Func copy()
        Run("telnet")
        Sleep(1000)
        $a = GUICtrlRead($Input1)
        Send($a)
EndFunc   ;==>copy

bin0131 发表于 2009-1-28 15:45:43

谢谢上面的,可以了

sxd 发表于 2009-1-28 22:09:31

概念很重要啊
我现在有的概念不清楚 很多都不会 哎
页: [1]
查看完整版本: 为什么send输出不正确那