config.asp

Art2008 CMS是一款具有强大的功能的基于ASP语言的网站管理软件

<%
'用户注册，广告，浮动导航，专题开关数据库调用
Set rs9 = Server.CreateObject("ADODB.Recordset")
sql9 ="SELECT * From config"
RS9.open sql9,Conn,3,3

showzt=rs9("showzt")
fddh=rs9("fddh")
fddh_body=rs9("fddh_body")
fddh_x=rs9("fddh_x")
fddh_y=rs9("fddh_y")
top_pic=rs9("top_pic")
top_pic_url=rs9("top_pic_url")

rs9.close
set rs9=nothing


'网站基本设置数据库调用
set rs8=conn.execute("select * from setting")

sitename=rs8("sitename")   '（网站名称）
siteurl=rs8("siteurl")     '（网站地址）
sitekey=rs8("sitekey")     '（关键字）
sitedes=rs8("sitedes")     '（网站描述）
sitecr=rs8("sitecr")       '（版本信息）
siteopen=rs8("siteopen")   '（系统状态开关）
sitedir=rs8("sitedir")     '（维护说明）
MailSetting=Split(Rs8("MailSetting"),"^@$@^") '（邮件选项）

rs8.close
set rs8=nothing


'留言本设置数据库调用
set gbook=conn.execute("select * from gbook_setup")

maxlength=cint(gbook("maxlength"))
view=gbook("view")
pages=cint(gbook("pages"))
html=cint(gbook("html"))
mailyes=cint(gbook("mailyes"))
book_jianju=cint(gbook("book_jianju"))
huifutishi=cstr(gbook("huifutishi"))
huifucolor=cstr(gbook("huifucolor"))
bad=cstr(gbook("bad"))

gbook.close
set gbook=nothing




%>