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

📄 show_special.asp

📁 一个FLASH游戏的主页源码
💻 ASP
字号:
<!--#include file="Conn.asp"-->
<%'on error resume next%>
<%
SpecialID=request("SpecialID")
%>
<%
sql="select * from Special where SpecialID="&SpecialID
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,3

SpecialName=rs("SpecialName")
SpecialPic=rs("SpecialPic")
SpecialIntro=rs("SpecialIntro")
StarNO=rs("StarNO")
AddTime=rs("AddTime")

rs.close
set rs=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>佰萬娱乐地带.::::.::..动漫闪吧 - 系列动画 - <%=SpecialName%></title>
<link rel="stylesheet" href="Inc/Css.css" type="text/css">
</head>
<body topmargin="0" leftmargin="0" background="Image/Channel_Bground.gif">
<!--#include file="Top.asp"-->
<table border="0" width="770" cellspacing="0" cellpadding="0">
  <tr>
    <td colspan="2" width="180"><img border="0" src="Image/I_XS_A.gif"></td>
    <td rowspan="2" width="590"><img border="0" src="Image/I_XS_D.gif"></td>
  </tr>
  <tr>
    <td width="5"><img border="0" src="Image/I_XS_B.gif"></td>
    <td width="175"><img border="0" src="Image/Search_175.gif"></td>
  </tr>
</table>
<table border="0" width="770" cellspacing="0" cellpadding="0">
  <tr>
    <td><img border="0" src="Image/Space_5.gif"></td>
    <td width="175" valign="top">
      <table border="0" width="175" cellspacing="0" cellpadding="0">
        <tr>
          <td background="Image/Left_Bg_175.gif" align="center">
            <table border="0" width="157" cellspacing="0" cellpadding="0">
              <tr>
                <td><!--#include file="D_Search.asp"--></td>
              </tr>
              <tr>
                <td><img border="0" src="Image/Icon_Hot.gif"></td>
              </tr>
              <tr>
                <td><!--#include file="D_Flash_Hot.asp"--></td>
              </tr>
              <tr>
                <td><img border="0" src="Image/Special_175.gif"></td>
              </tr>
              <tr>
                <td><!--#include file="D_Special_Tui.asp"--></td>
              </tr>
              <tr>
                <td><img border="0" src="Image/Tui_175.gif"></td>
              </tr>
              <tr>
                <td><!--#include file="D_Flash_Tui.asp"--></td>
              </tr>
            </table>
          </td>
        </tr>
        <tr>
          <td><img border="0" src="Image/Left_Down_175.gif"></td>
        </tr>
      </table>
    </td>
    <td width="590" valign="top" align="center">
      <table border="0" width="570" cellspacing="0" cellpadding="0">
        <tr>
          <td height="25"><font color="#999999"><b>您的位置:</b><a href="#"><font color="#999999">佰萬娱乐城</font></a>             
            &gt;&gt;&gt; <a href="Index.Asp"><font color="#999999">动漫闪吧</font></a> &gt;&gt;&gt; <a href="Special_List.Asp"><font color="#999999">动画系列</font></a> &gt;&gt;&gt; <%=SpecialName%></font></td>                            
        </tr>
        <tr>
          <td width="100%"><img border="0" src="Image/Series_570.gif"></td>
        </tr>
        <tr>
          <td align="center" background="Image/Series_Bg_570.gif">
            <table border="0" width="95%" cellspacing="0" cellpadding="5">
              <tr>
                <td width="37%" valign="top">
<table border="0" bgcolor="#E1E1E1" cellspacing="1" cellpadding="0">
        <tr>
          <td width="100%">
<table cellSpacing="1" cellPadding="0" width="100%" bgColor="#d7d7d7" border="0">
  <tr>
    <td width="100%">
      <table cellSpacing="1" cellPadding="0" width="100%" bgColor="#b2b2b2" border="0">
        <tr>
          <td width="100%">
<table cellSpacing="0" cellPadding="5" width="100%" border="0">
  <tr>
    <td width="100%" bgColor="#ffffff">
      <table cellSpacing="0" border="0">
        <tr>
          <td width="100%" bgColor="#666666"><img border="0" src="SpecialPic/<%=SpecialPic%>" width="160" height="100"></td>
        </tr>
      </table>
    </td>
  </tr>
</table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
          </td>
        </tr>
</table>
                </td>
                <td width="63%" valign="top">
                  <table border="0" width="100%" cellspacing="0" cellpadding="5">
                    <tr>
                      <td colspan="2"><b><font color="#808000"><%=SpecialName%></font></b></td>
                    </tr>
                    <tr>
                      <td class="hj" colspan="2">
<%
SpecialIntro=replace(SpecialIntro,chr(13),"<br>")
SpecialIntro=replace(SpecialIntro,chr(32),"&nbsp;")
response.write SpecialIntro
%></td>
                    </tr>
                    <tr>
                      <td class="hj" width="65%"><b>加入日期:</b><%=AddTime%></td>
                      <td class="hj" width="35%"><b>系列评分:</b><img border="0" src="Image/<%=StarNO%>" align="absmiddle"></td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      <tr>
        <td height="10"><img border="0" src="Image/Series_Down_570.gif"></td>
      </tr>
      <tr>
        <td height="10"></td>
      </tr>
      <tr>
        <td><img border="0" src="Image/Channel_List_570.gif"></td>
      </tr>
        <tr>
          <td align="center" background="Image/Channel_BgB_570.gif">
          <table border="0" width="95%" cellspacing="0" cellpadding="5">
<%
sql="select * from Flash where SpecialID="&SpecialID&" order by FID desc"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1

n=0
do while not rs.eof 
%>
            <tr>
              <td width="33%" align="center">
                <table border="0" cellspacing="0" cellpadding="5">
                  <tr>
                  <td>
                    <table border="0" bgcolor="#E1E1E1" cellspacing="1" cellpadding="0">
                      <tr>
                        <td width="100%">
                          <table cellSpacing="1" cellPadding="0" width="100%" bgColor="#d7d7d7" border="0">
                              <tr>
                                <td width="100%">
                                  <table cellSpacing="1" cellPadding="0" width="100%" bgColor="#b2b2b2" border="0">
                                      <tr>
                                        <td width="100%">
                                          <table cellSpacing="0" cellPadding="5" width="100%" border="0">
                                              <tr>
                                                <td width="100%" bgColor="#ffffff">
                                                  <table cellSpacing="0" border="0">
                                                      <tr>
                                                        <td width="100%" bgColor="#666666"><a href="Show_Flash.Asp?FID=<%=rs("FID")%>" Title="<%=rs("Name")%>"><img border="0" src="UploadPic/<%=rs("FPic")%>" width="120" height="90"></a></td>
                                                      </tr>
                                                  </table>
                                                </td>
                                              </tr>
                                          </table>
                                        </td>
                                      </tr>
                                  </table>
                                </td>
                              </tr>
                          </table>
                        </td>
                      </tr>
                    </table>
                  </td>
                  </tr>
                  <tr>
                  <td align="center"><a href="Show_Flash.Asp?FID=<%=rs("FID")%>"><%=left(rs("Name"),11)%></a></td>
                  </tr>
                </table>
              </td>
<%
rs.movenext
if rs.eof or rs.bof then 
response.write "<td width='33%'></td><td width='34%'></td>"
exit do
else
n=n+1
end if
%>
              <td width="33%" align="center">
                <table border="0" cellspacing="0" cellpadding="5">
                  <tr>
                  <td>
                    <table border="0" bgcolor="#E1E1E1" cellspacing="1" cellpadding="0">
                      <tr>
                        <td width="100%">
                          <table cellSpacing="1" cellPadding="0" width="100%" bgColor="#d7d7d7" border="0">
                              <tr>
                                <td width="100%">
                                  <table cellSpacing="1" cellPadding="0" width="100%" bgColor="#b2b2b2" border="0">
                                      <tr>
                                        <td width="100%">
                                          <table cellSpacing="0" cellPadding="5" width="100%" border="0">
                                              <tr>
                                                <td width="100%" bgColor="#ffffff">
                                                  <table cellSpacing="0" border="0">
                                                      <tr>
                                                        <td width="100%" bgColor="#666666"><a href="Show_Flash.Asp?FID=<%=rs("FID")%>" Title="<%=rs("Name")%>"><img border="0" src="UploadPic/<%=rs("FPic")%>" width="120" height="90"></a></td>
                                                      </tr>
                                                  </table>
                                                </td>
                                              </tr>
                                          </table>
                                        </td>
                                      </tr>
                                  </table>
                                </td>
                              </tr>
                          </table>
                        </td>
                      </tr>
                    </table>
                  </td>
                  </tr>
                  <tr>
                  <td align="center"><a href="Show_Flash.Asp?FID=<%=rs("FID")%>"><%=left(rs("Name"),11)%></a></td>
                  </tr>
                </table>
              </td>
<%
rs.movenext
if rs.eof or rs.bof then 
response.write "<td width='34%'></td>"
exit do
else
n=n+1
end if
%>
              <td width="34%" align="center">
                <table border="0" cellspacing="0" cellpadding="5">
                  <tr>
                  <td>
                    <table border="0" bgcolor="#E1E1E1" cellspacing="1" cellpadding="0">
                      <tr>
                        <td width="100%">
                          <table cellSpacing="1" cellPadding="0" width="100%" bgColor="#d7d7d7" border="0">
                              <tr>
                                <td width="100%">
                                  <table cellSpacing="1" cellPadding="0" width="100%" bgColor="#b2b2b2" border="0">
                                      <tr>
                                        <td width="100%">
                                          <table cellSpacing="0" cellPadding="5" width="100%" border="0">
                                              <tr>
                                                <td width="100%" bgColor="#ffffff">
                                                  <table cellSpacing="0" border="0">
                                                      <tr>
                                                        <td width="100%" bgColor="#666666"><a href="Show_Flash.Asp?FID=<%=rs("FID")%>" Title="<%=rs("Name")%>"><img border="0" src="UploadPic/<%=rs("FPic")%>" width="120" height="90"></a></td>
                                                      </tr>
                                                  </table>
                                                </td>
                                              </tr>
                                          </table>
                                        </td>
                                      </tr>
                                  </table>
                                </td>
                              </tr>
                          </table>
                        </td>
                      </tr>
                    </table>
                  </td>
                  </tr>
                  <tr>
                  <td align="center"><a href="Show_Flash.Asp?FID=<%=rs("FID")%>"><%=left(rs("Name"),11)%></a></td>
                  </tr>
                </table>
              </td>
            </tr>
<%
rs.movenext
n=n+1
if n>=100 then exit do
loop
%>
          </table>
          </td>
        </tr>
      <tr>
        <td><img border="0" src="Image/Channel_DownB_570.gif"></td>
      </tr>
      <tr>
        <td height="10"></td>
      </tr>
     </table>
    </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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