conn.asp

来自「详细说明在文件 程序说明： ☆ 中英文双语版 ☆ 后台在同一页内」· ASP 代码 · 共 30 行

<%
dim conn
dim connstr
dim db
db="../Database/DataShop.mdb" '数据库文件位置
on error resume next
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if

sub CloseConn()
	conn.close
	set conn=nothing
end sub
%>
<%
'=========================================================
'
' 产品名称：数字工作室 公司(企业)网站管理系统（简称：myszw.com）
' 版权所有: myszw.com 
' 程序制作：myszw.com开发团队
' Copyright 2004-2005 myszw.com - All Rights Reserved. 
'
'========================================================
%>