📄 showarticle12.asp
字号:
<!--#include file="Inc/syscode.asp"-->
<%
const ChannelID=2
Const ShowRunTime="Yes"
dim tLayout,tUser
PageTitle="正文"
strFileName="ShowArticle.asp"
if ArticleId<=0 then
FoundErr=true
ErrMsg=ErrMsg & "<br><li>请指定文章ID</li>"
end if
if FoundErr=True then
call WriteErrMsg()
else
%>
<html>
<head>
<title><%=strPageTitle & " >> " & ArticleTitle%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="inc/Skin_CSS.asp"-->
<% call MenuJS() %>
<STYLE>
BODY
{scrollbar-face-color:E6E6D9; scrollbar-shadow-color:ffffff;
scrollbar-highlight-color:bfbf9f; scrollbar-3dlight-color:ffffff;
scrollbar-darkshadow-color:E6E6D9; scrollbar-track-color:f2f2f2;
scrollbar-arrow-color:ffffff;}
</STYLE>
<link href="img/index.CSS" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#82862B" leftmargin="5" >
<table width="760" height="95" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<!--DWLayoutTable-->
<tr>
<td width="5" height="5"></td>
<td width="750"></td>
<td width="5"></td>
</tr>
<tr>
<td height="85"></td>
<td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="f2f2f2" class="tde">
<!--DWLayoutTable-->
<tr>
<td width="750" height="85"><table width="100%" height="75" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="27%" valign="bottom"> <div align="center"><img src="img/INDEX_r2_c2.gif" width="182" height="64"></div></td>
<td width="60%"><table width="468" height="60" border="0" cellpadding="0" cellspacing="0" background="img/banner.jpg">
<tr>
<td><div align="center"> </div></td>
</tr>
</table></td>
<td width="13%" valign="middle"> <table width="90" height="60" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="18"> <div align="center"><strong>• </strong> <font color="#666666"><span onclick="var strHref=window.location.href;this.style.behavior='url(#default#homepage)';this.setHomePage('http://www.dadayu.com');" style="CURSOR: hand">设 为 首 页</span></font></div></td>
</tr>
<tr>
<td height="18"> <div align="center"><strong>•</strong> <font color="#666666">
<script language="JavaScript">
function bookmarkit(){window.external.addFavorite('http://www.dadayu.com',':. DaDaYu .:')}
if (document.all)document.write('<a href="#" onClick="bookmarkit()"><font color="#666666">加 入 收 藏</font></a>')
</script>
</font></div></td>
</tr>
<tr>
<td height="18"> <div align="center"><strong>• </strong> <a href="mailto:www@dadayu.com">联 系 我 们</a></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
<td></td>
</tr>
<tr>
<td height="5"></td>
<td></td>
<td></td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="border2">
<tr>
<td valign="top"><table width="100%" border="0" align="center" cellpadding="2" cellspacing="0" bgcolor="#FFFFFF" class="border">
<tr>
<td> <table class="tdr" width="750" height="22" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#F3F3F1">
<tr bgcolor="999933">
<td width="80%" height="25"> <font color="#FFFFFF"><img src="Images/arrow.gif" width="11" height="14" align="absmiddle">
<%response.write rs("Title")%>
</font></td>
<td width="20%" class="title_maintxt">
<%
if rs("OnTop")=true then
response.Write("<font color=blue>顶</font> ")
else
response.write(" ")
end if
if rs("Hits")>=HitsOfHot then
response.write("<font color=red>热</font> ")
else
response.write(" ")
end if
if rs("Elite")=true then
response.write("<font color=green>荐</font>")
else
response.write(" ")
end if
%> </td>
</tr>
</table>
</td>
</tr>
<tr align="center" valign="middle">
<td height="70" colspan="2">
<table width="750" height="6" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="60" bgcolor="#F3F3F1" Class="tde"> <div align="center">
<table width="98%" height="6" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="6" Class="tdbg_left2"></td>
</tr>
</table>
<strong><font color="#2F99CC"size="3"><%=rs("Title")%></font><br>
</strong>
<table width="98%" height="6" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="6" Class="tdbg_left2"></td>
</tr>
</table>
<strong> </strong>[
<%
dim Author,CopyFrom
Author=rs("Author")
CopyFrom=rs("CopyFrom")
response.write "作者:"
if instr(Author,"|")>0 then
response.write "<a href='mailto:" & right(Author,len(Author)-instr(Author,"|")) & "'>" & left(Author,instr(Author,"|")-1) & "</a>"
else
response.write Author
end if
response.write " 文章来源:"
if instr(CopyFrom,"|")>0 then
response.write "<a href='" & right(CopyFrom,len(CopyFrom)-instr(CopyFrom,"|")) & "'>" & left(CopyFrom,instr(CopyFrom,"|")-1) & "</a>"
else
response.write CopyFrom
end if
response.write " 点击数:" & rs("Hits") & " 责任编辑:"
set tUser=conn.execute("select UserID from [User] where UserName='" & rs("Editor") & "'")
if tUser.bof and tUser.eof then
response.write rs("Editor")
else
response.write "<a href='ShowUserInfo.asp?UserID=" & tUser(0) & "'>" & rs("Editor") & "</a>"
end if
%>
] </div></td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="2"><table width="750" border="0" align="center" cellpadding="0" cellspacing="5" class="tde">
<tr>
<td width="739" height="195" valign="top"> <%call ShowArticleContent()%> </td>
</tr>
</table>
<table width="98%" height="4" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="4" Class="tdbg_left2"></td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="2"><table width="750" height="48" border="0" align="center" cellpadding="0" cellspacing="5" bgcolor="#F3F3F1" class="tde">
<tr>
<td height="36"> <li>上一篇文章:
<% call ShowPrevArticle(200) %>
</li>
<br> <li>下一篇文章:
<% call ShowNextArticle(200) %>
</td>
</tr>
</table>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25">
<div align="right">【<a href="Comment.asp?ArticleID=<%=rs("ArticleID")%>" target="_blank">发表评论</a>】【<font color="#666666">
<script language="JavaScript">
function bookmarkit(){window.external.addFavorite('http://www.qt66.com','非常视觉')}
if (document.all)document.write('<a href="#" onClick="bookmarkit()"><font color="#666666">收藏此文</font></a>')
</script>
</font>】【<a href="printpage.asp?ArticleID=<%=rs("ArticleID")%>">打印此文</a>】【<a href="javascript:window.close();">关闭窗口</a>】</div></td>
</tr>
</table>
<table class="tde" width="750" height="23" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EEEEEE">
<tr>
<td class="title_maintxt"><strong> <img src="Images/TEAM.gif" width="16" height="16" align="absmiddle"> 网友评论:</strong>(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)</td>
</tr>
</table>
<table width="98%" height="6" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="6" Class="tdbg_left2"></td>
</tr>
</table>
<table class="tde" width="750" height="100%" border="0" align="center" cellpadding="5" cellspacing="0">
<tr>
<td valign="top">
<% call ShowComment(10) %>
</td>
</tr>
</table></td>
</tr>
<tr>
<td height="5" ></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="760" height="7" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
</table>
</body>
</html>
<%
end if
rs.close
set rs=nothing
call CloseConn()
%>
<!--#include file="end.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -