Function .onInstSuccess
StrCpy $0 "$SYSDIRcmd.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
当然也可以使用SelfDel插件
© 版权声明
THE END
暂无评论内容