不能使用 ''；文件已在使用中。到底怎么错了？
<%
Dim conn,dbname,connstr
dbname = "data/news_data.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.Mappath(dbname)
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(dbname)
conn.Open connstr
'关闭并释放数据库连接
function connclose
conn.close
set conn=nothing
end function
%>
以上这段代码，运行后提示出错
错误提示为：
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft JET Database Engine 错误 '80004005'
不能使用 ''；文件已在使用中。
/news/Connections/tNewsSubject.asp，行8
第八行是
conn.Open connstr
