使用InstallShield打包java程序exe以及jdk，安装完成自动运行

     大家都知道java生成的exe如果没有jre是无法运行的，如果客户自己安装setup.exe以后自己配置java环境，那客户一定会骂你这个软件怎么这么差，呵呵。所以我今天要说的使用InstallShield打包将java exe jdk(或jre)一起打包安装，安装完成自动执行EXE.至于如何打包exe请参考我前面写的<使用Fat_jar和exe4J打包java应用程序为Exe文件>:http://suiyuan0808.iteye.com/blog/852231.我把我之前做的打包代码拷贝出来供大家参考。这段代码需要写到InstallShield工程的Setup.Rul里面去。下面语言有点像vb语言

 

/*

*author:Ldfu

*/

#include "ifx.h"

   
//开始安装时候会自动检查jdk环境并安装
function OnBegin()
begin
 Disable (BACKBUTTON);
      if(!MAINTENANCE)then
         SdLicense2 ("License ", "", "", SUPPORTDIR ^ "sn.txt", FALSE);
      endif ;  
  
  //如果大家的jdk和我的不一样请修改红色粗体部分即可。
  RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);

 

//这里意思在注册表里面没有找到jdk注册信息，则安装jdk
  if (RegDBKeyExist ("SOFTWARE\\JavaSoft\\Java Development Kit\\1.6.0_04") < 0) then
     if(LaunchAppAndWait (SUPPORTDIR^"jdk-6u10-rc2-bin-b32-windows-i586-p-12_sep_2008.exe","", LAAW_OPTION_WAIT)<0)then
         MessageBox ("您的系统没有安装 JDK 1.6.0_04 t! ", INFORMATION);
     endif;
  endif;
end; 

 

//安装结束之前，设置java_home环境变量

function OnEnd()
  STRING szFeatureName;
  STRING serviceTarget;
  STRING szDocFile; 
  STRING szKey;  
  NUMBER nvType;
  STRING svValue;
  NUMBER nvSize;
begin   

 

//检查是否已经安装jdk

           szKey = "SOFTWARE\\JavaSoft\\Java Development Kit\\1.6.0_10";
 RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);

 

//如果已经安装则设置环境变量 java_home
 if (RegDBKeyExist(szKey)=1) then//如果该注册表值存在
    if(RegDBGetKeyValueEx(szKey,"JavaHome",nvType,svValue,nvSize)=0) then
      szKey = "SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment";
        if(RegDBSetKeyValueEx(szKey, "JAVA_HOME", REGDB_STRING, svValue, -1)<0) then
          MessageBox ("Javahome create failed, please set it manually!", SEVERE);
         endif;
    endif;
 endif;
 

//最后启动您的exe文件
   szFeatureName="main";
   serviceTarget=TARGETDIR^"wangdianzhushou.exe";
  if (FeatureIsItemSelected(MEDIA, szFeatureName)=1) then
        if(FindFile(TARGETDIR, " wangdianzhushou.exe ", szDocFile)=0) then
             if (LaunchApp (serviceTarget, "") < 0) then
                 MessageBox ("无法启动程序 "+serviceTarget+".", SEVERE);
              endif;
         endif;
   endif;
 
end;

评论

1 楼 xiongjie_67 2012-01-29