<!--#include file="config_database_name.asp"-->
<%
t1=timer
'/////////////////////////////////打开数据库
db="database/"&dataname
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")

Application.Lock()
Application("FB_EM_1_ACC_connstr")=connstr
Application.UnLock()

conn.Open Application("FB_EM_1_ACC_connstr")
'/////////////////////////////////关闭数据库
'response.write "dfdf"

sub connclose
	if conn<>"" then
	conn.close
	set conn=nothing
	end if
end sub
'/////////////////////////////////结束

'response.write conn.execute("select * from jins_goods_list ")("goods_id")
%>