InstallARC() ShellExecute("D:\arbnprov.pdf", "", "D:\") Func InstallARC() Run("D:\ARCEXPLR\AECLIENT.EXE", "", "D:\ARCEXPLR\") WinWait("ArcExplorer 1.1 Installation", "Welcome!") ControlClick("[LAST]", "", "Button1") WinWait("ArcExplorer 1.1 Installation", "Select the directory") ControlClick("[LAST]", "", "Button1") WinWait("ArcExplorer 1.1 Installation", "Select Components") ControlClick("[LAST]", "", "Button1") WinWait("ArcExplorer 1.1 Installation", "Select the Program Folder") ControlClick("[LAST]", "", "Button1") WinWait("ArcExplorer 1.1 Installation", "Create Shortcut") ControlClick("[LAST]", "", "Button1") WinWait("ArcExplorer 1.1 Installation", "Ready") ControlClick("[LAST]", "", "Button1") WinWait("ArcExplorer 1.1 Installation", "Installation Completed!") ControlClick("[LAST]", "", "Button1") EndFunc