style.asp

浪人文章系统

<%

if Trim(Request.QueryString("SN"))<>"" then


	StyleName=Trim(Request.QueryString("SN"))

	Response.Cookies("GuLREcnArticleStyle")=""&StyleName&""
	Response.Cookies("GuLREcnArticleStyle").Expires=date+365

	WebSiteURL_User=Request.ServerVariables("http_referer")

	if WebSiteURL_User<>empty and instr(WebSiteURL_User,"left.asp")=0 then
		Response.redirect WebSiteURL_User
	else
		Response.redirect WebSiteURL
	end if

end if

	dim WebSiteStyle
	WebSiteStyle=Request.Cookies("GuLREcnArticleStyle")

	if WebSiteStyle<>"" then
		WebSiteStyle=WebSiteStyle
	else
		WebSiteStyle=WebSiteStyleDefault
	end if
%>