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

📄 复件 (3) index_mb.asp

📁 这是一个最常用的flash程序
💻 ASP
📖 第 1 页 / 共 3 页
字号:
                      </tr>
                      <tr valign="top">
                        <td colspan="5"><div align="center">  </div>                          <div align="center">  </div>                          <div align="center">  </div>                          <div align="center">  </div>                          <div align="center"><IMG height=1 
            src="indeximg/fix.gif" 
width="100%"> </div></td>
                        </tr>
                      <tr>
                        <td height="20"><div align="center"><a href="flash/7415.htm" target="_blank">阿呆冒险记</a></div></td>
                        <td><div align="center"><a href="flash/7450.htm" target="_blank">能量战士</a></div></td>
                        <td><div align="center"><a href="flash/2243.htm" target="_blank">上古神器</a></div></td>
                        <td><div align="center"><a href="flash/7440.htm" target="_blank">机器人大逃亡</a></div></td>
                        <td><div align="center"><a href="flash/5827.htm" target="_blank">美眉拉力</a></div></td>
                      </tr>
                      <tr>
                        <td height="20"><div align="center"> <a href="flash/766.htm" target="_blank">记忆力测试2000 </a> </div></td>
                        <td><div align="center"> <a href="flash/7329.htm" target="_blank">武林外传修正版 </a> </div></td>
                        <td><div align="center"> <a href="flash/7445.htm" target="_blank">可怜的小金鱼</a></div></td>
                        <td><div align="center"><a href="flash/7218.htm" target="_blank">解密丛林</a></div></td>
                        <td><div align="center"> <a href="flash/4981.htm" target="_blank">冒险岛</a></div></td>
                      </tr>
                      <tr>
                        <td height="20"><div align="center"> <a href="flash/3767.htm" target="_blank">争夺男友</a></div></td>
                        <td><div align="center"> <a href="flash/4372.htm" target="_blank">海底冒险</a></div></td>
                        <td><div align="center"> <a href="flash/4984.htm" target="_blank">上古神器2完美版 </a><br>
</div></td>
                        <td><div align="center"> <a href="flash/4980.htm" target="_blank">魂斗罗1号修正版 </a><br>
</div></td>
                        <td><div align="center"> <a href="flash/2583.htm" target="_blank">我要上厕所</a></div></td>
                      </tr>
                      <tr>
                        <td height="20"><div align="center"> <a href="flash/4553.htm" target="_blank">迷你泡泡堂2 </a> </div></td>
                        <td><div align="center"> <a href="flash/4986.htm" target="_blank">超级空中霸王 </a> </div></td>
                        <td><div align="center"> <a href="flash/3049.htm" target="_blank">小猴跳墩 </a><br>
</div></td>
                        <td><div align="center"> <a href="flash/7472.htm" target="_blank">天使任务</a></div></td>
                        <td><div align="center"> <a href="flash/4999.htm" target="_blank">拳皇2000</a></div></td>
                      </tr>
                      <tr>
                        <td height="20"><div align="center"> <a href="flash/7434.htm" target="_blank">疯狂的兔子 </a> </div></td>
                        <td><div align="center"> <a href="flash/7416.htm" target="_blank">埃及大冒险 </a> </div></td>
                        <td><div align="center"> <a href="flash/4983.htm" target="_blank">哈里波特与迷宫 </a> </div></td>
                        <td><div align="center"> <a href="flash/1298.htm" target="_blank">松鼠推箱子</a></div></td>
                        <td><div align="center"> <a href="flash/4246.htm" target="_blank">男女朋友化妆</a><br>
</div></td>
                      </tr>
                      <tr>
                        <td height="20"><div align="center"> <a href="flash/1682.htm" target="_blank">乡村公路汽车赛 </a> </div></td>
                        <td><div align="center"> <a href="flash/4049.htm" target="_blank">脑筋急转弯2 </a> </div></td>
                        <td><div align="center"> <a href="flash/3535.htm" target="_blank">街头争霸 </a><br>
</div></td>
                        <td><div align="center"> <a href="flash/7476.htm" target="_blank">挖矿工人 </a> </div></td>
                        <td><div align="center"> <a href="flash/6262.htm" target="_blank">靓妆少女 </a> </div></td>
                      </tr>
                      <tr>
                        <td height="20"><div align="center"> <a href="flash/3598.htm" target="_blank">3d打砖块</a></div></td>
                        <td><div align="center"> <a href="flash/6991.htm" target="_blank">天使超市</a></div></td>
                        <td><div align="center"> <a href="flash/7435.htm" target="_blank">疯狂网球</a></div></td>
                        <td><div align="center"> <a href="flash/6757.htm" target="_blank">智斗小精灵</a></div></td>
                        <td><div align="center"> <a href="flash/6614.htm" target="_blank">上古神器3</a></div></td>
                      </tr>
                      <tr>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                      </tr>
                      <tr>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                      </tr>
                      <tr>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                        <td><div align="center"></div></td>
                      </tr>
                    </table>
                  </div></td>
                </tr>
              </table>                
                <TABLE cellSpacing=0 cellPadding=0 width=480 border=0>
                  <TBODY>
                    <TR> 
                      <TD width=7><IMG height=19 
                  src="indeximg/G1.gif" width=7></TD>
                      <TD vAlign=bottom align=middle width=175 bgColor=#ff9000><FONT 
                  color=#ffffff size=2><STRONG> 手 机 游 戏</STRONG></FONT></TD>
                      <TD width=17><IMG height=19 
                  src="indeximg/G2.gif" width=7></TD>
                      <TD width=281> <DIV align=right></DIV></TD>
                    </TR>
                    <TR bgColor=#ff9000> 
                      <TD colSpan=4 height=1></TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <table width="480" height="260" border="0" cellpadding="0" cellspacing="0">
                  <tr>
                    <td><IFRAME id=UserLogin src="http://www.130xyx.com/gg/480-200.htm" frameBorder=0 width=480 scrolling=no height=260></IFRAME>
                    &nbsp;</td>
                  </tr>
                </table>                
              <IMG height=19 
            src="indeximg/ti.gif" 
        width=140></TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=1 cellPadding=0 width="100%" bgColor=#ff9000 
        border=0>
          <TBODY>
            <TR> 
              <TD height=2></TD>
            </TR>
            <TR> 
              <TD vAlign=top bgColor=#ffffff> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD align=middle width="11%" bgColor=#f7f3f7 height=22><IMG 
                  height=10 src="indeximg/iconb.gif" 
                  width=10></TD>
                      <TD width="89%" bgColor=#f7f3f7>本站共有小游戏 <FONT 
                  color=#ff4e00>48881</FONT>个</TD>
                    </TR>
                    <TR> 
                      <TD bgColor=#cecfce colSpan=2 height=1></TD>
                    </TR>
                  </TBODY>
                </TABLE>
                <table cellSpacing="1" cellPadding="5" width="99%" align="left" bgColor="#FFFFFF" border="0">

                  <%
set rs=server.CreateObject("ADODB.RecordSet")
set rs_list=server.CreateObject("ADODB.RecordSet")
rs.open "select * from class where classid='0'",conn,1,1
if NOT rs.EOF then
do while NOT rs.EOF
jjj=0
c=c+1
if c=2 then
cc="#ffffff"
c=0
else
cc="#ffffff"
end if
%>
                  <tr> 
                    <td width="17%" bgcolor="#DAF5FE" align="center"><a href="class/<%=rs("id")%>_1.htm"><%=rs("name")%></a></td>
                    <td width="85%" bgcolor="#DAF5FE"> <table border="0" cellpadding="2" cellspacing="1" style="border-collapse: collapse" width="100%" class="p1">
                        <%
                           rs_list.open "select * from class where classid ='"&rs("id")&"' order by id asc",conn,1,1
                           if NOT rs_list.EOF then
                           %>
                        <tr> 
                          <%
                           do while not rs_list.eof
                           i=1
                           Do While i<=5
                           %>
                          <td height="25" width="20%" bgcolor="<%=cc%>" align="center"><a href="class/<%=rs_list("id")%>_1.htm"><%=rs_list("name")%></a></td>
                          <%
                           i=i+1
                           rs_list.MoveNext
                           if rs_list.eof then
                           exit do
                           end if
                           loop
                           %>
                          <%for l=0 to 5-i%>
                          <td width="20%" bgcolor="<%=cc%>" align="center"> </td>
                          <%next%>
                        </tr>
                        <%
                           loop
                           end if
                           rs_list.close
                           %>
                      </table></td>
                  </tr>
                  <%
rs.MoveNext
loop
end if
rs.close
set rs=nothing
set rs_list=nothing%>
                </table></TD>
            </TR>
          </TBODY>
        </TABLE></TD>
      <TD vAlign=top width=298> <TABLE cellSpacing=0 cellPadding=0 width="95%" align=center border=0>
          <TBODY>
            <TR> 
              <TD colSpan=3 height=22><IMG height=22 
            src="indeximg/TI2.gif" 
        width=267></TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="95%" align=center border=0>
          <TBODY>
            <TR> 
              <TD bgColor=#ffffff colSpan=3 height=40> <TABLE cellSpacing=0 cellPadding=0 width="95%" align=center 
border=0>
                  <TBODY>
                    <TR align=middle> 
                      <TD width="33%" > <TABLE cellSpacing=0 cellPadding=0 width="95%" border=0>
                          <TBODY>
                            <TR> 
                              <TD align=middle> 
                                <%
i=0
Set Rs=Server.Createobject("Adodb.Recordset")
Sql="Select * From flash where classid='10' order by hits desc"
Rs.open Sql,Conn,1,1
Do While not Rs.Eof
i=i+1
%>
                                <table width="87" border="0" align="center" cellpadding="0" cellspacing="0" class="table3">
                                  <tr> 
                                    <td valign="middle"> <div align="center"> 
                                        <a href="flash/<%=rs("id")%>.htm" target=_blank><img border=0 src="<%=replace(rs("pic"),"../flashpic","flashpic")%>" width="75" height="53"></a> 
                                       
                                        <table width="72%" border="0" cellspacing="0" cellpadding="0">
                                          <tr> 
                                            <td width="119" height="18"> <div align="center"><a href="flash/<%=rs("id")%>.htm" target=_blank><%=left(rs("flashname"),3)%></a></div></td>
                                          </tr>
                                        </table>
                                      </div></td>
                                  </tr>
                                </table>
                                <%

if i>=1 then exit do
Rs.Movenext
Loop
Rs.Close
Set Rs=nothing
%>
                              </TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                      <TD width="33%"> <TABLE cellSpacing=0 cellPadding=0 width="95%" border=0>
                          <TBODY>
                            <TR> 
                              <TD height="107" align=middle> 
                                <%
i=0
Set Rs=Server.Createobject("Adodb.Recordset")
Sql="Select * From flash where classid='11' order by hits desc"
Rs.open Sql,Conn,1,1
Do While not Rs.Eof
i=i+1
%>
                                <table width="87" border="0" align="center" cellpadding="0" cellspacing="0" class="table3">
                                  <tr> 
                                    <td valign="middle"> <div align="center"> 
                                        <a href="flash/<%=rs("id")%>.htm" target=_blank><img border=0 src="<%=replace(rs("pic"),"../flashpic","flashpic")%>" width="75" height="53"></a> 
                                        <table width="72%" border="0" cellspacing="0" cellpadding="0">
                                          <tr> 
                                            <td width="119" height="18"> <div align="center"><a href="flash/<%=rs("id")%>.htm" target=_blank><%=left(rs("flashname"),3)%></a></div></td>
                                          </tr>
                                        </table>
                                      </div></td>
                                  </tr>
                                </table>
                                <%

if i>=1 then exit do
Rs.Movenext
Loop
Rs.Close
Set Rs=nothing
%>
                              </TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                      <TD width="33%"> <TABLE cellSpacing=0 cellPadding=0 width="95%" border=0>
                          <TBODY>
                            <TR> 
                              <TD height="107" align=middle> 
                                <%
i=0
Set Rs=Server.Createobject("Adodb.Recordset")
Sql="Select * From flash where classid='12' order by hits desc"
Rs.open Sql,Conn,1,1
Do While not Rs.Eof

⌨️ 快捷键说明

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