Question

ASP+access数据库实例

ASP网页模版连接access数据库(用户密码登陆等)实例,能够下载的

Answer 1

Dim oConn, oRs, sSql
Call mdbDBConn()

Sub mdbDBConn()
datapath="MDB数据库名"
On Error Resume Next
If IsObject(oConn) = True Then Exit Sub
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(DataPath)&";Jet OLEDB:Database Password=你的数据库密码"
If Err Then
Err.Clear
Set oConn = Nothing
Response.Write "数据库连接出错，请检查系统数据库参数设置。"
Response.End
End If
Set oRs = Server.CreateObject( "ADODB.Recordset" )
End Sub