conn.asp

大榕树网络文章管理系统

<%
dim conn
dim connstr
dim db
db="../data/admin_article.asp"
set conn=Server.CreateObject("ADODB.Connection")
connstr="provider=Microsoft.jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.open connstr

sub closeconn()
    conn.close
    set conn=nothing
end sub
%>