bbsmessage.asp

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

ASP
31
字号
<!--#include file="mdb.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>短信通知</title>
<link href="skin/1/css.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
function CheckStr(str)
   dim tstr,l,i,ch
       l=len(str)
       for i=1 to l
	   ch=mid(str,i,1)
	   if ch="'" then
		tstr=tstr+"'"
	   end if
		tstr=tstr+ch
       next
   CheckStr=tstr
end function
if CheckStr(Request.Cookies("HX_USER")("User_Name"))<>"" then
sdx=conn.execute("select count(*) from [message] where incept='"&CheckStr(Request.Cookies("HX_USER")("User_Name"))&"' and flag=0")(0)
if sdx>0 then Response.Write("<bgsound src='img/mail.wav' loop='1'>")
Response.Write("<td><font color=red><B>"&sdx&"</B></font></td>")
end if
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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