<%
'----------------------------------------------------------------------
'轉發時請保留此聲明信息,這段聲明不并會影響你的速度!
'*******************   金三角源碼知迅592s.com  ************************************
'作者:廈門創軟回憶
'網站:http://www.592s.com
'qq412771253
'版權聲明:版權所有,源代碼公開,各種用途均可免費使用,但是修改后必須把修改后的文件
'發送一份給作者.并且保留作者此版權信息
'**********************************************************************
'----------------------------------------------------------------------
dim conn
dim connstr
db="based911soft/basedsoft911.asp" '數據庫文件位置
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
%>