创建计划任务后立即远程启动交互式进程的问题

我需要远程启动一个需在用户会话中运行的脚本，受安全限制只能通过创建计划任务实现。原本使用Win32_ScheduledJob的脚本可满足需求，但该接口已被弃用，即使修改注册表也无法创建任务，且希望点击脚本后立即执行任务。

替代方案：使用Task Scheduler 2.0接口（官方推荐） #

Win32_ScheduledJob基于旧版AT服务，Windows Vista及以后系统已全面改用Task Scheduler 2.0，新接口支持更灵活的任务配置，完全覆盖需求。以下是两种可行实现方式：

方式1：VBS调用Task Scheduler COM组件 #

通过COM对象直接操作Task Scheduler，支持本地/远程任务创建，可精准配置立即执行、交互式会话运行等参数。

代码示例（本地执行，远程需修改连接逻辑）：

Const OverwriteExisting = TRUE
Set objFSO = CreateObject("Scripting.FileSystemObject")
' 复制脚本到目标路径（远程需替换为共享路径，如\\atl-ws-01\C$\...）
objFSO.CopyFile "C:\Users\lucas.b\Desktop\teste.bat", _
    "C:\Users\lucas.b\Desktop\atuweb\", OverWriteExisting

strComputer = "." ' 远程机器替换为计算机名/IP
Set objTaskService = CreateObject("Schedule.Service")
objTaskService.Connect(strComputer) ' 远程连接需确保账户有管理员权限

' 初始化任务结构
Set objRootFolder = objTaskService.GetFolder("\")
Set objTaskDefinition = objTaskService.NewTask(0)

' 任务描述
objTaskDefinition.RegistrationInfo.Description = "立即执行交互式脚本任务"

' 触发器：设置为当前时间，立即执行
Set objTrigger = objTaskDefinition.Triggers.Create(1) ' TIME_TRIGGER_ONCE
objTrigger.StartBoundary = Now()
objTrigger.Enabled = True

' 执行操作：调用脚本
Set objAction = objTaskDefinition.Actions.Create(0) ' ACTION_EXEC
objAction.Path = "wscript.exe"
objAction.Arguments = "C:\Users\lucas.b\Desktop\teste.bat"

' 任务设置：允许按需启动，忽略电池状态等
Set objSettings = objTaskDefinition.Settings
objSettings.AllowDemandStart = True
objSettings.DisallowStartIfOnBatteries = False
objSettings.RunOnlyIfIdle = False
objSettings.Enabled = True

' 登录类型：指定交互式会话运行
objTaskDefinition.Principal.LogonType = 3 ' TASK_LOGON_INTERACTIVE_TOKEN

' 注册任务（创建或覆盖现有任务）
On Error Resume Next
Set objRegisteredTask = objRootFolder.RegisterTaskDefinition( _
    "ImmediateInteractiveTask", objTaskDefinition, 6, , , 3) ' TASK_CREATE_OR_UPDATE
If Err.Number <> 0 Then
    Wscript.Echo "任务创建失败：" & Err.Description
Else
    Wscript.Echo "任务创建成功，将立即执行"
    ' 可选：任务执行后自动删除
    objRootFolder.DeleteTask "ImmediateInteractiveTask", 0
End If
On Error GoTo 0

方式2：使用schtasks命令行（简洁高效） #

通过VBS调用系统内置的schtasks命令，快速创建立即执行的交互式任务，兼容性强。

代码示例：

Const OverwriteExisting = TRUE
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFile "C:\Users\lucas.b\Desktop\teste.bat", _
    "C:\Users\lucas.b\Desktop\atuweb\", OverWriteExisting

strComputer = "." ' 远程机器添加参数：/S \\atl-ws-01
strTaskName = "ImmediateInteractiveTask"
' 构造schtasks命令，设置当前时间为执行时间，交互式运行
strCommand = "schtasks /Create /TN " & strTaskName & " /TR ""wscript.exe C:\Users\lucas.b\Desktop\teste.bat"" /SC ONCE /ST " & Right("0" & Hour(Now),2) & ":" & Right("0" & Minute(Now),2) & " /RU ""%USERNAME%"" /RL HIGHEST /IT"

Set objShell = CreateObject("WScript.Shell")
intReturn = objShell.Run(strCommand, 0, True)

If intReturn = 0 Then
    Wscript.Echo "任务创建成功，将立即执行"
    ' 执行完毕后自动删除任务
    objShell.Run "schtasks /Delete /TN " & strTaskName & " /F", 0, True
Else
    Wscript.Echo "任务创建失败，错误码：" & intReturn
End If

关键参数说明：

• /SC ONCE：单次执行任务
• /ST：指定执行时间（这里取当前时间）
• /RU %USERNAME%：以当前用户身份运行
• /RL HIGHEST：获取最高权限
• /IT：允许在用户交互式会话中运行

注意事项 #

• 远程执行时，需确保执行脚本的账户拥有目标机器的管理员权限
• 目标机器需开启Task Scheduler服务（默认自动启动）
• 远程场景下，文件复制路径需改为远程共享路径（如\\atl-ws-01\C$\Users\lucas.b\Desktop\atuweb\）
• 交互式任务仅在用户已登录的情况下，才会在其会话中显示界面

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