ASP数据库连接文件

new_dream_2008 发布于 2008-05-18 08:43， 450 次点击

<%
  Dim DataBase,Conn,ConnStr
  DataBase = "DataBase.mdb"
  Set Conn = Server.CreateObject("ADODB.Connection")
  ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DataBase)

  If Err Then
    Err.Clear
  Else
    Conn.Open ConnStr
  End If

  Sub CloseConn()
    Conn.Close
    Set Conn = Nothing
  End Sub
%>
大家觉得这具数据库连接文件如何，有何不足之处吗？

4 回复

hxfly2008-05-18 09:51

连上就行

multiple19022008-05-18 09:57

楼主想表达什么？

jankerli2008-05-18 10:50

呵呵,我一般都是这样用的:
<%
  Dim DataBase,Conn
  DataBase = "DataBase.mdb"
  Set Conn = Server.CreateObject("ADODB.Connection")
  Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DataBase)
%>

adsdomain2008-05-18 21:05

支持楼上的观点.