明辉手游网中心:是一个免费提供流行视频软件教程、在线学习分享的学习平台!

access 数据连接程序_ASP图文说明教程

[摘要]Dim conn Sub DBOpen() Dim db : db=Server.MapPath(”zzz.mdb”) Set conn=Server.Cre...

Dim conn
Sub DBOpen()
Dim db : db=Server.MapPath(”zzz.mdb”)
Set conn=Server.CreateObject(”Adodb.Connection”)
On Error Resume Next
conn.Open “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” & db
If Err.Number<>0 then
Err.Clear
Response.Write(”<h1>The Database link is ERROR</h1>”)
Response.End()
End If
On Error GoTo 0
End Sub
Call DBOpen()
… …
conn.CLose() : Set conn=Nothing


Microsoft Access在很多地方得到广泛使用,例如小型企业,大公司的部门。