savesms.asp
来自「仿雅虎论坛静态生成html版 后台管理:admin/admin.asp 用户」· ASP 代码 · 共 23 行
ASP
23 行
<!--#include file="../conn.asp"-->
<body bgcolor=<%=backcolor%>>
<%
if request("touser")<>"" and request("title")<>"" and request("message")<>"" then
Set rs = Server.CreateObject("ADODB.Recordset") '已打开短信数据库-------------------------
sql="select * from shortinfo "
rs.open sql,conn,1,3
rs.AddNew
rs("发件人")=request("sendser")
rs("是否发送标记")="Y"
rs("发件人删除标记")="N"
rs("发件人回收站删除标记")="N"
rs("是否已读")="N"
rs("收件人删除标记")="N"
rs("收件人回收站删除标记")="N"
rs("收件人")=request("touser")
rs("消息标题")=request("title")
rs("消息内容")=request("message")
rs("日期")=date()
rs.Update
rs.Close
Response.Write "<br><br><center>祇癳Θ
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?