conn.asp

来自「该系统实现居域网网络考试和,系统平分轻松实现」· ASP 代码 · 共 14 行

<%
dim conn,rs
Set conn = Server.CreateObject("ADODB.Connection")
db="../data/ksxt.mdb"

dbq="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db) 
conn.open  dbq
'新版本连接数据库
'conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("data/ksxt.mdb") 
'老版本连接数据库
'Set rs = Server.CreateObject("ADODB.Recordset") 
'创建游标

%>