inc_connect.asp

XXX档案美女图片站适合给图片广告的站长下载使用

<%
'请将下面第二行中的“#database.asp”替换为你自己重命名后的数据库地址

dim db,conn,connstr,sql,rs
	db="../../data/#GB_D#%ase.asp"
	set conn = server.createobject("ADODB.connection")
	connstr="provider=microsoft.JET.OLEDB.4.0;data source=" & server.mappath(db)
	conn.open connstr

function closedatabase
	conn.close
	set conn = nothing
end function
%>