Skip to content

Instantly share code, notes, and snippets.

@ahmedshaikhm
Last active June 12, 2018 22:26
Show Gist options
  • Select an option

  • Save ahmedshaikhm/7197e96376955c8a7ba0e4e33a39ee71 to your computer and use it in GitHub Desktop.

Select an option

Save ahmedshaikhm/7197e96376955c8a7ba0e4e33a39ee71 to your computer and use it in GitHub Desktop.
Notepad Automation using AutoIt v3 Tutorial
#include "WinAPI.au3"
#include "WindowsConstants.au3"
; #INDEX# =======================================================================================================================
; Title .........: Windows Desktop Applications Automation using AutoIt
; AutoIt Version : 3.3.14.2
; Description ...: Automate Notepad for changing display font, writing some text and save file
; Author(s) .....: Ahmed Shaikh Memon (ahmedshaikhm)
; ===============================================================================================================================
; #VARIABLES# ===================================================================================================================
Local $hWnd, $hWndFont, $hWndSaveAs
Global $sFontName = "Arial"
Global $sFileName = "tutorial_1"
; #CONSTANTS# ===================================================================================================================
Global Const $__IDM_FONT = 33
Global Const $__IDM_SAVE = 3
Global Const $__IDC_FONT_NAME = 1001
; Open Notepad
Run("notepad.exe")
Sleep(1000)
; Get Notepad's handle
$hWnd = WinGetHandle("[Class:Notepad]")
;
; Display Font Change
;
; Click Format > Font menu
_WinAPI_PostMessage($hWnd, $WM_COMMAND, $__IDM_FONT, 0)
Sleep(1000)
; Handle Font window
$hFontWin = WinGetHandle("Font")
Sleep(1000)
; Select display font
ControlSend($hFontWin,"", $__IDC_FONT_NAME, $sFontName)
Sleep(2000)
; Save display font
ControlClick($hFontWin, "", "Button5")
Sleep(1000)
;
; Write text in Notepad
;
ControlSend($hWnd, "", "Edit1","This is informed approach towards solving a problem")
;
; Save file
;
; Click File > Save menu
_WinAPI_PostMessage($hWnd, $WM_COMMAND, $__IDM_SAVE, 0)
Sleep(1000)
; Enter file name in the file open dialog box
$hWndSaveAs = WinGetHandle("Save As")
ControlSend($hWndSaveAs, "", "Edit1", $sFileName)
Sleep(1000)
; Press the Save button on Save As prompt
ControlClick($hWndSaveAs, "", "Button1")
Sleep(1000)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment