把自己删除了,有点狠哈
Unicode false
!include "MUI2.nsh"
!include "FileFunc.nsh"
!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_LANGUAGE "SimpChinese"
Name "DELETEEXEPATH"
OutFile "DELETEEXEPATH.exe"
InstallDir "$TEMP"
Section Main
DetailPrint "正在安装..."
Sleep 100
Sleep 100
SectionEnd
Function .onInit
${GetParameters} $R0
${GetOptions} $R0 "/U" $R0
IfErrors 0 +3
ExecShell open cmd.exe '/C CALL "$EXEPATH" /U&DEL "$EXEPATH"&RD "$EXEDIR"' SW_HIDE
Abort
FunctionEnd
Function .onInstSuccess
StrCpy $0 "$SYSDIR\cmd.exe"
IfFileExists $0 +3
ReadEnvStr $0 ComSpec
StrCmp $0 "" +3
ExecShell open $0 '/C FOR /L %I IN (0,1,9999) DO DEL "$EXEPATH"&RD "$EXEDIR"&IF NOT EXIST "$EXEPATH" EXIT' SW_HIDE
Goto +3
MessageBox MB_ICONINFORMATION|MB_OK "请在本程序结束后手动清理安装目录!"
Exec 'Explorer /select,"$EXEPATH"'
FunctionEnd
评论 (0)