[Request] UltimateDefrag 1.72 FREE

[filtered]

http://www.download.com/UltimateDefrag-Fre...4-10582157.html

[Skrell]

this is the BEST freeware defragger! hopefully someone will figure out a way to make an addon of it as i tried and failed

[radix]

Try the AutoIt script below (I asume that you know how to make an addon):

#cs ----------------------------------------------------------------------------

  AutoIt Version: 3.2.12.1
  Author: radix from MSFN

  UltimateDefrag Freeware Edition 1.72
  Application site: http://www.disktrix.com/

  Script Function:
	 Template AutoIt script.

 #ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

 Opt("TrayIconDebug", 1)

; Installer file name
 $Installer = "UltimateDefragFREEPublicDomainEditionSetup.exe"

; Run the installer
 Run($Installer)

; Setup
 WinWait("Setup", "This will install UltimateDefrag V1 FREE Public Domain Version.")
 ControlClick("Setup", "This will install UltimateDefrag V1 FREE Public Domain Version.", "Button1")

; Important Instructions
 WinWait("Important Instructions", "The following document contains important information that you should read before installing the product:")
 ControlClick("Important Instructions", "The following document contains important information that you should read before installing the product:", "Button1")

; Start checking for two windows with "Do you want to create it?" and "Are you sure you want to proceed?" text inside them
 AdlibEnable('_Adlib')

; Installation Successful
 WinWait("Installation Successful", "Installation has been completed successfully.")
 ControlClick("Installation Successful", "Installation has been completed successfully.", "Button1")

; Stop checking for two windows with "Do you want to create it?" and "Are you sure you want to proceed?" text inside them
 AdlibDisable()

 Func _Adlib()
   ; Choose Installation Directory
	 If WinExists("Choose Installation Directory", "Choose the directory where UltimateDefrag V1 FREE Public Domain Version should be installed.") Then
		 WinWait("Choose Installation Directory", "Choose the directory where UltimateDefrag V1 FREE Public Domain Version should be installed.")
		 ControlClick("Choose Installation Directory", "Choose the directory where UltimateDefrag V1 FREE Public Domain Version should be installed.", "Button2")
	 EndIf

   ; Choose Installation Directory
	 If WinExists("Choose Installation Directory", "Do you want to create it?") Then
		 WinWait("Choose Installation Directory", "Do you want to create it?")
		 ControlClick("Choose Installation Directory", "Do you want to create it?", "Button1")
	 EndIf

   ; Choose Installation Directory
	 If WinExists("Choose Installation Directory", "Are you sure you want to proceed?") Then
		 WinWait("Choose Installation Directory", "Are you sure you want to proceed?")
		 ControlClick("Choose Installation Directory", "Are you sure you want to proceed?", "Button1")
	 EndIf

   ; Previous Installation Found
	 If WinExists("Previous Installation Found", "Do you want to copy over the previous installation?  This will not erase any of your working files and is generally safe.") Then
		 WinWait("Previous Installation Found", "Do you want to copy over the previous installation?  This will not erase any of your working files and is generally safe.")
		 ControlClick("Previous Installation Found", "Do you want to copy over the previous installation?  This will not erase any of your working files and is generally safe.", "Button1")
	 EndIf
 EndFunc

Edited December 15, 2008 by radix

[tym]

Try /a switch. That one seems to work fine. Tried it myself.