📄 admin_sms.asp

📁 网站整站
💻 ASP
字号:
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/set.asp"-->
<!--#include file="inc/adminfunction.asp"-->
<%
call hacker()
call checkadmin("sms")

action=request.querystring("action")
user=trim(request.form("user"))
mydate=cint(trim(request.form("mydate")))
if action<>"" then
select case action
       case"allsms"
sql="delete * from [YC_sms]"
	   case "fordate"
	   if isnull(mydate) or mydate="" then 
	   response.write"<script>alert('天数不得为空！');location.href='admin_sms.asp';</script>" 
	   response.end 
	   end if
sql="delete * from [YC_sms] where datediff('d',datevalue(date),#"&date()&"#)>"&mydate&" and ok<>0"
conn.execute(sql)
response.write"<script>alert('成功删除"&mydate&"天前的所有短信！');location.href='admin_sms.asp'</script>"
response.end
	   case "savesms"
user=trim(request.form("user"))
title=trim(request.form("title"))
content=trim(request.form("content"))
if title="" then
response.write"<script>alert('短信息标题没有填写！');javascript:history.go(-1)</script>"
response.end
elseif content="" then
response.write"<script>alert('短信息内容没有填写！');javascript:history.go(-1)</script>"
response.end
end if
sql="insert into YC_sms(from_user,to_user,title,content) values('"&superuser&"','"&user&"','"&title&"','"&content&"')"
conn.execute(sql)
response.write"<script>alert('短信发送成功！');location.href='admin_sms.asp'</script>"
response.end
	   case else
end select 

end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="STYLESHEET" type="text/css" href="img/admin.css">
<script type='text/javascript' language='javascript' src='inc/adminjs.js'></script>
<body>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" bordercolor="<%=border%>" rules=none class=3d>
<tr><td height="22" colspan="6" class=title><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;批量删除短信(<a href='admin_sms.asp?action=allsms'><font color='#ffffff'>全部删除</a>)</b></td></tr>
<tr class='bg' height='25'>
<td>
<form method="POST" action="admin_sms.asp?action=fordate"  name='datesms'>
&nbsp;<font face='wingdings'>v</font>&nbsp;间隔天数：<input type="text" name="mydate" size="20" class='yecao' title='删除多少天以前的短信！请输入数字！'>&nbsp;<input type="submit" value="执行批量删除" name="ok" class='button'>&nbsp;</form><td></tr></table>


<form method="POST" action="admin_sms.asp?action=savesms"  name='form'>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" bordercolor="<%=border%>" rules=none class=3d>
<tr><td height="22" colspan="6" class=title><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;发送短信</b></td></tr>
<tr class='bg' height='25'><td>&nbsp;<font face='wingdings'>v</font>&nbsp;用&nbsp;户&nbsp;名：<input class='yecao' type='text' name='user' size="20" title='请输入要批量删除用户短信的用户名！'>
</td></tr>
<tr class='bg' height='25'><td>&nbsp;<font face='wingdings'>v</font>&nbsp;短信标题：<input type="text" name="title" class='yecao' size="35">
</td></tr><tr class='bg' height='25'><td>
<textarea name="content" id="content" style="display:none"><%=Server.HtmlEncode(rs("content"))%></textarea>
<iframe ID="HtmlEditor1" src='html/index.asp' frameborder=0 scrolling=no width='100%' HEIGHT='350'></iframe></td>
<td>
</tr>
<tr><td class="hr"></td></tr>
<tr class='bg' height='25'>
<td align='center'><input type="submit" value=" 发 布 " class='button' name="cmdok">&nbsp; 
<input type="reset" value=" 清 除 " class='button' name="cmdcancel">
<td>
</tr></table></form>
</body></html>
⌨️ 快捷键说明

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