Active directory Microsoft VBScript编译错误：应为语句

这个脚本有什么问题

选项显式
Dim objRootDSE、strndsDomain、ADO连接
Dim strBase、strFilter、strAttributes、strQuery、adoRecordset
Dim DTM启动、dtmEnd、strStart、STRED
暗条纹、strFirst、strLast、strNTName
dtmEnd=Now（）
dtmStart=DateAdd（“d”，-7，dtmEnd）
strStart=CStr（年份（dtmStart））_
&右（“0”和CStr（月份（dtmStart）），2）_
&右（“0”和CStr（日期（dtmStart）），2）和“000000.0Z”
强度=CStr（年份（dtmEnd））_
&右（“0”和CStr（月份（dtmEnd）），2）_
&右（“0”和CStr（日（dtmEnd）），2）和“235959.0Z”
'确定DNS域名。
设置objRootDSE=GetObject（“LDAP://RootDSE”）
strndsdomain=objRootDSE.Get（“defaultNamingContext”）
'使用ADO搜索Active Directory。
设置adoConnection=CreateObject（“ADODB.Connection”）
adoConnection.Provider=“ADsDSOObject”
adoConnection。打开“Active Directory提供程序”
Set adoRecordset=CreateObject（“ADODB.Recordset”）
adoRecordset.ActiveConnection=adoConnection
'搜索整个域。
strBase=“”
'用于上周创建的用户帐户
strFilter=“（&（objectCategory=person）（objectClass=user）”_
&“（whenCreated>=”&strStart&“）（whenCreated此代码段第一行末尾缺少下划线行续行：

Wscript.Echo """" & strID & """,""" & strLast & """,""" & strFirst
& """,""" & strNTName & """"

应该是这样的：

Wscript.Echo """" & strID & """,""" & strLast & """,""" & strFirst _
& """,""" & strNTName & """"

请在再次发布之前阅读我们的常见问题。
Wscript.Echo """" & strID & """,""" & strLast & """,""" & strFirst
& """,""" & strNTName & """"

Wscript.Echo """" & strID & """,""" & strLast & """,""" & strFirst _
& """,""" & strNTName & """"