<%
'##############################################################
'##【深圳 超市網(wǎng)網(wǎng)站系統(tǒng) v2.0】                              ##

'##程序語言：ASP、SQL、VBScript、JavaScript、HTML。          ##
'##數(shù) 據(jù) 庫：Microsoft Access2000。                          ##
'##運行環(huán)境：WIN98+PWS、WIN2000/XP+IIS等支持ASP+ACCESS空間。 ##

'##1、本程序所有版權(quán)歸深圳市玉龍網(wǎng)絡(luò)技術(shù)有限公司所有。       ##
'##2、任何人未經(jīng)本公司同意與書面授權(quán)不得使用本程序或?qū)⒈境?  ##
'##　 序復(fù)制、發(fā)送給他人或提供下載。 
'##3、經(jīng)本公司書面授權(quán)后您可以擁有本套系統(tǒng)的二次開發(fā)權(quán)利     ##
'##　 但不可以把本系統(tǒng)來進(jìn)行二次轉(zhuǎn)讓、出售或以任何方式在網(wǎng)上 ##
'##　 傳播。必須保證本系統(tǒng)源碼不能泄露給第三方或任何變相盜用 ##
'##4、如果你未遵守上述事項，由此帶來的后果和損失自負(fù)同時本公 ##
'##　 司將依法追究相關(guān)的法律責(zé)任。                           ##
'##5、請保留以上的版權(quán)信息，此項不會對本站程序有任何影響。   ##
'##############################################################
   dim conn   
   dim connstr

   on error resume next
   connstr="DBQ="+server.mappath("../Data_dns100_cn_1234/shop_9655abc.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
   set conn=server.createobject("ADODB.CONNECTION")
   if err then 
      err.clear
   else
        conn.open connstr 
        if err then 
           err.clear
        end if
   end if
%>