asp连接加密的access
<%dimconndimconnstrdimdbdb="../Databases/0791idc.mdb"'数据库文件位置onerrorresumenextconnstr...
<%
dim conn
dim connstr
dim db
db="../Databases/0791idc.mdb" '数据库文件位置
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
sub CloseConn()
conn.close
set conn=nothing
end sub
%>
如何修改,上面是没有设置密码的时候 展开
dim conn
dim connstr
dim db
db="../Databases/0791idc.mdb" '数据库文件位置
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
sub CloseConn()
conn.close
set conn=nothing
end sub
%>
如何修改,上面是没有设置密码的时候 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询