<%
dim db
set db=server.createobject("ADODB.Connetion")
db.open"Dbq="&Server.Mappath("date/data.mdb")&";Driver={Microsoft Access Driver (*.mdb)}"
if err then
err.clear
else
conn.open connstr
end if
%>

[IMG]http://www.cntianj.com/wwwroot/hyl/asperr/err.bmp[/IMG]
错误提示！~

谢谢拉。

<%
dim conn
dim connstr
db="Database/dfds.asp"
on error resume next
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
%>

那这个为什么对？

原来来这里还真没来错，谢谢各位拉。