Inno Setup静默安装文件失败问题排查与方案咨询

你的方案完全合理 #

这种主动校验文件写入结果、提供备选路径的思路，精准命中了当前问题的核心——Inno Setup默认文件安装逻辑不会主动校验最终写入结果，在企业环境的特殊限制（如UAC虚拟化、安全软件静默拦截、文件夹重定向）下极易出现“日志显示成功、实际无文件”的静默失败情况。

问题根源推测 #

结合你描述的现象，大概率是以下企业环境限制导致：

• UAC文件虚拟化：低权限进程尝试写入受保护目录时，Windows会将文件静默重定向到%LOCALAPPDATA%\VirtualStore，但安装日志仍会显示原路径“安装成功”，普通用户访问原路径时无法看到文件。
• 安全软件拦截：部分企业EDR/杀毒软件会拦截安装程序的写入操作但不弹出提示，而插件自身的写入因是Office进程发起，被安全策略信任放行。
• 管理员运行的上下文错位：用管理员权限运行时，{userappdata}指向的是管理员的用户目录而非目标普通用户的目录，重启后该目录可能被清理或普通用户无访问权限。

具体实现思路（Pascal脚本） #

你提到的“提取到临时目录再复制校验”的方式，能有效绕开Inno Setup默认安装逻辑的盲区，具体实现步骤如下：

1. 在安装初始化阶段，先测试目标目录的写入能力；
2. 若测试失败，依次尝试备选目录（如用户主目录下的自定义文件夹）；
3. 确定可用目录后，动态修改安装的目标路径，完成后续文件部署。

以下是核心代码片段：

[Code]
var
  ValidInstallDir: String;

// 测试目录是否可写入
function TestDirectoryWrite(Dir: String): Boolean;
var
  TestFile: String;
  FileHandle: THandle;
begin
  Result := False;
  // 确保目录存在
  if not DirExists(Dir) then
    if not CreateDir(Dir) then Exit;
  // 创建临时测试文件验证写入权限
  TestFile := Dir + '\install-test.tmp';
  FileHandle := CreateFile(TestFile, GENERIC_WRITE, 0, nil, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
  if FileHandle <> INVALID_HANDLE_VALUE then
  begin
    CloseHandle(FileHandle);
    DeleteFile(TestFile);
    Result := True;
  end;
end;

// 在安装阶段确定有效目录
procedure CurStepChanged(CurStep: TSetupStep);
var
  PrimaryDir: String;
  FallbackDir: String;
begin
  if CurStep = ssInstall then
  begin
    PrimaryDir := ExpandConstant('{userappdata}\Microsoft\AddIns\our-addin-name');
    FallbackDir := ExpandConstant('{userprofile}\OurVBAAddin');
    
    if TestDirectoryWrite(PrimaryDir) then
      ValidInstallDir := PrimaryDir
    else if TestDirectoryWrite(FallbackDir) then
      ValidInstallDir := FallbackDir
    else
    begin
      MsgBox('无法找到可写入的安装目录，请联系IT管理员。', mbError, MB_OK);
      Abort;
    end;
  end;
end;

// 动态替换文件安装的目标路径
function FileInstallGetDestName(SrcName, DestName: String): String;
begin
  Result := ValidInstallDir + '\' + ExtractFileName(DestName);
end;

在[Files]段中，通过DestName的回调关联逻辑：

[Files]
Source: "install-files\show-a-message.ppam"; DestName: "{code:FileInstallGetDestName}"

额外排查建议 #

1. 检查UAC虚拟化路径：让用户查看%LOCALAPPDATA%\VirtualStore\Microsoft\AddIns目录，确认安装文件是否被重定向至此；
2. 深挖安装日志：即使日志显示“成功”，也要检查日志中记录的实际写入路径，是否与预期一致；
3. 固定权限级别：保持PrivilegesRequired=lowest，避免管理员权限运行导致的用户上下文错位；
4. 添加完整性校验：安装完成后，遍历所有部署文件，检查文件存在性并验证哈希，确保部署完全成功。

内容的提问来源于stack exchange，提问作者neilt17