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

📄 index.asp

📁 俄罗斯方块源码 俄罗斯方块源码 俄罗斯方块源码
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<title>FLash动画,FLash动画试听,Flash在线试听,flash动漫,Flash下载,Flash游戏,Flash音乐 尽在『闪耀吧动漫网』</title>
<meta name="keywords" content="Flash,Flash作品,Flash游戏,Flashmtv,Flash设计,闪客,闪客论坛,闪客俱乐部,Flash在线收听, ">
<meta NAME="description" CONTENT="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
<META  name="searchtitle" content="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏,搞笑flash,Flash音乐,Flash影片">
<meta name="Abstract" content="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏,搞笑flash,Flash音乐,Flash影片">
<meta name="Classification" content="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏,搞笑flash,Flash音乐,Flash影片">

<script language="javascript">
kstatus();
function kstatus(){
  self.status="闪耀吧动漫网欢迎您的访问,请记住我们的网址:www.flash18.com,如果您喜欢本站请将本站网址发给你QQ好友!";
  setTimeout("kstatus()",10000);
}
</script>
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body>
<!--#include file="top.asp"-->
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
  <tr> 
    <td width="95" valign="top" background="index3/flash_bg4.gif" bgcolor="#F7F7F7" class="bg"> 
      <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
        <tr>
          <td>
            <!--#include file="left2.asp"-->
          </td>
        </tr>
      </table> 
    </td>
    <td width="576" valign="top" bgcolor="#FFFFFF"> <table width="100%" border="0" cellspacing="0" cellpadding="0" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
        <tr> 
          <td><img src="index3/flash_tuijian.gif" width="550" height="45" border="0" usemap="#Map" alt="Flash在线试听 |Flash动画|Flash MTV|flash动漫|Flash下载|Flash游戏"></td>
        </tr>
        <tr> 
          <td><table width="94%" border="0" cellspacing="0" cellpadding="0" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
              <tr> 
                <%
				dim goodrs,goodsql
				set goodrs=server.createobject("adodb.recordset")
				goodsql="select top 4 * from flash where isgood=true and ispassed=true order by dateandtime desc"
				goodrs.open goodsql,conn,1,1
				if goodrs.eof then
				response.write "暂无推荐作品!" 
				else
				nn=0
				do while not goodrs.eof and nn<4
				%>
                <td align="center" width="140"> <table border="0" cellpadding="0" cellspacing="0" width="120" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
                    <tr> 
                      <%
					dim picbg3
					if goodrs("picurl")="" then
					picbg3="smallpic/no.jpg"
					else
					picbg3=goodrs("picurl")
					end if
					%>
                      <td background="<%=picbg3%>" class="bg2"><a href="flash_play.asp?id=<%=goodrs("id")%>" target="_blank" title="观看动画"><img name="picbg_r1_c1" src="index3/picbg/picbg_r1_c1.gif" width="120" height="85" border="0" alt=""></a></td>
                    </tr>
                    <tr> 
                      <td height="30" align="center" background="index3/picbg/picbg_r2_c1.gif"> 
                        <%
					  if len(goodrs("flashname"))>5 then
					  response.write "<a href=flash_play.asp?id="&goodrs("id")&" target=_blank title=观看动画>"&left(goodrs("flashname"),4)&"…"&"</a>"
					  else
					  response.write "<a href=flash_play.asp?id="&goodrs("id")&" target=_blank title=观看动画>"&goodrs("flashname")&"</a>"
					  end if 
					  %>
                      </td>
                    </tr>
                  </table></td>
                <%
				  goodrs.movenext
				  nn=nn+1
				  loop
				  end if 
				  goodrs.close
				  %>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td><img src="index3/flash_remen.gif" width="550" height="45" border="0" usemap="#Map2"  alt="Flash在线试听 |Flash动画|Flash MTV|flash动漫|Flash下载|Flash游戏"></td>
        </tr>
        <tr> 
          <td> <table width="94%" border="0" cellspacing="0" cellpadding="0" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
              <tr> 
                <%
				dim remenrs,remensql
				set remenrs=server.createobject("adodb.recordset")
				remensql="select top 4 * from flash where ishot=true and ispassed=true order by dateandtime desc"
				remenrs.open remensql,conn,1,1
				if remenrs.eof then
				response.write "暂无热门作品!" 
				else
				i=0
				do while not remenrs.eof and i<4
				%>
                <td align="center" width="140"><table border="0" cellpadding="0" cellspacing="0" width="120" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
                    <tr> 
                      <%
					dim picbg2
					if remenrs("picurl")="" then
					picbg2="smallpic/no.jpg"
					else
					picbg2=remenrs("picurl")
					end if
					%>
                      <td background="<%=picbg2%>" class="bg2"><a href=flash_play.asp?id=<%=remenrs("id")%> target=_blank title=观看动画><img name="picbg_r1_c1" src="index3/picbg/picbg_r1_c1.gif" width="120" height="85" border="0" alt=""></a></td>
                    </tr>
                    <tr> 
                      <td height="30" align="center" background="index3/picbg/picbg_r2_c1.gif"> 
                        <%
					  if len(remenrs("flashname"))>5 then
					  response.write "<a href=flash_play.asp?id="&remenrs("id")&" target=_blank title=观看动画>"&left(remenrs("flashname"),4)&"…"&"</a>"
					  else
					  response.write "<a href=flash_play.asp?id="&remenrs("id")&" target=_blank title=观看动画>"&remenrs("flashname")&"</a>"
					  end if 
					  %>
                      </td>
                    </tr>
                  </table></td>
                <%
				  remenrs.movenext
				  i=i+1
				  loop
				  end if 
				  remenrs.close
				  %>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td><img src="index3/flash_new.gif" width="550" height="45" border="0" usemap="#Map3"  alt="Flash在线试听 |Flash动画|Flash MTV|flash动漫|Flash下载|Flash游戏"></td>
        </tr>
        <tr> 
          <td valign="top"> <!--#include file="feilei.asp"--> </td>
        </tr>
        <tr> 
          <td style="padding-left:3px"> 
            <TABLE border=0 borderColor=#000000 cellPadding=0 cellSpacing=0 width="100%" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
              <TR> 
                <TD>&nbsp;</TD>
              </TR>
              <TR> 
                <TD><img src="index3/flash_avi.gif" width="550" height="45"  alt="Flash在线试听 |Flash动画|Flash MTV|flash动漫|Flash下载|Flash游戏"></TD>
              </TR>
              <TR> 
                <TD> 
                  <%
				set avirs=server.CreateObject("adodb.recordset")
				avisql="select * from smallclass where bigclassid=22"
				avirs.open avisql,conn,1,1
				%>
                  <table width="94%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#CCCCCC" summary="Flash在线试听,Flash动画,Flash MTV,flash动漫,Flash下载,Flash游戏">
                    <%
					do while not avirs.eof
					%>
                    <tr> 
                      <%

⌨️ 快捷键说明

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