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

📄 saveaddbbs.asp

📁 学校智能办公系统 1、系统包含成绩学籍管理、公文管理、电子备课、教职工管理、照片管理、课件管理等学校办公的多个方面。 2、实行集中管理
💻 ASP
字号:
<!--#include file="../opendb.asp"-->
<!--#include file="html.asp"-->
<!--#include file="char.asp"-->
<!--#include file="../asp/sqlstr.asp"-->
<%
 title=sqlstr(request("title"))
 picture=sqlstr(request("pictureid"))
 content=sqlstr(request("content"))
 ydr=sqlstr(request("zry"))
 ip= Request.ServerVariables("REMOTE_ADDR")
 nowtime=now()
sj=cstr(year(nowtime))+"-"+cstr(month(nowtime))+"-"+cstr(day(nowtime))+" "+cstr(hour(nowtime))+":"+right("0"+cstr(minute(nowtime)),2)+":"+right("0"+cstr(second(nowtime)),2)

set rs=server.createobject("ADODB.recordset") 
rs.Open "SELECT * FROM bbs Where ID is null",conn,1,3 
rs.addnew

rs("name")=request.cookies("oabusyusername")
rs("subject")=sqlstr(htmlencode2(title))
rs("Time")=sqlstr(sj)
rs("Content")=sqlstr(ubbcode(Content))
rs("Pic")=sqlstr(picture)
rs("Knock")="0"
if request("subjectid")<>"" then
rs("SubjectId")=sqlstr(request("subjectid"))
else
rs("subjectid")=0
end if
rs("IP")=sqlstr(ip)
rs("ydr")=ydr
rs.update
set rs=nothing
%>
<script language=javascript>
opener.location=opener.location;window.close();
</script>

⌨️ 快捷键说明

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