📄 talk_seek.asp
字号:
<!--插入html头部分以及数据库接口-->
<!--#include file="in_conn.asp"-->
<body>
<!--插入网站置顶-->
<% if u_name="" then
Response.Redirect "log_err.asp"
else
%>
<!--#include file="in_topmb.asp"-->
<% end if %>
<table align="center" width="700" height="25" border="0" cellspacing="0" cellpadding="0" class="rdbar"><tr>
<td width="100%" height="100%">
<a href="index.asp">[首页]</a>-<a href="talkbook.asp">[班级讨论区]</a>-<font class="ft1">[搜 索]</font>
</td>
</tr></table>
<table align="center" width="700" height="25" border="0" cellspacing="0" cellpadding="0" class="rdbar"><tr>
<th width="25%" height="100%" class="rdr" style="background:<% =bg2 %>">
<a href="talk_seek.asp">[搜索讨论区主题]</a>
</th>
<th width="25%" height="100%" class="rdr">
<a href="ph_seek.asp">[搜索照片]</a>
</th>
<th width="25%" height="100%" class="rdr">
<a href="mbseek.asp">[搜索成员资料]</a>
</th>
<th width="25%" height="100%">
<a href="fjseek.asp">[搜索共享附件]</a>
</th>
</tr></table>
<table align="center" width="700" height="101" border="0" cellspacing="0" cellpadding="6" class="rdd">
<tr><td width="100%">
<form name="fm1" action="talk_seek_result.asp" method="post">
<b>主题关键字：</b><input type="text" name="txttopic" maxlength="50" size="25" class="fill">
<b>作者：</b><input type="text" name="txtauthor" maxlength="8" size="12" class="fill">
<br><br> <b>指定版面： </b>
<Select name="txtkind">
<%
Response.Write "<option value='quanbu'>-全部版面-</option>"
'列出所有版面分类
sqlstr="SELECT kd_ID,kd_name FROM tblkind ORDER BY kd_class DESC"
rs.open sqlstr,conn,1,1
FOR i=1 TO rs.RecordCount
Response.Write "<option value='"&rs("kd_ID")&"'>"&unhtml(rs("kd_name"))&"</option>"
rs.MoveNext
NEXT
rs.Close
%>
</Select>
<p align="left"> <input type="submit" name="cmdpub" value="开始搜索" class="an"></p>
</form>
</td></tr>
</table>
<!--插入在线统计-->
<!--#include file="in_online.asp"-->
<!--插入网站置底-->
<!--#include file="in_bottom.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -