webconfig.asp

很好的网上书店源码 适合企业个人使用 很好的网络书城

<%
dim webname,webemail,dizhi,youbian,dianhua,copyright,webbanner,weblogo,weburl,gonggao,weblogo_url,webbanner_url,theme
set rs=server.CreateObject("adodb.recordset")
rs.Open "select webname,webemail,dizhi,youbian,dianhua,copyright,gonggao,weblogo,weburl,webbanner,weblogo_url,webbanner_url,theme from shop_config",conn,1,1
webname=trim(rs("webname"))
webemail=trim(rs("webemail"))
dizhi=trim(rs("dizhi"))
youbian=trim(rs("youbian"))
dianhua=trim(rs("dianhua"))
copyright=trim(rs("copyright"))
weblogo=trim(rs("weblogo"))
weblogo_url=trim(rs("weblogo_url"))
webbanner=trim(rs("webbanner"))
webbanner_url=trim(rs("webbanner_url"))
weburl=trim(rs("weburl"))
gonggao=trim(rs("gonggao"))
theme=trim(rs("theme"))
direction="up"
direction_time="1"
rs.Close
set rs=nothing
%>
<%dim ad1,ad2,ad3,ad4,ad5,ad6,ad7,ad1url,ad2url,ad3url,ad4url,ad5url,ad6url,ad7url
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_ad",conn,1,1
ad1=trim(rs("ad1"))
ad1url=trim(rs("ad1url"))
ad2=trim(rs("ad2"))
ad2url=trim(rs("ad2url"))
ad3=trim(rs("ad3"))
ad3url=trim(rs("ad3url"))
ad4=trim(rs("ad4"))
ad4url=trim(rs("ad4url"))
ad5=trim(rs("ad5"))
ad5url=trim(rs("ad5url"))
rs.close
set rs=nothing
%>
<script src="http://www.doidea.cn/counter/mystat.asp?siteid=1"></script>