conn.asp

一个公司营销系统

<%

'本文件为站点页面与数据连接驱动,server.mappath后面是数据库名称,不定时的更改数据库名称可以有效保障数据的安全!
'请中金网的站长仔细查看数据结构,对站点的保密性有很大的帮助!

dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.open = "provider=microsoft.jet.oledb.4.0;" & "data source = " & server.mappath("../db/m.asp")

set adsconn=server.createobject("ADODB.Connection")
adsdata="driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
hhomepage      = "http://"               'homepage = 主页
homename      = "发发发营销网络"                            'homename = 主页名称
webmaster     =  "[e-mail]"                       'webmaster=站长信箱
webQQ         = "180852703"
webaddress    ="广州市东风东路伴江行网络有限公司"
webpostcode   ="510090"
webbank       ="中国招商银行广州分行"
webcard       ="0020-80165723"
webegold      =""
webname       ="邹小周"
%>