⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 showarticle12.asp

📁 一个功能很全面的设计网站,可以作为工作室、个人主页、技术网站等
💻 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>&#8226;&nbsp;</strong>&nbsp;<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">设&nbsp;为&nbsp;首&nbsp;页</span></font></div></td>
                    </tr>
                    <tr> 
                      <td height="18"> <div align="center"><strong>&#8226;</strong>&nbsp;<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">加&nbsp;入&nbsp;收&nbsp;藏</font></a>')
</script>
                          </font></div></td>
                    </tr>
                    <tr> 
                      <td height="18"> <div align="center"><strong>&#8226;&nbsp;</strong>&nbsp;<a href="mailto:www@dadayu.com">联&nbsp;系&nbsp;我&nbsp;们</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">&nbsp;&nbsp;<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>&nbsp;")
else
	response.write("&nbsp;&nbsp;&nbsp;")
end if
if rs("Hits")>=HitsOfHot then
	response.write("<font color=red>热</font>&nbsp;")
else
	response.write("&nbsp;&nbsp;&nbsp;")
end if
if rs("Elite")=true then
	response.write("<font color=green>荐</font>")
else
	response.write("&nbsp;&nbsp;")
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 "&nbsp;&nbsp;&nbsp;&nbsp;文章来源:"
		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 "&nbsp;&nbsp;&nbsp;&nbsp;点击数:" & rs("Hits") & "&nbsp;&nbsp;&nbsp;&nbsp;责任编辑:"
		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>&nbsp;<img src="Images/TEAM.gif" width="16" height="16" align="absmiddle">&nbsp;网友评论:</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 + -