?? style.asp
字號:
<!--#include file="conn.asp"-->
<%response.buffer=true
url=Request.ServerVariables("HTTP_REFERER")
response.cookies(cn&"2")("bbsup")=0
if instr(url,"bd=")>0 then
bd=replace(request.querystring("bd"),"'","''")
sty="bbs"&bd
else
sty="all"
end if
skin=request.querystring("skin")
select case skin
case"a"
c1="#00659C"
c2="#EFEFEF"
case"b"
c1="#008000"
c2="#F7FFF7"
case"c"
c1="#E6462F"
c2="#FFF9F7"
case"d"
c1="#DE9527"
c2="#FFFDF4"
case"e"
c1="#918E91"
c2="#FAFAFA"
case"f"
c1="#E66FB0"
c2="#FFF0F5"
case"g"
c1="#1059DE"
c2="#E1EDF7"
case"h"
c1="#8C8AB3"
c2="#FFFBFF"
case"i"
c1="#8D593D"
c2="#DFC4B5"
case"j"
c1="#4283D2"
c2="#E1EDF7"
end select
Response.Cookies(cn&"1")(sty)=skin
Response.Cookies(cn&"1")(sty&"c1")=c1
Response.Cookies(cn&"1")(sty&"c2")=c2
Response.Cookies(cn&"1").Expires=date+365
response.redirect url
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -