Question

我正在使用Inno Setup为我的应用程序创建安装程序

如何使用Inno Setup从XML文件向用户PC添加计划任务？

我在开发PC上创建了一个计划任务，并将其导出到名为ServerSwitchScheduledTask.xml

的文件中

我已将此文件包含在我的安装中。我目前正在将此文件的副本放在应用程序的文件夹中，如下所示：

[Setup]
PrivilegesRequired=admin

[Files] 
Source: "ServerSwitchScheduledTask.xml"; DestDir: "{app}"; Flags: ignoreversion

这可以按预期工作。但是，我还想将计划任务导入用户PC。

我试过这个

Filename: "schtasks.exe"; \
    Parameters: "/create /XML {app}\ServerSwitchScheduledTask.xml /tn ServerSwitch";

这导致我没有看到任何错误（在Inno安装程序的调试输出中），但没有将计划任务添加到用户PC

然后我阅读了schtasks.exe

的文档

/ RP [密码]

一个值，指定使用/ RU参数指定的用户的密码。要提示输入密码，该值必须为“*”或无值。系统帐户将忽略此密码。此参数必须与/ RU或/ XML开关结合使用。

所以我把它改成了：

Filename: "schtasks.exe"; \
    Parameters: "/create /RP * /XML {app}\ServerSwitchScheduledTask.xml /tn ServerSwitch";

我希望这会在安装时提示输入密码，但它不会，但仍然不会生成错误或添加计划任务。

我也试过使用这样的代码部分：

[Files] 
Source: "ServerSwitchScheduledTask.xml"; DestDir: "{app}"; Flags: ignoreversion; BeforeInstall: BeforeInstallProc

[Code]
procedure BeforeInstallProc;

var
  ResultCode: Integer;     
begin
  { Launch Notepad and wait for it to terminate }
  if Exec('{sys}\schtasks.exe', '/create /XML ServerSwitchScheduledTask.xml /tn ServerSwitch', '', SW_SHOW,
     ewWaitUntilTerminated, ResultCode) then
  begin
    { handle success if necessary; ResultCode contains the exit code }
    MsgBox('Task sceduled', mbConfirmation, MB_OK);
  end
  else begin

  if MsgBox('Unable to schedule Server Switch to start on login. See AUTO RUN  section of the REAM_ME#13#10#13#10Continue anyway?', mbConfirmation, MB_YESNO) = IDYES then
  begin
    { user clicked Yes }
  end;
    { handle failure if necessary; ResultCode contains the error code }
    WizardForm.Close;    
    { MsgBox('Intsataller says: ', mbCriticalError, MB_OK); }
  end;
end;

我得到Unable to schedule Server..... 使用此方法显示的消息

我也尝试过这样：

[Files] 
Source: "ServerSwitchScheduledTask.xml"; DestDir: "{app}"; Flags: ignoreversion; AfterInstall: AfterInstallProc

[Code]
procedure AfterInstallProc;

var
  ResultCode: Integer;     
begin
  { Launch Notepad and wait for it to terminate }
  if Exec('{sys}\schtasks.exe', '/create /XML "C:\Program Files (x86)\Server Tools\ServerSwitchScheduledTask.xml" /tn ServerSwitch', '', SW_SHOW,
     ewWaitUntilTerminated, ResultCode) then
  begin
    { handle success if necessary; ResultCode contains the exit code }
    MsgBox('Task sceduled', mbConfirmation, MB_OK);
  end
  else begin

  if MsgBox('Unable to schedule Server Switch to start on login. See AUTO RUN  section of the REAM_ME. Continue anyway?', mbConfirmation, MB_YESNO) = IDYES then
  begin
    { user clicked Yes }
  end;
    { handle failure if necessary; ResultCode contains the error code }
    WizardForm.Close;    
    { MsgBox('Intsataller says: ', mbCriticalError, MB_OK); }
  end;
end;

然而，这也失败了，安装了文件后，我可以从命令行成功调用它，如下所示：

C:\Windows\system32>schtasks.exe /create /XML "C:\Program Files (x86)\Server Too
ls\ServerSwitchScheduledTask.xml" /TN ServerSwitch
SUCCESS: The scheduled task "ServerSwitch" has successfully been created.

Answer 1

有关完整的工作示例，请参见
How to add a scheduled task on network connection/disconnection event with Inno Setup

回答您的个人问题：

正如您自己猜测的那样，您需要处理XML文件路径中的空格。

您需要将路径包装为双引号。

在Run部分中，参数列表本身被包装为双引号，您需要将内部双引号加倍：

[Run]
Filename: "schtasks.exe"; \
    Parameters: "/create /XML ""{app}\ServerSwitchScheduledTask.xml"" /TN ServerSwitch"

请参阅Inno Setup文档中的Parameters in Sections。

您在AfterInstall尝试中有引号，但是您的可执行文件路径错误。

Code部分不会自动解析常量。

所以要么你没有指定路径（就像你在Run中所做的那样）：

if Exec('schtasks.exe', ...)

或使用ExpandConstant function：

if Exec(ExpandConstant('{sys}\schtasks.exe'), ...)

无论如何，您应该将其用于参数，以解析安装文件夹：

if Exec(
     'schtasks.exe',
     ExpandConstant('/create /XML "{app}\ServerSwitchScheduledTask.xml" /tn ServerSwitch'),
     ...)

至于BeforeInstall，这只是一个废话，因为此时尚未安装XML文件。

在Inno Setup中从XML导入计划任务

1 个答案: