<%
dim conn,connstr,database
database=5 '设置使用的数据库类型,1=SQL SERVER,其他为ACCESS
if database=4 then
connstr="driver={SQL Server};server=xiaolong;database=1510;uid=sa;pwd=xiaolong"
else
connstr="DBQ="+server.mappath("/data_base/school.asa")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
end if
set conn=server.CreateObject("adodb.connection")
conn.open connstr
%>
公司影集