asp下讓數(shù)據(jù)庫在需要讀取的時候才打開

更新時間：2008年06月11日 19:32:05 作者：

ASP實現(xiàn)讓數(shù)據(jù)庫連接僅在需要讀取數(shù)據(jù)庫時打開，我們有沒有辦法讓數(shù)據(jù)庫連接僅在需要讀取數(shù)據(jù)庫時才打開，不讀取時就沒有任何動作呢，以下即提供這種思路，以求拋磚引玉。

Function Open_conn()
dim Dbpath,Conn
Dbpath=server.MapPath("數(shù)據(jù)庫路徑")
set Conn=server.createObject("ADODB.connection")
Conn.open "data source="&dbpath&";provider=microsoft.Jet.OLEDB.4.0;"
set Open_conn=Conn
If Err Then
err.Clear
Conn.close:set Conn=nothing
Response.Write "對不起，數(shù)據(jù)庫連接出錯。"
Response.End
End If
End Function

調用方法：

將原來的

rs.open sql,conn

改成

rs.open sql,Open_conn()

順便提供一個同一服務器上可以跨站共享ACCESS數(shù)據(jù)庫的老代碼，也許有朋友用得著：

有時，我們有很多二級域名，可能需要讓這些二級域名調用某同一個ACCESS數(shù)據(jù)庫，在你不愿意使用SQL數(shù)據(jù)庫的情況下，數(shù)據(jù)庫連接可以采用以下辦法。（特別提示：如果你的服務器做了FSO安全權限，需要將這個數(shù)據(jù)庫目錄設置為，允許你需要調用的各站的IIS用戶有權訪問修改。）

以下的數(shù)據(jù)庫物理路徑類似于 E:\目錄\目錄\數(shù)據(jù)庫名

dim Conn,Strconn
Set Conn = Server.CreateObject("ADODB.Connection")
Strconn="Provider = Microsoft.Jet.OLEDB.4.0; "
Strconn=Strconn & "Data Source=數(shù)據(jù)庫物理路徑"
Conn.Open Strconn
If Err Then
err.Clear
Conn.close:set Conn=nothing
Response.Write "對不起，數(shù)據(jù)庫連接出錯。"
Response.End
End If