?? showsummary_body.asp
字號:
<%sub showsummary_body()
sql="select * from summary where summary_id="&request.querystring("summary_id")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<table width="<%=tablewidth%>" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">
<tr>
<td width="580" valign="top" bgcolor="#eaf4ff" class="line">
<table width="98%" border="0" align="center" cellpadding="6" cellspacing="0" bgcolor="#F7F7F7" style="border-collapse: collapse">
<tr>
<td align="center" background="images/dh.gif" class="linee"><b><%=rs("summary_title")%></b></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" align="center" class="linee"><font color="#FF0000">來源:</font><%=rs("summary_from")%>
<font color="#FF0000">發(fā)表日期:</font><%=rs("summary_date")%>
<font color="#FF0000">閱讀次數(shù):</font><%=rs("summary_count")%></td>
</tr>
<tr>
<td valign="top" bgcolor="#FFFFFF" class="lineee"><br><%=ubb2html(formatStr(autourl(rs("summary_content"))),true,true)%>
<br> <br></td>
</tr>
<tr>
<td valign="top" bgcolor="#FFFFFF" class="lineee">
<b>相關(guān)文章</b><br>
<%sql="select top 5 * from summary where summary_content like '%"&rs("summary_keyword")&"%' and summary_id <> "&rs("summary_id")&" order by summary_date DESC"
set rs2=server.createobject("adodb.recordset")
rs2.open sql,conn,1,1
do while not rs2.eof
%>
<a href="showsummary.asp?summary_id=<%=rs2("summary_id")%>">
<%=rs2("summary_title")%></a>
<%=rs2("summary_date")%><br>
<%
rs2.movenext
loop
if rs2.eof and rs2.bof then
response.write "沒有相關(guān)文章"
end if
rs2.close
set rs2=nothing
%>
</td>
</tr>
</table>
<br>
</td>
<td width="190" align="center" valign="top" bgcolor="#09DD77">
<%call summarycat()%>
</td>
</tr>
</table>
<%end sub%>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -