on error resume Next db="database.mdb" connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" set conn=server.createobject("ADODB.CONNECTION") if err then err.clear else conn.open connstr end if
set rs=server.createobject("adodb.recordset") '这句运行时就出现问题,死机,什么原因呢????? sqltext="select * from [Aboutus] where Title='企业简介'" rs.open sqltext,conn,1,1
------解决方案--------------------
先去掉 on error resume Next, 再运行看哪里出错
------解决方案--------------------
接楼上的
或者在连接的地方,写一下句子
VBScript code
if err.number<>0 then
response.write err.description
response.end
end if
------解决方案--------------------
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)