setep.asp

这次自已做的美工,可能很难看,但主要是为提高效率,这次全部生成了静态,只有一个链接查看最新文章的列表没有生成,因为我觉得没必要生成,浪费空间大小,那是一个很少用到的功能!这次去掉了很多功能,这个版本主

<!--#include file="fn/conn.asp"-->
<%
sqlb="select *from web_basic where id=1"
set rsbasic=conn.execute(sqlb)
'set rsbasic=Server.createObject("adodb.recordset")
'rsbasic.open sqlb,conn,1,1
chaddr=rsbasic("webaddr")
chname=rsbasic("webname")
chemail=rsbasic("webemail")
chcom=rsbasic("webcom")
chyou=rsbasic("webyou")
chtel=rsbasic("webtel")
chcopy=rsbasic("webcopy")
chtime=rsbasic("webtime")
rsbasic.close
set rsbasic=nothing
set rsb=conn.execute("select * from koyee_ad where id=1")
k_logo=rsb("ch_logo")
k_banner=rsb("ch_banner")
k_meta=rsb("ch_meta")
rsb.close
set rsb=nothing
set rsg=conn.execute("select * from koyee_gg where id=1")
k_sg=rsg("sg")
k_wg=rsg("wg")
rsg.close
set rsg=nothing
%>