Vbscript VB脚本逻辑错误

我有来自vbscript的以下代码片段：

            For Each Modified in Files
                If IsEmpty(file1) or IsNull(file1) Then
                    file1 = Modified
                Else
                    file2 = Modified
                    If hDisk.FreeSpace > 900000000000 Then Exit For
       ERROR HERE-->ElseIf file2.DateLastModified < file1.DateLastModified And DateDiff("D", file2.DateLastModified, Now) > 7 Then file2.Delete
                    ElseIf file1.DateLastModified < file2.DateLastModified And DateDiff("D", file1.DateLastModified, Now) > 7 Then 
                        file1.Delete
                        file1 = Modified
                    End If
                    End If
                End If
            Next

用于每个在文件中修改的
如果IsEmpty（文件1）或IsNull（文件1），则
file1=已修改
其他的
file2=已修改
如果hDisk.FreeSpace>90000000000，则退出
此处错误-->ElseIf file2.datelastmedited7然后file2.Delete
ElseIf file1.DateLastModified7然后
文件1.删除
file1=已修改
如果结束
如果结束
如果结束
下一个

当我试图编译脚本时，我得到一个错误，我缺少一个“End”，更具体地说是预期的“End”代码800A03F6

---

我已经仔细检查了几次代码，似乎不明白为什么它会给我这个错误。是的，我也尝试过使用“End”而不是“End If”

ElseIf的结构是：

If c1 Then
   ..
ElseIf c2 Then <-- Not Else
   ..
ElseIf c3 Then
   ..
Else <-- last to catch all else
   --
End If

如果是c1，则
..
如果是c2，则您有3个
结束If
，但您只有2个
开始If
。如果我读对了，你可以做以下事情：

            For Each Modified in Files
                If IsEmpty(file1) or IsNull(file1) Then
                    file1 = Modified
                Else
                    file2 = Modified
                    If hDisk.FreeSpace > 900000000000 Then
                        Exit For
                    ElseIf file2.DateLastModified < file1.DateLastModified And DateDiff("D", file2.DateLastModified, Now) > 7 Then
                        file2.Delete
                    ElseIf file1.DateLastModified < file2.DateLastModified And DateDiff("D", file1.DateLastModified, Now) > 7 Then 
                        file1.Delete
                        file1 = Modified
                    End If
                End If
            Next

用于每个在文件中修改的
如果IsEmpty（文件1）或IsNull（文件1），则
file1=已修改
其他的
file2=已修改
如果hDisk.FreeSpace>90000000000，则
退出
ElseIf file2.DateLastModified7然后
文件2.删除
ElseIf file1.DateLastModified7然后
文件1.删除
file1=已修改
如果结束
如果结束
下一个

最重要的是，如果要使用
ElseIf
，则不能在
Then
之后添加与
Then
相同的内容-只有当
if
语句都包含在同一行时，才能这样做