Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 06/30/2023 in all areas

  1. Right control key is {RCTRL}.
    1 point
  2. Thank you Dan! It works beautifully with your solution.
    1 point
  3. @PnD You should try using _WD_ElementActionEx with the Check / Uncheck options.
    1 point
  4. There are multiple ways to get the STDOUT/STDERR from a process. If you need the info in real-time, then you can read the STDOUT/STDERR in a loop. If you can wait until the process has completed, then you can get the STDOUT/STDERR in a single read. Below, you will find 3 different examples of getting STDOUT (using a loop, using redirection, and using ProcessWaitClose). Notice the execution times. Using ProcessWaitClose is much slower than the other 2 methods. #AutoIt3Wrapper_AU3Check_Parameters=-w 3 -w 4 -w 5 -w 6 -d #include <Constants.au3> #include <File.au3> stdout_processwaitclose_read_example() stdout_redirect_example() stdout_read_loop_example() Func stdout_redirect_example() Local $hTimer = TimerInit() Local $sCmdLine = "", _ $sStdOut = "", _ $sTempFile = _TempFile() Local $iExitCode = 0, _ $iTicks = 0 ;Build command line and run it $sCmdLine = StringFormat(@ComSpec & ' /c dir c:\ > "%s"', $sTempFile) $iExitCode = RunWait($sCmdLine, "", @SW_HIDE) If @error Then Return MsgBox($MB_ICONERROR, "Run Error", "Run function failed.") ;Get elapsed time $iTicks = TimerDiff($hTimer) ;Read STDOUT $sStdOut = FileRead($sTempFile) FileDelete($sTempFile) ;Display results ConsoleWrite("===========================================" & @CRLF) ConsoleWrite("STDOUT Redirection Example" & @CRLF) ConsoleWrite("Cmd: " & $sCmdLine & @CRLF) ConsoleWrite("Exit Code: " & $iExitCode & @CRLF) ConsoleWrite("Execution time: " & StringFormat("%.3f seconds", $iTicks / 1000) & @CRLF & @CRLF) ConsoleWrite("Output" & @CRLF) ConsoleWrite($sStdOut & @CRLF) EndFunc Func stdout_processwaitclose_read_example() Local $hTimer = TimerInit() Local $sCmdLine = "", _ $sStdOut = "" Local $iPid = 0, _ $iExitCode = 0, _ $iTicks = 0 ;Build command line and run it $sCmdLine = @ComSpec & " /c dir c:\" $iPid = Run($sCmdLine, "", @SW_HIDE, $STDERR_MERGED) If @error Then Return MsgBox($MB_ICONERROR, "Run Error", "Run function failed.") ;Wait for process to end and get exit code ProcessWaitClose($iPid) $iExitCode = @extended ;Get elapsed time $iTicks = TimerDiff($hTimer) ;Read STDOUT $sStdOut = StdoutRead($iPid) ;Display results ConsoleWrite("===========================================" & @CRLF) ConsoleWrite("STDOUT ProcessWaitClose Example" & @CRLF) ConsoleWrite("Cmd: " & $sCmdLine & @CRLF) ConsoleWrite("Exit Code: " & $iExitCode & @CRLF) ConsoleWrite("Execution time: " & StringFormat("%.3f seconds", $iTicks / 1000) & @CRLF & @CRLF) ConsoleWrite("Output" & @CRLF) ConsoleWrite($sStdOut & @CRLF) EndFunc Func stdout_read_loop_example() Local $hTimer = TimerInit() Local $sCmdLine = "", _ $sStdOut = "" Local $iPid = 0, _ $iTicks = 0 ConsoleWrite("===========================================" & @CRLF) ;Build command line and run it $sCmdLine = @ComSpec & " /c dir c:\" $iPid = Run($sCmdLine, "", @SW_HIDE, $STDERR_MERGED) If @error Then Return MsgBox($MB_ICONERROR, "Run Error", "Run function failed.") ;Read & display stdout until EOF While 1 $sStdOut = StdoutRead($iPid) If @error Then ExitLoop ConsoleWrite($sStdOut) WEnd ;Get elapsed time $iTicks = TimerDiff($hTimer) ;Display results ConsoleWrite(@CRLF) ConsoleWrite("STDOUT Read Loop Example" & @CRLF) ConsoleWrite("Cmd: " & $sCmdLine & @CRLF) ConsoleWrite("Execution time: " & StringFormat("%.3f seconds", $iTicks / 1000) & @CRLF & @CRLF) EndFunc Output: =========================================== STDOUT ProcessWaitClose Example Cmd: C:\Windows\system32\cmd.exe /c dir c:\ Exit Code: 0 Execution time: 0.269 seconds Output Volume in drive C is System Volume Serial Number is 2415-44AF Directory of c:\ 01/04/2023 10:36 AM <DIR> APCPowerChuteConfig 06/24/2023 12:05 AM <DIR> Commands 08/21/2016 11:37 AM <DIR> Dell 01/28/2022 11:17 AM <DIR> ESD 03/16/2019 04:55 PM <DIR> FtpRoot 12/29/2016 07:00 PM <DIR> Intel 07/13/2009 10:20 PM <DIR> PerfLogs 06/12/2023 10:31 AM <DIR> Portable Apps 06/29/2023 07:04 AM <DIR> Program Files 06/07/2023 04:03 PM <DIR> Program Files (x86) 01/09/2021 01:20 PM <DIR> Projects 06/29/2023 09:09 AM <DIR> Temp 03/11/2022 10:12 AM <DIR> Users 06/26/2023 04:11 PM <DIR> Utils 03/19/2023 01:00 AM <DIR> Windows 0 File(s) 0 bytes 15 Dir(s) 761,011,408,896 bytes free =========================================== STDOUT Redirection Example Cmd: C:\Windows\system32\cmd.exe /c dir c:\ > "C:\Temp\~wqugzpr.tmp" Exit Code: 0 Execution time: 0.014 seconds Output Volume in drive C is System Volume Serial Number is 2415-44AF Directory of c:\ 01/04/2023 10:36 AM <DIR> APCPowerChuteConfig 06/24/2023 12:05 AM <DIR> Commands 08/21/2016 11:37 AM <DIR> Dell 01/28/2022 11:17 AM <DIR> ESD 03/16/2019 04:55 PM <DIR> FtpRoot 12/29/2016 07:00 PM <DIR> Intel 07/13/2009 10:20 PM <DIR> PerfLogs 06/12/2023 10:31 AM <DIR> Portable Apps 06/29/2023 07:04 AM <DIR> Program Files 06/07/2023 04:03 PM <DIR> Program Files (x86) 01/09/2021 01:20 PM <DIR> Projects 06/29/2023 09:12 AM <DIR> Temp 03/11/2022 10:12 AM <DIR> Users 06/26/2023 04:11 PM <DIR> Utils 03/19/2023 01:00 AM <DIR> Windows 0 File(s) 0 bytes 15 Dir(s) 761,011,404,800 bytes free =========================================== Volume in drive C is System Volume Serial Number is 2415-44AF Directory of c:\ 01/04/2023 10:36 AM <DIR> APCPowerChuteConfig 06/24/2023 12:05 AM <DIR> Commands 08/21/2016 11:37 AM <DIR> Dell 01/28/2022 11:17 AM <DIR> ESD 03/16/2019 04:55 PM <DIR> FtpRoot 12/29/2016 07:00 PM <DIR> Intel 07/13/2009 10:20 PM <DIR> PerfLogs 06/12/2023 10:31 AM <DIR> Portable Apps 06/29/2023 07:04 AM <DIR> Program Files 06/07/2023 04:03 PM <DIR> Program Files (x86) 01/09/2021 01:20 PM <DIR> Projects 06/29/2023 09:12 AM <DIR> Temp 03/11/2022 10:12 AM <DIR> Users 06/26/2023 04:11 PM <DIR> Utils 03/19/2023 01:00 AM <DIR> Windows 0 File(s) 0 bytes 15 Dir(s) 761,011,408,896 bytes free STDOUT Read Loop Example Cmd: C:\Windows\system32\cmd.exe /c dir c:\ Execution time: 0.010 seconds
    1 point
  5. ? #include <GUIConstantsEx.au3> #include <GuiRichEdit.au3> #include <WindowsConstants.au3> $hGui = GUICreate("Example", 320, 350, -1, -1) $hRichEdit = _GUICtrlRichEdit_Create($hGui, "This is a test.", 10, 10, 300, 220) GUISetState() _GUICtrlRichEdit_SetEventMask($hRichEdit, $ENM_KEYEVENTS) GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY") While 1 $iMsg = GUIGetMsg() Select Case $iMsg = $GUI_EVENT_CLOSE $txt = StringReplace(_GUICtrlRichEdit_StreamToVar($hRichEdit), "<CR>", "\line ") _GUICtrlRichEdit_StreamFromVar($hRichEdit, $txt) _GUICtrlRichEdit_StreamToFile($hRichEdit, @DesktopDir & "\test.rtf") _GUICtrlRichEdit_Destroy($hRichEdit ; needed unless script crashes Exit EndSelect WEnd Func WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam) #forceref $iMsg, $wParam Local $hWndFrom, $iCode, $tNMHDR, $tMsgFilter, $hMenu $tNMHDR = DllStructCreate($tagNMHDR, $lParam) $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom")) $iCode = DllStructGetData($tNMHDR, "Code") Switch $hWndFrom Case $hRichEdit Select Case $iCode = $EN_MSGFILTER $tMsgFilter = DllStructCreate($tagMSGFILTER, $lParam) Switch DllStructGetData($tMsgFilter, "msg") Case $WM_KEYDOWN $key = DllStructGetData($tMsgFilter, "wparam") If $key = 13 Then _GUICtrlRichEdit_AppendText($hRichEdit, "<CR>") ; @CR Return 1 ; don't process newline in richedit EndIf EndSwitch EndSelect EndSwitch Return $GUI_RUNDEFMSG EndFunc ;==>WM_NOTIFY
    1 point
×
×
  • Create New...