Jump to content

Regcleaner AutoIT script


Recommended Posts

I've seen that for Regcleaner there are no switch to silent install , i've tried to make an autoit script but i'm not able, someone can see it for me?

It's very simple but i have problems with windows names in the script...

Thank you! :hello:

Link to comment
Share on other sites


You don't need an AutoIt script, because the installer don't make registry keys (like Add or Remove Programs entry). Make a sfx archive from content of installation folder.

Edit: if you still need the script, try this one:

Opt("TrayIconDebug", 1)
Opt("SendKeyDelay", 200)

; Executable file name
$EXECUTABLE = "jv16_regcleaner.exe"
; Detect the Operating System type (32 bit or 64 bit)
$OS = _OSBit()

If $OS = 32 Then
 ; Installation folder
    $INSTALLLOCATION = @ProgramFilesDir & "\RegCleaner"
EndIf

If $OS = 64 Then
 ; Installation folder
    $INSTALLLOCATION = @HomeDrive & "\Program Files (x86)\RegCleaner"
EndIf

If FileExists($INSTALLLOCATION & "\RegCleanr.exe") Then
 MsgBox(0x40010, @ScriptName, "Please uninstall previous version of RegCleaner before using this script", 4)
 Exit
EndIf

; Run the installer
Run($EXECUTABLE)

; RegCleaner Setup: Installation Options
WinWait("RegCleaner Setup: Installation Options", "This will install RegCleaner on your computer.")
WinActivate("RegCleaner Setup: Installation Options", "This will install RegCleaner on your computer.")
ControlClick("RegCleaner Setup: Installation Options", "", "Button1")

; RegCleaner Setup: Installation Directory
WinWait("RegCleaner Setup: Installation Directory", "Please select a location to install RegCleaner (or use the default).")
WinActivate("RegCleaner Setup: Installation Directory", "Please select a location to install RegCleaner (or use the default).")
ControlSetText("RegCleaner Setup: Installation Directory", "", "Edit1", "")
Sleep(1000)
ControlSetText("RegCleaner Setup: Installation Directory", "", "Edit1", $INSTALLLOCATION)
ControlClick("RegCleaner Setup: Installation Directory", "", "Button1")

Func _OSBit()
 Local $tOS = DllStructCreate("char[256]")
 Local $aGSWD = DllCall("Kernel32.dll", "int", "GetSystemWow64Directory", "ptr", DllStructGetPtr($tOS), "int", 256)
 If IsArray($aGSWD) And DllStructGetData($tOS, 1) Then Return 64
 Return 32
EndFunc

Edited by radix
Link to comment
Share on other sites

  • 4 months later...

what could we do with this scripte ?

make a .bat files or (other type), create a new folder with regcleaner.exe add this scripte in .bat (or other) and make sfx archives of this folder?

Edited by wsamael
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...