bat脚本实例实现只允许运行一个实例(安装程序、创建快捷

262 阅读 0 评论 173 点赞

我是靠谱客的博主懵懂马里奥，这篇文章主要介绍bat脚本实例实现只允许运行一个实例(安装程序、创建快捷，现在分享给大家，希望可以做个参考。

复制代码代码如下:

;我的第一个安装脚本
!include "MUI2.nsh"
!define DIR "D:\workspace\nsis\files"

Name "安装程序"
Icon "${DIR}\setup128.ico"
OutFile "setup.exe"
InstallDir "$PROGRAMFILES\kaserv"
RequestExecutionLevel admin

!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_INSTFILES

!insertmacro MUI_LANGUAGE "SimpChinese"

Function .onInit
System::Call 'kernel32::CreateMutexA(i 0,i 0,t "SMAPLE_MUTEX") i .r1 ?e'
Pop $R0
StrCmp $R0 0 +3
MessageBox MB_OK|MB_ICONSTOP "只允许运行一个实例"
Abort
FunctionEnd

;安装程序段
Section
SetOutPath $INSTDIR
File "${DIR}\新建文本文档 (2).txt"
File "${DIR}\新建文本文档.txt"
SetOutPath "$INSTDIR\office"
File "${DIR}\office\*"
;快捷方式
CreateShortCut "$DESKTOP\test.lnk" "$INSTDIR\unsetup.exe"
CreateShortCut "$SMPROGRAMS\test.lnk" "$INSTDIR\unsetup.exe"
WriteUninstaller "$INSTDIR\unsetup.exe"
SectionEnd

;卸载程序段
Section "Uninstall"
RMDir /r "$INSTDIR"
Delete "$DESKTOP\test.lnk"
Delete "$SMPROGRAMS\test.lnk"
SectionEnd