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

📄 show.asp

📁 一个很COOL的按钮FLASH,满不错的!
💻 ASP
字号:
<!--#include file=conn.asp-->
<%
sql="update main set hit=hit+1 where id="&request("id")
conn.execute(sql)
sql="select * from main where id="&request("id")
set rs=conn.execute(sql)
%>
<HTML>
<HEAD>
<TITLE>設計藝術之<%=rs("theme")%></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<style>
<!--
.opacity {COLOR: #ff9900; FILTER: alpha(opacity=100)}
A {text-decoration: none; color:#B08291; font-family: "宋体"; font-size: 9pt}
A:hover {text-decoration:line-through; color: #B08291}
table,td,body { color:#999999;font:9pt "宋体" }
.td{font:9pt "宋体";line-height:150%}
-->
</style>
</HEAD>
<BODY BGCOLOR=#FFFFFF leftmargin="0" topmargin="0">
<TABLE WIDTH=500 BORDER=0 CELLPADDING=0 CELLSPACING=0>
	<TR>
		<TD>
			<IMG SRC="images/page_01.gif" WIDTH=500 HEIGHT=67></TD>
	</TR>
	<TR>
		
    <TD background="images/page_02.gif" height="300" valign="top">
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="55">&nbsp;</td>
          <td height="30" align="center"><font color=#B08291><%=rs("theme")%></font></td>
        </tr>
        <tr> 
          <td width="55">&nbsp;</td>
          <td class="td"><font color=#999999><%=rs("content")%></font></td>
        </tr>
        <tr> 
          <td width="55">&nbsp;</td>
          <td class="td"> 
            <table width="100%" border="0" cellspacing="5" cellpadding="0">
              <tr> 
                <td> <br>
                  <%
    Set rslink=Server.CreateObject("ADODB.Recordset")
	sql="select * from main where id="&request("id")+1   
	rslink.open sql,conn,1,1    
  	if rslink.eof and rslink.bof then   
%>
                  <li>上篇文章:已经没有了 
                    <%else%>
                    <p> 
                  <li>上篇文章:<a href="show.asp?id=<%=rslink("id")%>" title="<%=rslink("theme")%>"> 
                    <%if len(rslink("theme"))>24 then%>
                    <%=left(rslink("theme"),24)%>... 
                    <%else%>
                    <%=rslink("theme")%> 
                    <%end if%>
                    </a> 
                    <%end if%>
                    <br>
                    <%
    rslink.close   
	sql="select * from main where id="&request("id")-1   
	rslink.open sql,conn,1,1   
  	if rslink.eof and rslink.bof then   
%>
                  <li>下篇文章:已经没有了 
                    <%else%>
                  <li>下篇文章:<a href="show.asp?id=<%=rslink("id")%>" title="<%=rslink("theme")%>"> 
                    <%if len(rslink("theme"))>24 then%>
                    <%=left(rslink("theme"),24)%>... 
                    <%else%>
                    <%=rslink("theme")%> 
                    <%end if%>
                    </a> 
                    <%
			  end if
			  rslink.close
			  %>
                </td>
              </tr>
            </table>
          </td>
        </tr>
        <tr> 
          <td width="55">&nbsp;</td>
          <td class="td"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="20" align="right" bgcolor="#efefef">| 发布时间:<%=rs("sj")%> 被阅览次数:<%=rs("hit")%></td>
              </tr>
              <tr> 
                <td bgcolor="999999" height="1"></td>
              </tr>
            </table>
          </td>
        </tr>
        <tr>
          <td width="52">&nbsp;</td>
          <td class="td"><a href="javascript:window.close()">[ 关 闭 窗 口 ]</a>&nbsp;&nbsp;</td>
        </tr>
      </table>
    </TD>
	</TR>
	<TR>
		<TD>
			<IMG SRC="images/page_03.gif" WIDTH=500 HEIGHT=102></TD>
	</TR>
</TABLE>
</BODY>
</HTML>
<%
  rs.close
  set rs=nothing
  %>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -