ycms_picurl.asp

来自「安全性好,适用于展示和进行资源下载的个人和大型网站使用!」· ASP 代码 · 共 18 行

ASP
18
字号
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/YCMS.asp"-->
<%
YCMS_Open()
dim url1,url2,picid,num
picid=request.querystring("id")
num=request.querystring("num")
if request.querystring("action")="img" then
response.write"<html><title>鏌ョ湅鍥剧墖</title>"& vbCrLf
response.write"<body topmargin='10' style='text-align:center;background:#C0C0C0;'>" & vbCrLf
response.write "<span style='text-align:center;background:#fff;'><img src='YCMS_Picurl.asp?id="&picid&"&num="&num&"' style='border:1px solid #000;' alt='鍘熷浘'/></span>" & vbCrLf
response.write "</body></html>"& vbCrLf
response.end
else
url1=Cstr(Request.ServerVariables("HTTP_REFERER"))
url2=Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(url1,8,len(url2))<>url2 then
response.Redirect"error.asp?action=error&text="&server.urlEncode("绂佹

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?