1. 程式人生 > >ASP開啟與關閉資料庫連線

ASP開啟與關閉資料庫連線

<%
'開啟資料庫連線
sub OpenDataBase(conn)
  set conn = Server.CreateObject("adodb.connection")
  connstr="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=userid;PWD=;Initial Catalog=database;Data Source=serverIp"
  conn.open connstr
end sub

'關閉資料庫連線
sub CloseDataBase(conn)
   conn.close
   set conn = nothing
end sub
%>