vbscript - Microsoft 脚本控制 - 预期为“然后”

Question

我一直在开发一些软件来帮助更好地组织我的文件。为此，我使用 Microsoft Script Control 开发了一个脚本生成器，然后在目录中的文件上运行，并根据它们是否匹配过滤条件返回一个布尔值。

问题是，每当我向 if 语句添加任何逻辑运算符时，我都会收到 COM 异常，因为代码无法编译，期待“Then”。我找不到行号，但我猜测 If 语句有问题。

这是一个编译的例子：

Function FilterFiles(Name, Extension, Size, Directory, Created, Accessed, Modified)
Dim Result
If StrComp(Extension, ".jpg", 1) = 0 Then
Result = True
Else
Result = False
End If
FilterFiles = Result
End Function

还有一个例子：

Function FilterFiles(Name, Extension, Size, Directory, Created, Accessed, Modified)
Dim Result
If StrComp(Extension, ".jpg", 1) = 0 0r StrComp(Extension, ".png", 1) = 0 0r StrComp(Extension, ".psd", 1) = 0 Then
Result = True
Else
Result = False
End If
FilterFiles = Result
End Function

Answer 1

您的

.. 0 0r ..

代替

.. 0 Or ..

看起来您使用 0（零）而不是 O（大写字母 o）作为 0 运算符。