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

📄 bbs_add.asp

📁 应用于高等院校党团思想教育
💻 ASP
字号:
<%@ Language=VBScript %>
<!-- #include file = "../include/conn_bbs.asp" -->
<%
Check=Session.Contents("SYSOP")
if check<>true then%>
<script language="vbscript">
  msgbox "对不起!您无权访问该页!",,"警告!"
  history.back()
</script>
<%
else
%>
<html>
<head>
<title>BBS Add</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/style.css">
</head>

<body bgcolor="#FFFFFF" background="../images/bg2.gif">
<form method="post" action="bbs_add_save.asp">
  <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr> 
      <td colspan="3" align="center">增加新的 BBS</td>
    </tr>
    <tr> 
      <td colspan="3" align="center">&nbsp;</td>
    </tr>
    <tr> 
      <td colspan="3" align="center">&nbsp;</td>
    </tr>
    <tr> 
      <td colspan="3" align="center">&nbsp;</td>
    </tr>
    <tr> 
      <td width="20%" align="right"> 论坛所属类别:</td>
      <td width="5%">&nbsp;</td>
      <td width="75%"> 
        <select name="ctype">
          <option value="" selected>请选择论坛类别</option>
                <%set rstmp=server.createobject("adodb.recordset")
rstmp.open "Select * From type",Conn_BBS,0,1
  do while not rstmp.eof%> 
                <option value="<%=rstmp("type")%>"><%=rstmp("type")%></option>
                <%rstmp.movenext
  loop
rstmp.close
set rstmp=nothing
%> 
        </select>
        (论坛的类别) </td>
    </tr>
    <tr> 
      <td width="20%" align="right">论坛连接名称:</td>
      <td width="5%">&nbsp;</td>
      <td width="75%"> 
        <input type="text" name="user">
        (http://www.gen-new.com/bbs/bbs.asp?owner=论坛名称) </td>
    </tr>
    <tr> 
      <td width="20%" align="right">论坛标题:</td>
      <td width="5%">&nbsp;</td>
      <td width="75%"> 
        <input type="text" name="subject">
        (显示在 bbs_list.asp 中论坛的名字)</td>
    </tr>
    <tr> 
      <td width="20%" align="right">论坛简介:</td>
      <td width="5%">&nbsp;</td>
      <td width="75%"> 
        <input type="text" name="comment">
        (关于论坛的简单介绍,会出现在论坛的最上方) </td>
    </tr>
    <tr> 
      <td width="20%" align="right"><br>
        论坛版主用户名:</td>
      <td width="5%">&nbsp;</td>
      <td width="75%"> 
        <input type="text" name="name">
        (社区的合法注册用户名) </td>
    </tr>
    <tr> 
      <td width="20%" align="right">论坛版主的 E-Mail:</td>
      <td width="5%">&nbsp;</td>
      <td width="75%"> 
        <input type="text" name="email" value="someone@somewhere.com">
        (联系版主的电子邮件地址) </td>
    </tr>
    <tr> 
      <td width="20%" align="right">该论坛版主的密码:</td>
      <td width="5%">&nbsp;</td>
      <td width="75%"> 
        <input type="text" name="password">
        (版主可以自行修改) </td>
    </tr>
    <tr> 
      <td width="20%" align="right">&nbsp;</td>
      <td width="5%">&nbsp;</td>
      <td width="75%">&nbsp;</td>
    </tr>
    <tr> 
      <td width="20%" align="right">&nbsp;</td>
      <td width="5%">&nbsp;</td>
      <td width="75%">&nbsp;</td>
    </tr>
    <tr>
      <td width="20%" align="right">&nbsp;</td>
      <td width="5%">&nbsp;</td>
      <td width="75%">
        <input type="submit" name="Submit" value="  提交  ">
        <input type="reset" name="Reset" value="  取消  ">
      </td>
    </tr>
  </table>
</form>
</body>
</html>
<%
end if
%>

⌨️ 快捷键说明

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