-
Notifications
You must be signed in to change notification settings - Fork 37
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
Showing
144 changed files
with
42,308 additions
and
1,637 deletions.
There are no files selected for viewing
Binary file not shown.
Binary file not shown.
Binary file not shown.
1,780 changes: 890 additions & 890 deletions
1,780
Installer/UDFs/Zip.au3 → Installer/old/UDFs/Zip.au3
Large diffs are not rendered by default.
Oops, something went wrong.
24 changes: 12 additions & 12 deletions
24
Installer/Uninstall/Uninstall.au3 → Installer/old/Uninstall/Uninstall.au3
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -1,12 +1,12 @@ | ||
| #RequireAdmin | ||
| #Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
| #AutoIt3Wrapper_Icon=..\..\VistumblerMDB\Icons\icon.ico | ||
| #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator | ||
| #AutoIt3Wrapper_Run_Tidy=y | ||
| #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
|
||
| $TempUninstallEXE = @TempDir & '\vi_uninstall.exe' | ||
| FileInstall("vi_uninstall.exe", $TempUninstallEXE, 1) | ||
| Run($TempUninstallEXE) | ||
| Exit | ||
|
|
||
| #RequireAdmin | ||
| #Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
| #AutoIt3Wrapper_Icon=..\..\VistumblerMDB\Icons\icon.ico | ||
| #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator | ||
| #AutoIt3Wrapper_Run_Tidy=y | ||
| #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
|
||
| $TempUninstallEXE = @TempDir & '\vi_uninstall.exe' | ||
| FileInstall("vi_uninstall.exe", $TempUninstallEXE, 1) | ||
| Run($TempUninstallEXE) | ||
| Exit | ||
|
|
File renamed without changes.
88 changes: 44 additions & 44 deletions
88
Installer/Uninstall/vi_uninstall.au3 → Installer/old/Uninstall/vi_uninstall.au3
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -1,44 +1,44 @@ | ||
| #RequireAdmin | ||
| #Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
| #AutoIt3Wrapper_Icon=..\icon.ico | ||
| #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator | ||
| #AutoIt3Wrapper_Run_Tidy=y | ||
| #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
|
||
| Dim $InstallLocation = RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Vistumbler", "InstallLocation") | ||
| Dim $StartMenu_AllUsers = @ProgramsCommonDir & '\Vistumbler\' | ||
| Dim $StartMenu_CurrentUser = @ProgramsDir & '\Vistumbler\' | ||
| Dim $Desktop_AllUsers = @DesktopCommonDir & '\Vistumbler.lnk' | ||
| Dim $Desktop_CurrentUser = @DesktopDir & '\Vistumbler.lnk' | ||
|
|
||
| ;Delete Vistumbler files and folders | ||
| If FileExists($InstallLocation) Then DirRemove($InstallLocation, 1) | ||
| If FileExists($StartMenu_AllUsers) Then DirRemove($StartMenu_AllUsers, 1) | ||
| If FileExists($StartMenu_CurrentUser) Then DirRemove($StartMenu_CurrentUser, 1) | ||
| If FileExists($Desktop_AllUsers) Then FileDelete($Desktop_AllUsers) | ||
| If FileExists($Desktop_CurrentUser) Then FileDelete($Desktop_CurrentUser) | ||
|
|
||
| ;Delete File Associations | ||
| RegDelete("HKCR\.vsz") | ||
| RegDelete("HKCR\.vs1") | ||
| RegDelete("HKCR\Vistumbler") | ||
|
|
||
| ;Delete Uninstall Information | ||
| RegDelete("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Vistumbler") | ||
|
|
||
| _SelfDelete() ;delete current exe | ||
| Exit | ||
|
|
||
| Func _SelfDelete($iDelay = 0) | ||
| If StringInStr(@ScriptName, ".au3") = 0 Then | ||
| Local $sCmdFile | ||
| FileDelete(@TempDir & "\scratch.bat") | ||
| $sCmdFile = 'ping -n ' & $iDelay & '127.0.0.1 > nul' & @CRLF _ | ||
| & ':loop' & @CRLF _ | ||
| & 'del "' & @ScriptFullPath & '"' & @CRLF _ | ||
| & 'if exist "' & @ScriptFullPath & '" goto loop' & @CRLF _ | ||
| & 'del ' & @TempDir & '\scratch.bat' | ||
| FileWrite(@TempDir & "\scratch.bat", $sCmdFile) | ||
| Run(@TempDir & "\scratch.bat", @TempDir, @SW_HIDE) | ||
| EndIf | ||
| EndFunc ;==>_SelfDelete | ||
| #RequireAdmin | ||
| #Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
| #AutoIt3Wrapper_Icon=..\icon.ico | ||
| #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator | ||
| #AutoIt3Wrapper_Run_Tidy=y | ||
| #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
|
||
| Dim $InstallLocation = RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Vistumbler", "InstallLocation") | ||
| Dim $StartMenu_AllUsers = @ProgramsCommonDir & '\Vistumbler\' | ||
| Dim $StartMenu_CurrentUser = @ProgramsDir & '\Vistumbler\' | ||
| Dim $Desktop_AllUsers = @DesktopCommonDir & '\Vistumbler.lnk' | ||
| Dim $Desktop_CurrentUser = @DesktopDir & '\Vistumbler.lnk' | ||
|
|
||
| ;Delete Vistumbler files and folders | ||
| If FileExists($InstallLocation) Then DirRemove($InstallLocation, 1) | ||
| If FileExists($StartMenu_AllUsers) Then DirRemove($StartMenu_AllUsers, 1) | ||
| If FileExists($StartMenu_CurrentUser) Then DirRemove($StartMenu_CurrentUser, 1) | ||
| If FileExists($Desktop_AllUsers) Then FileDelete($Desktop_AllUsers) | ||
| If FileExists($Desktop_CurrentUser) Then FileDelete($Desktop_CurrentUser) | ||
|
|
||
| ;Delete File Associations | ||
| RegDelete("HKCR\.vsz") | ||
| RegDelete("HKCR\.vs1") | ||
| RegDelete("HKCR\Vistumbler") | ||
|
|
||
| ;Delete Uninstall Information | ||
| RegDelete("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Vistumbler") | ||
|
|
||
| _SelfDelete() ;delete current exe | ||
| Exit | ||
|
|
||
| Func _SelfDelete($iDelay = 0) | ||
| If StringInStr(@ScriptName, ".au3") = 0 Then | ||
| Local $sCmdFile | ||
| FileDelete(@TempDir & "\scratch.bat") | ||
| $sCmdFile = 'ping -n ' & $iDelay & '127.0.0.1 > nul' & @CRLF _ | ||
| & ':loop' & @CRLF _ | ||
| & 'del "' & @ScriptFullPath & '"' & @CRLF _ | ||
| & 'if exist "' & @ScriptFullPath & '" goto loop' & @CRLF _ | ||
| & 'del ' & @TempDir & '\scratch.bat' | ||
| FileWrite(@TempDir & "\scratch.bat", $sCmdFile) | ||
| Run(@TempDir & "\scratch.bat", @TempDir, @SW_HIDE) | ||
| EndIf | ||
| EndFunc ;==>_SelfDelete |
File renamed without changes.
Oops, something went wrong.