请把轻狂志网址 www.flighty.cn 加入收藏夹,其他俱为假冒,谨防被骗!赞助请点 这里!找东东请用右边的搜索 ===>
04 2014-07

NSIS:判断D盘存在与否确定安装路径

作者:少轻狂 | 发布:2014-07-04 | 更新:2014-07-04 | 分类:部署 | Disposition | 热度:
现在我们想实现这样的功能:
如果目标机器存在D盘,那么就安装程序到D盘,否则安装在系统盘。
后来又加了一个判断,即注册表中如果存在安装路径键值,则使用其键值作为安装路径。
 
思路:
通过检查D盘有没有磁盘空间来进行判断,如果D盘不存在,或者D盘是光驱,得到的磁盘空间必定是null。
 
示例:
直接上代码,希望大家转载时注明出处或者帮我点点广告,谢谢!(题外:现在越来越觉得用广告收入支撑网站运维是多么不靠谱的想法,呵呵……,也许某一天,轻狂志就只能关闭了……)
 
 
!include "MUI2.nsh"
!include "FileFunc.nsh"

RequestExecutionLevel admin

Name "判断D盘存在与否确定安装路径"
Caption "判断D盘存在与否确定安装路径"
OutFile "test.exe"
InstallDir "$PROGRAMFILES\flighty app"
;读取注册中的安装路径,如果不存在则按照默认路径。
InstallDirRegKey HKCU "Software\flighty app" ""
BrandingText "www.flighty.cn"

!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_LANGUAGE "SimpChinese"

Section
SectionEnd

Section -Post
  ;在注册表中写入安装路径
  WriteRegStr HKCU "Software\flighty app" "" $INSTDIR
SectionEnd


Function .onInit
  ReadRegStr $R4 HKCU "Software\flighty app" ""
	 StrCmp $R4 "" NO YES
	 NO:
	 StrCpy $R1 "D:\"
	 ${DriveSpace} $R1 "/D=F /S=M" $R0
	 ${If} $R0 = null
	 	 StrCpy $R1 "$PROGRAMFILES\flighty app"
	 ${Else}
	 	 StrCpy $R2 "Program Files"
	 	 StrCpy $R3 "flighty app"
	 	 StrCpy $R1 "D:\$R2\$R3"
	 ${EndIf}
	 ;重新设置$INSTDIR默认值
	 StrCpy $INSTDIR "$R1"
	 YES:
	 Goto +1
FunctionEnd