如何把安装的卸载程序放到其他目录

优质
小牛编辑
133浏览
2023-12-01
当因为特殊原因要把卸载程序写到系统的其他目录时,我们会认为直接就是把 uninst.exe 放到其他目录就可以了,但是实际上,NSIS 在卸载时 $INSTDIR 是指向 uninst.exe 的当前目录的。所以我写了一个例子,首先,用向导生成一个基本脚本,然后修改。

引用 test.nsi 的内容:

; 该脚本使用 HM VNISEdit 脚本编辑器向导产生 

; 安装程序初始定义常量 
!define PRODUCT_NAME "testapp" 
!define PRODUCT_VERSION "1.0" 
!define PRODUCT_PUBLISHER "test, Inc." 
!define PRODUCT_WEB_SITE "http://testapp.com" 
!define PRODUCT_DIR_REGKEY "Software\Microsoft\Windows\CurrentVersion\App Paths\testapp.exe" 
!define PRODUCT_REGKEY "Software\testapp" # 创建注册表自己程序的键 
!define PRODUCT_UNINST_KEY "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_NAME}" 
!define PRODUCT_UNINST_ROOT_KEY "HKLM" 

Name "${PRODUCT_NAME} ${PRODUCT_VERSION}" 
OutFile "Setup.exe" 
LoadLanguageFile "${NSISDIR}\Contrib\Language files\SimpChinese.nlf" 
InstallDir "$PROGRAMFILES\testapp" 
Icon "${NSISDIR}\Contrib\Graphics\Icons\modern-install.ico" 
UninstallIcon "${NSISDIR}\Contrib\Graphics\Icons\modern-uninstall.ico" 
InstallDirRegKey HKLM "${PRODUCT_UNINST_KEY}" "UninstallString" 
DirText "安装程序将安装 $(^Name) 在下列文件夹。$\r$\n$\r$\n要安装在不同文件夹,单击 [浏览] 并选择其他文件夹。" 
ShowInstDetails show 
ShowUnInstDetails show 

Section "MainSection" SEC01 
SetOutPath "$INSTDIR" 
SetOverwrite ifnewer 
File "/oname=testapp.exe" "C:\Program Files\NSIS\NSIS.exe" # 把 NSIS.exe 改名作为测试例子程序 
createDirectory "$SMPROGRAMS\测试安装" 
createShortCut "$SMPROGRAMS\测试安装\testapp.lnk" "$INSTDIR\testapp.exe" 
SectionEnd 

Section -AdditionalIcons 
createShortCut "$SMPROGRAMS\测试安装\Uninstall.lnk" "$WINDIR\uninst_testapp.exe" # 卸载程序的路径也要改 
SectionEnd 

Section -Post 
WriteUninstaller "$WINDIR\uninst_testapp.exe" # 把卸载程序放到了 "C:\Windows" ,注意,放到可能造成重复文件的地方,一定要把卸载程序改为特殊的名字,防止给另外的卸载程序覆盖。 
WriteRegStr HKLM "${PRODUCT_DIR_REGKEY}" "" "$INSTDIR\testapp.exe" 
WriteRegStr HKLM "${PRODUCT_REGKEY}" "" "$INSTDIR" # 写入安装时的安装路径。 
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayName" "$(^Name)" 
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "UninstallString" "$WINDIR\uninst_testapp.exe" # 卸载程序的路径也要改 
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayIcon" "$INSTDIR\testapp.exe" 
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayVersion" "${PRODUCT_VERSION}" 
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "URLInfoAbout" "${PRODUCT_WEB_SITE}" 
WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "Publisher" "${PRODUCT_PUBLISHER}" 
SectionEnd 

Function un.onUninstSuccess 
HideWindow 
MessageBox MB_ICONINFORMATION|MB_OK "$(^Name) 已成功地从你的计算机移除。" 
FunctionEnd 

Function un.onInit 
MessageBox MB_ICONQUESTION|MB_YESNO|MB_DEFBUTTON2 "你确实要完全移除 $(^Name) ,其及所有的组件?" IDYES +2 
Abort 
FunctionEnd 

Section Uninstall 
ReadRegStr $INSTDIR HKLM "${PRODUCT_REGKEY}" "" 
# 在注册表中强行读入安装路径到变量 $INSTDIR,因为卸载程序默认只认为自己所在路径为 $INSTDIR 路径 
delete "$WINDIR\uninst_testapp.exe" # 卸载程序的路径也要改 
delete "$INSTDIR\testapp.exe" 

delete "$SMPROGRAMS\测试安装\Uninstall.lnk" 
delete "$SMPROGRAMS\测试安装\testapp.lnk" 

RMDir "$SMPROGRAMS\测试安装" 

RMDir "$INSTDIR" 

deleteRegKey ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" 
deleteRegKey HKLM "${PRODUCT_DIR_REGKEY}" 
SetAutoClose true 
SectionEnd