VBS 脚本错误 800A03F4答案

【问题标题】：VBS script error 800A03F4VBS 脚本错误 800A03F4
【发布时间】：2016-05-05 00:04:46
【问题描述】：

我在尝试制作自定义屏幕保护程序时遇到此错误。它说：（脚本位置）线路：20 字符：4 错误：预期的“如果”，当我改变它时，它也说预期的结束或其他东西。这个想法是启动我在 .bat 脚本中制作的屏幕保护程序，它会检测何时启动它。另外，我还可以帮助检测鼠标在指定的时间内没有移动吗？无论如何，这是我到目前为止所做的：

set service = GetObject ("winmgmts:")
Dim StartTime, EndTime, Elapsed
StartTime = Timer
Elapsed = Timer - StartTime
If Timer > 100000 Then
for each Process in Service.InstancesOf ("Win32_Process")
If Process.Name = "cmd.exe" then
sleep 0
else
createObject("WScript.Shell").Run "screensaver.bat"
StartTime = 0
EndTime = 0
Elapsed = 0
Timer = 0
end

提前感谢~丹

【问题讨论】：

你能编辑你的问题并添加你的批处理文件的源代码吗？

标签： windows vbscript

【解决方案1】：

默认的If语句是

If True Then
  WScript.Echo "True"
End If

如果删除 End If 中的 If，则会收到预期的“If”错误。

在您的代码中，您“打开”两个 If 和一个 For。正确关闭它们并缩进您的代码。

【讨论】：

【解决方案2】：

我已经更新了脚本，所以它可以正确启动屏幕保护程序，但仍然没有检测到空闲时间，而且计时器也没有真正工作。我改了剧本。

【讨论】：