📄 particular.asp
字号:
<!--#INCLUDE FILE="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 check_Null(){
if (document.form1.title.value==""){
alert("主题不能为空!");
return false;
}
if (document.form1.user_id.value==""){
alert("用户名不能为空!");
return false;
}
return true;
}
// -->
</script>
</head>
<body>
<%
'首先将该文章的电击数加1
strSql="Update bbs Set hits=hits+1 Where id=" & Request.QueryString("id")
db.Execute(strSql)
%>
<h1 align="center">BBS论坛</h1>
<table width="708" border="1" bordercolorlight="#80BFFF" bordercolordark="#80BFFF" cellspacing="0" cellpadding="0" bgcolor="#80BFFF" align="center">
<tr>
<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,title,father_id,first_id
father_id=getFather(Request.QueryString("id"))
strSql="select * from bbs where father_id like '" & father_id & "%' order by father_id"
Set rs=db.Execute(strSql)
title=rs("title") '记住本文章的title，下面待用
first_id=rs("first_id") '记住本文章的firtst_id，下面代用
Do while not rs.Eof
%>
<tr bgcolor="#C5EDE7">
<td width="20%" align="center">
<a href="mailto:<%=rs("user_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%>">
<input type="hidden" name="father_id" value="<%=father_id%>">
<input type="hidden" name="first_id" value="<%=first_id%>">
</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"></td>
</tr>
<tr>
<td width="20%">email：</td>
<td><input type="text" name="user_email" size="30" class="inputbox"></td>
</tr>
<tr>
<td colspan="2" align="center">
<br>
<input type="submit" value="确定提交" name="B1" class="inputbutton">
<input type="button" value="返回论坛" name="返回论坛" onclick="window.open('bbslist.asp','_self')" class="inputbutton">
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<table width="708" border="1" bordercolorlight="#80BFFF" bordercolordark="#80BFFF" cellspacing="0" cellpadding="0" bgcolor="#80BFFF" align="center">
<tr>
<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 + -