<!--#include file="inc/inc_syssite.asp"-->
<%
dim rs,skinid,userid
dim show,skinshowlog,i
skinid=clng(request("id"))
userid=clng(request("userid"))
if skinid>0 then
	set rs=oblog.execute("select skinmain,skinshowlog from oblog_userskin where id="&skinid)
	if rs.eof then
		response.write "模版不存在！"
	else
		skinshowlog=rs(1)
		for i=1 to 6
			skinshowlog=skinshowlog+rs(1)
		next
		show=replace(rs(0),"$show_log$",skinshowlog)
		response.write show
	end if
	set rs=nothing
elseif userid>0 then
	'进行身份验证
	oblog.CheckUserLogined
	If oblog.logined_uid<>userid Then
		Response.Write "您不能察看他人的备份模板"
	Else
		set rs=oblog.execute("select bak_skin1,bak_skin2 from oblog_user where userid="&userid)
		if rs.eof then
			response.write "用户不存在！"
		else
			if rs(0)="" or rs(1)="" or isnull(rs(0)) or isnull(rs(1)) then
				response.Write("当前没有备份模板")
			else 
				skinshowlog=rs(1)
				for i=1 to 6
					skinshowlog=skinshowlog+rs(1)
				next
				show=replace(rs(0),"$show_log$",skinshowlog)
				response.write show
			end if
		end if
	End If
	set rs=nothing
end if
Set oblog=Nothing
%>