Jump to content

steve20020

Members
  • Posts

    8
  • Joined

  • Last visited

Reputation Activity

  1. Like
    steve20020 reacted to 0xdefea7 in WinActivate ($My program)   
    Check this out:
    http://www.autoitscript.com/autoit3/docs/intro/windowsadvanced.htm
  2. Like
    steve20020 reacted to Queener in WinActivate ($My program)   
    I no longer use notepad as notepad++ is the best. You can do some changes in these. #RequireAdmin is not needed, but I always like to use that.

      #RequireAdmin GOHERE() Func GOHERE()     if WinExists("new  1 - Notepad++") Then     sleep(500)     WinActive("new  1 - Notepad++")     send( "Test")     Exit Else     GOTHERE() EndIf EndFunc Func GOTHERE()     Run("notepad.exe")     sleep(500)     WinActive("new 1 - Notepad++")     send("test") Exit EndFunc
  3. Like
    steve20020 reacted to BrewManNH in Stuck in a loop (please help)   
    Looks like we came up with the same basic idea for this.
     
    #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #region ### START Koda GUI section ### Form= Global $sendkeysCBVar, $JiggleMouseCBVar $Form1 = GUICreate("Form1", 143, 178, 192, 124) $JiggleMouseCB = GUICtrlCreateCheckbox("Jiggle Mouse", 24, 48, 97, 17) $SendKeysCB = GUICtrlCreateCheckbox("SendKeys", 24, 72, 97, 17) $RunBT = GUICtrlCreateButton("RunBT", 32, 112, 75, 25) GUISetState(@SW_SHOW) #endregion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $RunBT If GUICtrlRead($JiggleMouseCB) = $GUI_CHECKED Then Adlibregister("mouseJigllo", 10000) ; move the mouse every 10 seconds Else AdlibUnRegister("mouseJigllo") ; stop moving the mouse EndIf If GUICtrlRead($SendKeysCB) = $GUI_CHECKED Then SendKeys() EndIf EndSwitch WEnd Func mouseJigllo() MouseMove(50, 50, 100) MouseMove(80, 60, 100) EndFunc ;==>mouseJigllo Func SendKeys() WinActivate("LDEP") WinWait("", "", 10) Send("!f") WinWait("", "", 10) Send("p") WinWait("", "", 10) EndFunc ;==>SendKeys
×
×
  • Create New...