📄 particular.asp
字号:
<%option explicit%>
<%
if session("user_type")<>"T" then
response.redirect "../../../index.asp"
end if
%>
<!--#INCLUDE FILE="../../../system/odbc_connection.asp"-->
<!--#INCLUDE FILE="function.asp"-->
<html>
<head>
<title>bbs论坛</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="general.css" rel="stylesheet" type="text/css">
<script language="JAVASCRIPT">
<!--
function Trim(str){
while (str !="" && str.charAt(0) == " ") str = str.substring(1,str.length);
while (str !="" && str.charAt(str.length-1) == " ") str = str.substring(0,str.length-1);
return str;
}
function check_Null(){
if (Trim(document.form1.title.value)==""){
alert("主题不能为空!");
return false;
}
if (Trim(document.form1.user_id.value)==""){
alert("用户名不能为空!");
return false;
}
return true;
}
// -->
</script>
</head>
<body>
<h1 align="center">BBS论坛</h1>
<table border="1" width="708" bordercolorlight="#80BFFF" cellspacing="0" cellpadding="0" bordercolordark="#80BFFF" align="center" >
<tr class="trtitle">
<td width="100%">
<a href="bbslist.asp"><font color="#FFFFFF">【返回论坛】</font></a>
</td>
</tr>
</table>
<table border="1" width="708" height="400" bordercolorlight="#80BFFF" cellspacing="0" cellpadding="2" bordercolordark="#80BFFF" bgcolor="#FFFFFF" align="center">
<tr>
<td width="100%" valign="top" align="center">
<table border="1" cellpadding="2" bgcolor="#E1F3F4" cellspacing="0" style="border-collapse: collapse" bordercolor="#80BFFF" width="100%" id="AutoNumber1" align="center">
<%
'下面分页显示有关内容
dim rs,strSql,father,title
father=getFather(Request.QueryString("id"))
strSql="select * from bbs where father like '" & father & "%' order by father"
Set rs=db.Execute(strSql)
title=rs("title")
Do while not rs.Eof
%>
<tr bgcolor="#C5EDE7">
<td width="20%" align="center">
<a href="mailto:<%=rs("email")%>"><%=rs("user_id")%></a>
</td>
<td>
    发布时间：<%=rs("submit_date")%>  点击：<%=rs("hits")%>次</font></I>
</td>
</tr>
<tr>
<td>
</td>
<td>
<b>    <font color=#b40000><%=rs("title")%></font></b>
<p><%=rs("body")%>
</td>
</tr>
<%
rs.movenext
Loop
%>
</table>
<p align="center"><a href="bbslist.asp"><font color=red>【返回论坛】</font></a>
<hr width="100%" color="#b40000" >
<form action="readd.asp" method="post" name="form1" onsubmit="javascript: return check_Null();">
<table border="0" width="86%" cellspacing="0" cellpadding="0" class="s2" align="center">
<tr>
<td width="20%">文章主题：</td>
<td><input type="text" name="title" size="49" class="inputbox" value="re：<%=title%>"></td>
</tr>
<tr>
<td width="20%">文章内容：</td>
<td><textarea rows="6" name="body" cols="60" class="inputtext"></textarea></td>
</tr>
<tr>
<td width="20%">用户名：</td>
<td><input type="text" name="user_id" size="20" class="inputbox" value="<%=Session("user_id")%>"></td>
</tr>
<tr>
<td width="20%">email：</td>
<td><input type="text" name="email" size="30" class="inputbox" value="<%=session("email")%>"></td>
</tr>
<tr>
<td colspan="2" align="center">
<br>
<input type="submit" value="确定提交" name="B1" class="inputbutton">
<input type="hidden" name="father" value="<%=father%>">
<input type="button" value="返回论坛" name="返回论坛" onclick="javascript:history.back();" class="inputbutton">
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<table border="1" width="708" bordercolorlight="#80BFFF" cellspacing="0" cellpadding="0" bordercolordark="#80BFFF" align="center" >
<tr class="trtitle">
<td width="100%">
<a href="bbslist.asp"><font color="#FFFFFF">【返回论坛】</font></a>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -