【发布时间】：2014-07-25 20:57:38
【问题描述】：
我正在尝试通过 Inno Setup（以及另一个应用程序）安装最新的平台（x64 或 x86）适当的 Java 运行时环境。我找到了一些脚本示例，说明如何检测版本并在正确时进行安装并根据我的需要进行调整，但我一直遇到这种情况：
无法打开文件“path\to\JREInstall.exe”：
CreateProcess 失败：代码 5：
访问被拒绝
这是严格负责安装 JRE 的代码：
[Setup]
AppName="JRE Setup"
AppVersion=0.1
DefaultDirName="JRE Setup"
[Languages]
Name: "english"; MessagesFile: "compiler:Default.isl"
[Files]
Source: "jre-8u11-windows-x64.exe"; DestDir: "{tmp}\JREInstall.exe"; \
Check: IsWin64 AND InstallJava();
Source: "jre-8u11-windows-i586.exe"; DestDir: "{tmp}\JREInstall.exe"; \
Check: (NOT IsWin64) AND InstallJava();
[Run]
Filename: "{tmp}\JREInstall.exe"; Parameters: "/s"; \
Flags: nowait postinstall runhidden runascurrentuser; Check: InstallJava()
[Code]
procedure DecodeVersion(verstr: String; var verint: array of Integer);
var
i,p: Integer; s: string;
begin
{ initialize array }
verint := [0,0,0,0];
i := 0;
while ((Length(verstr) > 0) and (i < 4)) do
begin
p := pos ('.', verstr);
if p > 0 then
begin
if p = 1 then s:= '0' else s:= Copy (verstr, 1, p - 1);
verint[i] := StrToInt(s);
i := i + 1;
verstr := Copy (verstr, p+1, Length(verstr));
end
else
begin
verint[i] := StrToInt (verstr);
verstr := '';
end;
end;
end;
function CompareVersion (ver1, ver2: String) : Integer;
var
verint1, verint2: array of Integer;
i: integer;
begin
SetArrayLength (verint1, 4);
DecodeVersion (ver1, verint1);
SetArrayLength (verint2, 4);
DecodeVersion (ver2, verint2);
Result := 0; i := 0;
while ((Result = 0) and ( i < 4 )) do
begin
if verint1[i] > verint2[i] then
Result := 1
else
if verint1[i] < verint2[i] then
Result := -1
else
Result := 0;
i := i + 1;
end;
end;
function InstallJava() : Boolean;
var
ErrCode: Integer;
JVer: String;
InstallJ: Boolean;
begin
RegQueryStringValue(
HKLM, 'SOFTWARE\JavaSoft\Java Runtime Environment', 'CurrentVersion', JVer);
InstallJ := true;
if Length( JVer ) > 0 then
begin
if CompareVersion(JVer, '1.8') >= 0 then
begin
InstallJ := false;
end;
end;
Result := InstallJ;
end;
在完整的设置脚本中，同样的消息继续出现。 如何让 JRE 安装程序从此脚本安装文件运行？
【问题讨论】：
-
您的
[Run]部分似乎很奇怪。您使用了postinstall，它在最后一页上创建了复选框，这对于安装先决条件是非常不寻常的。但更糟糕的是，您运行该设置的{temp}文件夹应该在安装程序完成时被删除。不要让用户运行应用程序。从 Inno Setup 安装程序的临时文件夹中。更好地使用PrepareToInstall事件来安装先决条件。 -
是的，你是对的。我不知道那个（安装后）选项到底做了什么。我也发现了这个问题。
标签： java permissions inno-setup permission-denied