showskin.asp

后台登陆admin.asp

<!--#include file="mdb.asp"-->
<%
dim rs,skinid
dim show,skinshowlog
skinid=clng(request("id"))
set rs=conn.execute("select skin1,skin2 from b_skin where id="&skinid)
if rs.eof then
	response.write "模版不存在！"
else
	skinshowlog=rs(1)
	dim i
	i=0
	for i=0 to 5
		i=i+1
		skinshowlog=skinshowlog+rs(1)
	next
	show=replace(rs(0),"$show_log$",skinshowlog)
	response.write show
end if
rs.close
set rs=nothing
%>