|
#2
新感觉2005-04-29 14:08
|
如何连接access的数据库
谢谢
3 回复
|
|
#3
yl102005-04-29 23:03
function CloseDatabase set rs = nothing conn.close set conn = nothing end function |
<%
on error resume next
dim conn
dim dbpath
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("data/*.mdb")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath
'conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
if err then
response.write "「终结动漫网」系统升级中，暂时无法与数据库建立连接，请稍后再试…"
response.end
end if|
|
#4
白璧微瑕2005-04-30 08:17
|
1