ASP中连接数据库函数

OLHKYfLG

<%
'这是一个数据库链接函数,优点是只有用到时才打开,不用到不做操作,比通常的写法更节省资源,调用的方法是把通常的
'rs.open sql,conn()   改为rs.open sql,Open_conn()
%>


<%
Function Open_conn()
  dim Dbpath,Conn
  Dbpath="../data/test.mdb"
  set Conn=server.createObject("ADODB.connection")
  Conn.open "DBQ="+server.mappath(""&Dbpath&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

  set Open_conn=Conn
  If Err Then
  err.Clear
  Conn.close:set Conn=nothing
  Response.Write "对不起，数据库连接出错。"
  Response.End
  End If
  End Function   

%>

OLHKYfLG

thank for your share

wenyanwy

不错，很好，支持

npkdgfn

支持

多变的天气

连接数据库  不显示路径和数据库名的方法有没啊？！~~