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

Question

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

问题是，每当我向if语句添加任何逻辑运算符时，我都会得到一个COM异常，因为代码无法编译，期望“然后”。我找不到行号，但我猜测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 ..

看起来你对0perator使用0（零）而不是O（大写字母o）。