⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ycms_picurl.asp

📁 安全性好,适用于展示和进行资源下载的个人和大型网站使用!
💻 ASP
字号:
<!--#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 + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -