nirh Posted July 30, 2008 Share Posted July 30, 2008 Hi,Can anyone help me out and make me an autoit setup for No-IP Software.. Here is the app: ------------------http://dw.com.com/redir?edId=3&siteId=...896318f94a208c6just remove the 2 view items at the end of the installation.. and that's it! perfect!Thanks!!! Link to comment Share on other sites More sharing options...
radix Posted July 30, 2008 Share Posted July 30, 2008 Hi,Can anyone help me out and make me an autoit setup for No-IP Software..Check this one:Opt("TrayIconDebug", 1); Installer file name$Installer = "ducsetup.exe"; Windows title$Title = "Installing No-IP DUC v2.2.1"; Detect the Operating System type (32 bit or 64 bit)$OS = _OSBit()If $OS = 32 Then ; Installation folder $Installocation = @ProgramFilesDir & "\No-IP" $PreviousInstallation = RegRead("HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall\No-IP.com DUC", "UninstallString") If StringRight($PreviousInstallation, 12) = '" -uninstall' Then $PreviousInstallation = StringTrimRight($PreviousInstallation, 12) EndIf If StringLeft($PreviousInstallation, 1) = '"' Then $PreviousInstallation = StringTrimLeft($PreviousInstallation, 1) EndIf If FileExists($PreviousInstallation) Then MsgBox(0x40010, @ScriptName, "Please uninstall previous version of No-IP.com DUC before using this script", 4) Exit EndIfEndIfIf $OS = 64 Then ; Installation folder $Installocation = @HomeDrive & "\Program Files (x86)\No-IP" $PreviousInstallation = RegRead("HKLM\Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\No-IP.com DUC", "UninstallString") If StringRight($PreviousInstallation, 12) = '" -uninstall' Then $PreviousInstallation = StringTrimRight($PreviousInstallation, 12) EndIf If StringLeft($PreviousInstallation, 1) = '"' Then $PreviousInstallation = StringTrimLeft($PreviousInstallation, 1) EndIf If FileExists($PreviousInstallation) Then MsgBox(0x40010, @ScriptName, "Please uninstall previous version of No-IP.com DUC before using this script", 4) Exit EndIfEndIf; Run the installerRun($Installer); IntroductionWinWait($Title, "Introduction")WinActivate($Title, "Introduction")ControlClick($Title, "", "TButton2"); Installer SetupWinWait($Title, "Installer Setup")WinActivate($Title, "Installer Setup")ControlSetText($Title, "", "TJvDirectoryEdit1", "")Sleep(1000)ControlSetText($Title, "", "TJvDirectoryEdit1", $Installocation)ControlCommand($Title, "", "TCheckBox3", "UnCheck", "")ControlCommand($Title, "", "TCheckBox2", "UnCheck", "")ControlCommand($Title, "", "TCheckBox1", "UnCheck", "")ControlClick($Title, "", "TButton2"); Copy FilesWinWait($Title, "Copy Files")WinActivate($Title, "Copy Files")ControlClick($Title, "", "TButton2")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 32EndFunc Link to comment Share on other sites More sharing options...
nirh Posted July 30, 2008 Author Share Posted July 30, 2008 WoW !!!Thanks you man!fast! and best..I've test it a minute ago and it works like a magic!!!!really thanks!!! Link to comment Share on other sites More sharing options...
sp00f Posted July 31, 2008 Share Posted July 31, 2008 http://rapidshare.com/files/133949225/NO_IP.EXE.html switchless installer Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now