今天来通过installshield安装jdk以及配置环境变量,本质上是调用第三方安装程序。
首先将jdk的安装文件添加到我们的安装程序中
然后编写我们的脚本
选择BEHAVIOR AND LOGIC->InstallScript->Setup.Rul->After Move Data->OnFirstUIAfter,如图
OnFirstUIAfter脚本如下
点击查看代码
function OnFirstUIAfter()STRING szTitle, szMsg1, szMsg2, szOpt1, szOpt2;NUMBER bOpt1, bOpt2;
beginDisable(STATUSEX);if (SYSINFO.bIsWow64) then //判断64位操作系统REGDB_OPTIONS = REGDB_OPTION_WOW64_64KEY ;endif;//安装jdkRegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);if (RegDBKeyExist ("SOFTWARE\\JavaSoft\\Java Development Kit\\1.8.0_191") < 0) thenMessageBox("准备安装jdk",INFORMATION);LaunchAppAndWait (TARGETDIR^"third\\jdk-8u191-windows-x64.exe","", LAAW_OPTION_WAIT);elseMessageBox("jdk已安装",INFORMATION);endif;bOpt1 = FALSE;bOpt2 = FALSE; if ( BATCH_INSTALL ) thenSdFinishReboot ( szTitle , szMsg1 , SYS_BOOTMACHINE , szMsg2 , 0 );elseSdFinish ( szTitle , szMsg1 , szMsg2 , szOpt1 , szOpt2 , bOpt1 , bOpt2 );endif;
end;
之所以放在这里,是因为此时安装包里的文件已经移动到用户选择的或默认的安装地址里,可以通过TARGETDIR获取到安装路径,方便查找文件。
配置环境变量
点击查看代码
function OnFirstUIAfter()STRING szTitle, szMsg1, szMsg2, szOpt1, szOpt2,reg_jdk_key,svValue,environment_key,java_path,pathValue;NUMBER bOpt1, bOpt2,nvSize,nvType;
beginDisable(STATUSEX);bOpt1 = FALSE;bOpt2 = FALSE; reg_jdk_key="SOFTWARE\\JavaSoft\\Java Development Kit\\1.8.0_191";environment_key="SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment";java_path="%JAVA_HOME%\\bin";//配置环境变量if (SYSINFO.bIsWow64) then //如果为64位操作系统REGDB_OPTIONS = REGDB_OPTION_WOW64_64KEY ; //则为注册表操作进行64位特殊设置endif;//设置注册表根目录RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);//判断是否存在jdkif(RegDBKeyExist(reg_jdk_key)=1)then//获取jdk安装目录成功if(RegDBGetKeyValueEx(reg_jdk_key,"JavaHome",nvType,svValue,nvSize)=0)thenif(RegDBSetKeyValueEx(environment_key,"JAVA_HOME",REGDB_STRING,svValue,-1)=0)then//path添加jdk bin//获取path的值RegDBGetKeyValueEx(environment_key,"Path",nvType,pathValue,nvSize);pathValue=java_path+";"+pathValue;RegDBSetKeyValueEx(environment_key,"Path",REGDB_STRING,pathValue,-1);elseMessageBox("JAVA_HOME创建失败",SEVERE);endif;endif;endif;if ( BATCH_INSTALL ) thenSdFinishReboot ( szTitle , szMsg1 , SYS_BOOTMACHINE , szMsg2 , 0 );elseSdFinish ( szTitle , szMsg1 , szMsg2 , szOpt1 , szOpt2 , bOpt1 , bOpt2 );endif;
end;
RegDBGetKeyValueEx(reg_jdk_key,"JavaHome",nvType,svValue,nvSize) 该方法是获取注册表中某一个值,返回0 或 <0的值。查询的值的数据放在svValue中,可以直接使用
RegDBSetKeyValueEx(environment_key,"Path",REGDB_STRING,pathValue,-1); 设置环境注册表中的值
参考文档
https://www.cnblogs.com/Cindy_weiwei/archive/2009/05/18/1459542.html