打开数据库失败.请教!!!
代码如下:
dim startime,conn,connstr,db,rs,rs_s,rs_s1
startime=timer()
db="user/database/#bio.mdb"
on error resume next
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.createobject("adodb.recordset")
sql="select * from user "
rs.open sql,conn,1,1
if rs.recordsetcount=0 then
Response.Write "dddddddddddddddddddddd"
Response.Write Server.MapPath(db)
end if
rs.recordsetcount = < > 多少都打热行
Response.Write "dddddddddddddddddddddd"
Response.Write Server.MapPath(db)
这个语句
请问哪里有错