<%
dim startime,endtime,conn,connstr,db
startime=timer()
db="admin\data\12912.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(db)
conn.Open connstr
Function CloseDatabase
  conn.close()
  set conn=Nothing
End Function
%>帮忙看看上面的代码有何错误,为什么我的游览器提供下面错误:
错误类型:
Microsoft JET Database Engine (0x80004005)
不能使用 '';文件已在使用中。
/CONN.asp, 第 8 行

解决方案 »

  1.   

    <%
    dim startime,endtime,conn,connstr,db
    startime=timer()
    db="admin\data\12912.mdb"
    Set conn = Server.CreateObject("ADODB.Connection")
    connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
    'connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(db)
    conn.Open connstr
    '''执行操作...
    '''''Function CloseDatabase
      conn.close()
      set conn=Nothing
    '''''End Function
    %>
      

  2.   

    是不是这个造成的db="admin\\data\\12912.mdb"
      

  3.   

    晕死,vb的大小写另再问个问题吧:
       为什么我的IE有时能够正常显示网页内容,有时就显示部分内容,并且不报错!请问是何原因另一部分还没显示出来?
    db=@"admin\data\12912.mdb"