conn.asp

来自「功能最强大的ASP网站」· ASP 代码 · 共 11 行

<%
on error resume next
db_path = "admin/date/#shangdu.mdb"
Set conn= Server.CreateObject("ADODB.Connection")
connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db_path) &";Jet OLEDB:Database Password=bbg0123456;Persist Security Info=False"
conn.Open connstr
if err then
 response.write "禁止对数据库非法操作!"
 response.end
end if
%>