📄 savebbs.asp

📁 一套在线考试系统

💻 ASP

字号:

<!--#include file="conn.asp"--><%
Dim bbsid
Dim title
Dim text
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>adsf</title>
<link rel="stylesheet" type="text/css" href="../DEFAULT.CSS">
<script language="javascript">

</script>
<script language="JavaScript1.2" src="../js/lock.js"></script>
</head>

<body oncontextmenu="self.event.returnValue=false" onselectstart="selectstart();" bgcolor="#FFFFFF">

<%
randomize
bbsid="BBS"&year(date())&month(date())&day(date())&hour(time())&minute(time())&second(time())
title=request("title")
text=request("text")
sql="select * from bbs"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
rs.addnew
rs("bbsid")=bbsid
rs("title")=title
rs("text")=text
rs("posttime")=date()
rs("username")=request.cookies("myusername")
rs("parent")="0"
rs.update
rs.close
%>
<p>　</p>
<p>　</p>
<div align="center">
  <center>
  <table cellspacing="0" style="border-collapse: collapse" width="480" id="AutoNumber2" cellpadding="0" border="1" class="withborder" bordercolor="#000000" bgcolor="#F1F1F1">
    <tr>
      <td width="100%" height="25" class="border">操作成功</td>
    </tr>
    <tr>
      <td width="100%" height="160" style="height: 160">
      <p align="center"><font size="2">祝贺您，已经成功发布论题！</font></td>
    </tr>
    <tr>
      <td width="100%" height="30" class="border">
      <p align="center">
      <input type="button" value="返回讨论区" name="B3" class="s02" onclick="window.location='bbs.asp'"></td>
    </tr>
  </table>
  </center>
</div>

</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -