how to send multiple line to comspec??

[adrian_9832]

hi all

normally we use winactive to send text to cmd.EXE like:

Code: Select all

run, %comspec% /k
WinWait, %comspec%
WinActivate
Send stop{Enter}

sometime can run command like :

Code: Select all

run,%comspec% /k ver&time /t&date /t`n

or

Code: Select all

objShell := ComObjCreate("WScript.Shell")
objExec := objShell.Exec(ComSpec " /c stop")

strStdOut := ""
while, !objExec.StdOut.AtEndOfStream
{
       strStdOut := objExec.StdOut.ReadAll()
}

but normally is single command
can someone know how to send command to cmd and use multiple line ??

[garry]

example , send commands when start and later followed command ( if needed )

Code: Select all

#warn
#NoEnv                       ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input               ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
wa:=a_screenwidth,ha:=a_screenheight,W :=(wa*50)/100,H :=(ha*92)/100
e4x=
(Ltrim join&
@echo off
echo date=
date /t
echo time=
time /t
)
title2=DOS_TEST
run, %comspec% /T:0A /k "title %title2%&mode con lines=4000 cols=120&%e4x%,,,pid2
WinWait, ahk_pid %pid2%
WinMove, ahk_pid %pid2%, ,1,1,%w%,%h%       ;- move DOS window to the defined position
WinWaitactive, ahk_pid %pid2%
controlsend,,{text}ver`n,ahk_pid %pid2%
sleep,1000
controlsend,,{text}echo @@@ -- quit in 5 seconds`n,ahk_pid %pid2%
sleep,5000
controlsend,,{text}exit`n,ahk_pid %pid2%
return
;=======================================