webconfig.asp

网络商店源码 实现商品浏览 购物车 后台管理等

<%
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from shop_config",conn,1,1
class2=rs("class")
shop_config_2=rs("shop_config")
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"))
webbanner=trim(rs("webbanner"))
bannerlx=trim(rs("bannerlx"))
weburl=trim(rs("weburl"))
gonggao=trim(rs("gonggao"))
shop_config_2=split(shop_config_2,",")
ly=shop_config_2(0)
login=shop_config_2(1)
vote=shop_config_2(2)
links=shop_config_2(3)
fl=shop_config_2(4)
flsl=shop_config_2(5)
fll=shop_config_2(6)
class_2=split(class2,",")
class1=class_2(0)
class2=class_2(1)
class3=class_2(2)
class4=class_2(3)
musicurl=trim(rs("musicurl"))
rs.Close
set rs=nothing
%>