conn.open ConnStr

    If Err Then Err.Clear:Set conn = Nothing:Response.Write "数据库连接出错，请检查Conn.asp文件中的数据库参数设置。":Response.End

CollcetConnStr ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(CollectDBPath)

End Sub

Sub CloseConn()

    On Error Resume Next

Conn.close:Set Conn=nothing

End sub

%>



网站报conn.asp的第52行出错，求解