📄 show_fuwu.asp
字号:
<!--#include File="SQL.asp"-->
<!--#include File="Ckk_Conn.asp"-->
<%
sqla="select * from Ckk_YeJieNews where pass=1 and id="&Request("ID")
set rsa=server.createobject("adodb.recordset")
rsa.open sqla,dsn,3,2
if rsa.eof then
response.write("<script>alert(""您访问的信息还未审核或不存在！"");location.href=""./"";</script>")
response.end
end if
rsa("hots")=rsa("hots")+1
rsa.update
%>
<HTML><HEAD>
<TITLE><%= rsa("Title") %></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="Images/style1.css" type=text/css rel=stylesheet>
</HEAD><BODY leftMargin=0 topMargin=0 onload=document.formckk.Key.focus()><!--#include File="Ckk_Top.asp"--><DIV style="PADDING-TOP: 10px">
<table width="830" border=0 align="center" cellpadding=4 style="BORDER-RIGHT: #7bd7e7 1px solid; BORDER-TOP: #7bd7e7 1px solid; BORDER-LEFT: #7bd7e7 1px solid; BORDER-BOTTOM: #7bd7e7 1px solid; BORDER-COLLAPSE: collapse">
<tbody>
<tr>
<td height=30 background=Images/table_bg_02.gif> <img height=13 src="Images/ht.gif" width=13 align=absMiddle border=0> <b><font class=text_b07><%= rsa("Title") %></font></b></td>
<td width="25%" height=30 background=Images/table_bg_02.gif> </td>
<td height=30 align="right" background=Images/table_bg_02.gif><font color="#CCCCCC"><%= rsa("AddDate") %></font></td>
</tr>
<tr>
<td colspan=4><div align="center"></div>
<table width="98%" height="8" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"> <%= rsa("NeiRong") %> </td>
</tr>
</table></td>
</tr>
</tbody>
</table>
<DIV style="PADDING-TOP: 10px"></DIV>
<table width="830" border=0 align="center" cellpadding=4 style="BORDER-RIGHT: #7bd7e7 1px solid; BORDER-TOP: #7bd7e7 1px solid; BORDER-LEFT: #7bd7e7 1px solid; BORDER-BOTTOM: #7bd7e7 1px solid; BORDER-COLLAPSE: collapse">
<tbody>
<tr>
<td height=30 background=Images/table_bg_02.gif> <img height=13 src="Images/icon_star.gif" width=13 align=absMiddle border=0> <b><font class=text_b07>相关内容</font></b></td>
</tr>
<tr>
<td colspan=2><div align="center">
<table width="98%" height="50" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="50%" height="25" valign="top">总类上一篇：
<% sqla3="select top 1 * from Ckk_YeJieNews where id<"&Request("ID")&" and Pass=1 order by id desc"
set rsa3=server.createobject("adodb.recordset")
rsa3.open sqla3,dsn,3,2
if rsa3.eof then
Response.Write "暂无"
else
Response.Write "<a class=link_a03 href=http://www.xnzjpc.cn/seo/Show_FuWu.asp?ID="&rsa3("ID")&">"&rsa3("Title")&"</a>"
end if
rsa3.CLose
set rsa3=nothing%>
</td>
<td width="50%" valign="top">本类上一篇：
<% sqla3="select top 1 * from Ckk_YeJieNews where id<"&Request("ID")&" and Pass=1 and ClassID="&rsa("ClassID")&" order by id desc"
set rsa3=server.createobject("adodb.recordset")
rsa3.open sqla3,dsn,3,2
if rsa3.eof then
Response.Write "暂无"
else
Response.Write "<a class=link_a03 href=http://www.xnzjpc.cn/seo/Show_FuWu.asp?ID="&rsa3("ID")&">"&rsa3("Title")&"</a>"
end if
rsa3.CLose
set rsa3=nothing%>
</td>
</tr>
<tr>
<td height="25" valign="top">总类下一篇：
<% sqla3="select top 1 * from Ckk_YeJieNews where id>"&Request("ID")&" and Pass=1 order by id"
set rsa3=server.createobject("adodb.recordset")
rsa3.open sqla3,dsn,3,2
if rsa3.eof then
Response.Write "暂无"
else
Response.Write "<a class=link_a03 href=http://www.xnzjpc.cn/seo/Show_FuWu.asp?ID="&rsa3("ID")&">"&rsa3("Title")&"</a>"
end if
rsa3.CLose
set rsa3=nothing%>
</td>
<td width="50%" valign="top">本类下一篇：
<% sqla3="select top 1 * from Ckk_YeJieNews where id>"&Request("ID")&" and Pass=1 and ClassID="&rsa("ClassID")&" order by id"
set rsa3=server.createobject("adodb.recordset")
rsa3.open sqla3,dsn,3,2
if rsa3.eof then
Response.Write "暂无"
else
Response.Write "<a class=link_a03 href=http://www.xnzjpc.cn/seo/Show_FuWu.asp?ID="&rsa3("ID")&">"&rsa3("Title")&"</a>"
end if
rsa3.CLose
set rsa3=nothing%>
</td>
</tr>
</table>
</div></td>
</tr>
</tbody>
</table>
</DIV>
<% rsa.close
set rsa=nothing %>
<DIV style="PADDING-TOP: 8px"></DIV>
<!--#include File="Ckk_Boot.asp"--></BODY></HTML><!--#include File="Close.asp"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -