connn.asp

商务网络站点程序

<%
dim conn,DBPath
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("../db/m.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
homepage      = "http://www.cgxl.com/so/index.asp"               'homepage = 主页
homename      = "蓝达营销网络"                            'homename = 主页名称
webmaster     =  "[e-mail]"                       'webmaster=站长信箱
webQQ         = "48224019"
webaddress    ="蓝达网络有限公司"
webpostcode   ="730000"
webbank       ="中国招商银行兰州分行"
webcard       ="9555 5093 1129 4532"
webegold      =""
webname       ="马小彦"

webmaster1     =  "[e-mail]"                       'webmaster1=站长信箱
webQQ1         = "48224019"
webaddress1    ="广州市东风东路伴江行网络有限公司"
webpostcode1   ="730000"
webbank1       ="工商银行甘肃省分行"
webcard1      ="9558 8027 0310 3376890"
webegold1      =""
webname1       ="马小彦"
%>