<%
dim conn,DBPath
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("../db/m.asp")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set adsconn=server.createobject("ADODB.Connection")
adsdata="driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
homepage      = "http://www.tiyi.net/soho/index.asp"               'homepage = 主頁
homename      = "發(fā)發(fā)發(fā)營銷網(wǎng)絡(luò)"                            'homename = 主頁名稱
webmaster     =  "tiyinet@yahoo.com.cn"                       'webmaster=站長信箱
webQQ         = "180852703"
webaddress    ="廣州市東風(fēng)東路伴江行網(wǎng)絡(luò)有限公司"
webpostcode   ="510090"
webbank       ="中國招商銀行廣州分行"
webcard       ="0020-80165723"
webegold      =""
webname       ="鄒小周"
%>