access 數(shù)據(jù)連接程序_ASP圖文說明教程
發(fā)表時間:2023-08-15 來源:明輝站整理相關(guān)軟件相關(guān)文章人氣:
[摘要]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在很多地方得到廣泛使用,例如小型企業(yè),大公司的部門。