skin.asp

来自「打开目录ads文件夹 找到top_ads.js文件 用记事本打开后就可以」· ASP 代码 · 共 19 行

<!--#include file="admin/config.asp"-->
<%
If Request.QueryString("action")="" then
response.redirect"index.asp"
elseIf Request.QueryString("action")="skin" then
Response.Cookies(shotan)("MyDiySkin")=request.querystring("skin")
response.Cookies(shotan).expires=date()+365
response.redirect Request.ServerVariables("HTTP_REFERER")
end if
Function Encode(content)
dim tmp
tmp=content
tmp=replace(tmp,"<","&lt;")
tmp=replace(tmp,">","&gt")
tmp=replace(tmp,"'","")
tmp=replace(tmp,"char(34)","")
Encode=tmp
End Function
%>