[Solved] If WinWaitActive - Then Send

[armoros]

Hello my friends

I have this script in witch from a Button on Gui i want to execute a cmd command when it opens and execute the command in cmd window, with a second button i want to send a second command in same cmd window.

But the problem is that i have to click on the opened cmd window to be activated so the second button to be able to send the 2 command.

if you check the script please click first the [ipconfig] button and then the [nbtstat] button cause otherwise don't work. ( my prob is how to have the cmd window activated so to take the 2 command) i know that the script is lame...

Thank you in advance.

#include 
#include 
#include 
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 637, 120, 192, 114)
$Button1 = GUICtrlCreateButton("ipconfig", 40, 90, 75, 25)
$Button2 = GUICtrlCreateButton("nbtstat", 40, 50, 75, 25)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
  Case $Button1
   $cmd = GUICtrlRead($Button1)
            $pid = Run(@ComSpec & " /k " & $cmd, "")
  Case $Button2
   If WinWaitActive("C:\WINDOWS\system32\cmd.exe") then Send("nbtstat")
            Send ("{ENTER}")
EndSwitch
WEnd

Edited May 29, 2012 by armoros

[Country73]

You are waiting for the cmd window to be active instead of setting it to the Active state.

Take a look at the WinActive, WinActivate

Check to see if it is active: If Active then do this....

If not Active, then Activate the window and do this....

[armoros]

Thank you Country73 i will check and i post back.

[armoros]

You are waiting for the cmd window to be active instead of setting it to the Active state.

Take a look at the WinActive, WinActivate

Check to see if it is active: If Active then do this....

If not Active, then Activate the window and do this....

Yeah that made the trick Country73 thank you my friend for the help...

here is what i have after your help

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 637, 120, 192, 114)
$Button1 = GUICtrlCreateButton("ipconfig", 40, 90, 75, 25)
$Button2 = GUICtrlCreateButton("nbtstat", 40, 50, 75, 25)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
  Case $Button1
   $cmd = GUICtrlRead($Button1)
            $pid = Run(@ComSpec & " /k " & $cmd, "")
  Case $Button2
   If WinActive("C:\Windows\System32\cmd.exe") Then
   Send("nbtstat")
   Send ("{ENTER}")
EndIf
            If not WinActive("C:\Windows\System32\cmd.exe") Then
   WinActivate("C:\Windows\System32\cmd.exe")
            Send("nbtstat")
   Send ("{ENTER}")
EndIf
EndSwitch
WEnd

Thank you man

[Zedna]

Little optimization

global $cmd = "C:\Windows\System32\cmd.exe"
...

  Case $Button2
   If not WinActive($cmd) Then
     WinActivate($cmd)
     WinWaitActive($cmd)
   EndIf
   Send("nbtstat{ENTER}")

Edited May 29, 2012 by Zedna

[armoros]

Little optimization

Thanks Zedna that is much better than mine.....

[guinness]

Why hard code cmd.exe? How about using @ComSpec instead.

MsgBox(4096, '', @ComSpec)