<%
On Error Resume Next


'==============================================系统主体数据库连接
dim datasrt,scadb,dataadd,dataname,datapwd,SqlDatabaseName
datasrt="ACCESS"                          '数据库连接类型:ACCESS,SQL
scadb=dbdns&"data/scadata.mdb"         '数据库地址dbdns 为各文件中设置的路径，请不要改动 
dataadd="127.0.0.1"                             'SQL数据库地址
dataname="sa"                          'SQL数据库用户名
datapwd="1026888"                             'SQL数据库密码 
SqlDatabaseName="albb1"                     '数据库名

if datasrt="ACCESS" then
conndata="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(""&scadb&"")
conttstr="ACC"
elseif datasrt="SQL" then
conndata="driver={SQL Server};server="&dataadd&";uid="&dataname&";pwd="&datapwd&";database="&SqlDatabaseName&";"
conttstr="SQL"
end if
'==============================================系统日志数据库连接
SqlLog=dbdns&"data/SqlLog.mdb"   'dbdns 为各文件中设置的路径，请不要改动
SqlLogdata="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(""&SqlLog&"")

%>