flash_play.asp

俄罗斯方块源码 俄罗斯方块源码 俄罗斯方块源码

<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->

<%
dim id,rss,bigclassname,smallclassname,remark
id =request("id")
if not isinteger(id) then
  call mb("对不起，请指定要观看的动画！","index.asp",1)
end if


set rs=server.createobject("adodb.recordset")
sql="select * from flash where id="&id
rs.open sql,conn,1,3

if rs.bof and rs.eof then
  call mb("对不起，没有找到相关的Flash!","index.asp",1)
else
  rs("hits")=rs("hits")+1
  rs.update
end if

set rss=conn.execute("select B.bigclassname,S.smallclassname from bigclass B inner join smallclass S on S.bigclassid=B.bigclassid where S.smallclassid="&rs("smallclassid"))
if not(rss.bof and rss.eof) then
  bigclassname=rss(0)
  smallclassname=rss(1)
end if
set rss=nothing


dim url
if rs("folder")<>"" then 
 url=rs("folder")&"/"&rs("url")
else
 url=rs("url")
end if
%>
<script language=javascript>
<!--
function wish(id,flashname)
{
var flashid=id;
var fname=flashname;
window.open('submitwish.asp?id='+flashid+'&flashname='+fname,'dowish','top=0,left=0,width=280,height=500');
}
--></script>
<script language="javascript">
kstatus();
function kstatus(){
  self.status="闪耀吧动漫网欢迎您的访问,请记住我们的网址:http://www.flash18.com，如果您喜欢本站请将本站网址发给你QQ好友！";
  setTimeout("kstatus()",10000);
}
</script>

<Title><%=rs("flashname")%></title>
<!--#include file="top2.asp"-->

<TABLE width=770 height=490 border=0 align="center" cellPadding=0 
cellSpacing=0 bgcolor="#FFFFFF">
  <TR> 
    <TD height="5" colspan="2" align=middle vAlign=top><TABLE align=center 
      background="images/line01.gif" 
      border=0 cellPadding=0 cellSpacing=0 height=24 width="100%">
        <TR> 
          <TD height=21 width="65%">&nbsp;<IMG height=12 
            src="images/A3.gif" width=12> 当前位置：<A 
            href="index.asp" title="首页">闪耀吧动漫网</A> -&gt; <A 
            href="showsmall.asp?classid=<%=rs("bigclassid")%>" title="<%=bigclassname%>"><%=bigclassname%></A> -&gt; <A 
            href="showflash.asp?smallclassid=<%=rs("smallclassid")%>" title="<%=smallclassname%>"><%=smallclassname%></A> -&gt; <%=rs("flashname")%> </TD>
          <TD width="35%" height=21 align="center">&nbsp;</TD>
        </TR>
      </TABLE></TD>
  </TR>
  <TR> 
  </TR>
  <TR> 
    <%
  if rs("geshou")="" then 
  geshou="不详"
  else
  geshou="<a href=flash_search.asp?utype=geshou&keyword="&rs("geshou")&" title=查看"&rs("geshou")&"的其他作品 target=_blank>"&rs("geshou")&"</a>"
  end if
  %>
    <TD height="25" colspan="2" align=center>Flash名称：<%=rs("flashname")%>　歌手：<%=geshou%>　　发表日期：<%=formatdatetime(rs("dateandtime"),1)%>　　<a href="dovote.asp?id=<%=rs("id")%>" title="给该作品投下您的一票..">给该作品投一票（共<%=rs("votenum")%>票）</a>　　<a href="<%=url%>" title="全屏欣赏">全屏欣赏</a></TD>
  </TR>
  <TR> 
    <TD align=left vAlign=top> 
      <TABLE width="609" border=0 align="center" cellPadding=0 cellSpacing=0 borderColor=#000000>
        <TR> 
          <TD background="images/T_back.gif" width="17%"><IMG src="images/T_1.gif" width=90 height=24 border="0"></TD>
          <TD background="images/T_back.gif" width="79%"><B><%=rs("flashname")%></B></TD>
          <TD width="4%"><IMG height=24 src="images/T_2.gif" width=29></TD>
        </TR>
      </TABLE>
      <table width="600" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#cccccc">
        <tr> 
          <td bgcolor="#FFFFFF"> <OBJECT classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 
                  codeBase=http://active.macromedia.com/flash2/cabs/swflash.cab#version=4,0,0,0 
                  height=400 width=600>
              <PARAM NAME="movie" VALUE="<%=url%>">
              <PARAM NAME="quality" VALUE="high">
              <EMBED src="<%=url%>" loop=false menu=false quality=high 
                  WIDTH=600 height=400 TYPE="application/x-shockwave-flash" 
                  PLUGINSPAGE="http://www.macromedia.com/shockwave/download/../index.cgi?P1_Prod_Version=ShockwaveFlash"></EMBED> 
            </OBJECT></td>
        </tr>
      </table>
      <br> </TD>
    <TD width="150" align=center vAlign=middle> 
      <TABLE border=0 cellPadding=0 cellSpacing=0 width=133>
        <TBODY>
          <TR> 
            <TD><A href="http://www.caishow.com/ring_main.asp?f=11" 
                  target=_blank><IMG border=0 height=38 
                  src="/index3/title_ring2.gif" width=133></A></TD>
          </TR>
          <TR> 
            <TD valign="top"> 
              <TABLE bgColor=#e3e3e3 border=0 cellPadding=0 cellSpacing=1 
                  width="100%">
                <TBODY>
                  <TR> 
                    <TD align=center bgColor=#ffffff 
                        vAlign=top><iframe src="http://coo.caishow.com/cooperation/ringTop.asp?f=1000&order=new&listNum=15&color=black" height="360" width="120" MARGINWIDTH="0" MARGINHEIGHT="0" HSPACE="0" VSPACE="0" FRAMEBORDER="0" SCROLLING="no"></iframe></TD>
                  </TR>
                </TBODY>
              </TABLE>
            </TD>
          </TR>
        </TBODY>
      </TABLE> 
    </TD>
  </TR>
  <TR > 
    <TD height="2" colspan="2" align=middle vAlign=top background="images/bg_hline.gif"></TD>
  </TR>
  <TR> 
    <TD height="25" colspan="2" align=left><br> <table width="98%" border="0" align="center" cellpadding="3" cellspacing="1">
        <tr> 
          <td>Flash名称：<%=rs("flashname")%>　作者(上传者)：<a href="showuser.asp?username=<%=rs("username")%>" title="查看 <%=rs("username")%> 的详细信息..." target=_blank><%=rs("username")%></a>　文件大小： <%=rs("fsize")%> KB 　票数：<%=rs("votenum")%> 　点击：<%=rs("hits")%>　<font color="#FF0000">浏览Flash需要最新的</font> <a href="/flashplayer7installer.exe"><font color="#FF0000"> 
            Flash Player</font></a><br>
            <br>
            Flash简介： 
            <%
	  remark=rs("remark")
	  remark=replace(remark,chr(13),"<br>")
	  remark=replace(remark," ","&nbsp;")
	  response.write remark
	  %> <br> <br> <a href="showzp.asp?username=<%=rs("username")%>" target="_blank">查看作者的所有作品</a> 
            　<a href="showcomment.asp?id=<%=rs("id")%>&flashname=<%=rs("flashname")%>" title="查看作品所有评论..." target=_blank>查看该作品的所有评论(<%=rs("commentnum")%>)</a>　发送邮件给作者　　 
            <%if rs("username")="侠名" then%> <a href="guestbook.asp?action=add&g_topic=认领我的作品&g_content=认领我的作品：<%=rs("flashname")%>，ID号为：<%=rs("id")%>"><img src="images/rl.gif" alt="认领您的作品..." width="100" height="23" border="0" align="absmiddle"></a> 
            <%end if%>
            　<a href="#" onclick="javascript:window.open('submitwish.asp?id=<%=id%>&flashname=<%=rs("flashname")%>','dowish','top=0,left=0,width=280,height=420');"><img src="images/db.gif" alt="为好友送出我的祝福..." width="100" height="23" border="0" align="absmiddle"></a><br> 
          </td>
        </tr>
      </table>
      <br> </TD>
  </TR>
  <TR> 
    <TD height="2" colspan="2" align=middle vAlign=top background="images/bg_hline.gif"></TD>
  </TR>
  <TR> 
    <TD colspan="2" align=center vAlign=top> <form action="commentsave.asp" method="post" name="addcomment" target="_blank" id="addcomment">
        <br>
        <TABLE align=center border=0 borderColor=#000000 cellPadding=0 cellSpacing=0 width="558">
          <TR> 
            <TD background="images/T_back.gif" width="18%"><IMG src="images/T_1.gif" width=90 height=24 border="0"></TD>
            <TD 
          background="images/T_back.gif" 
          width="79%"><strong>发 表 评 论 </strong><font color="#FF0000">发表评论请注意词藻，评论仅代表网友的意见</font>！</TD>
            <TD width="3%"><IMG height=24 src="images/T_2.gif" width=29></TD>
          </TR>
        </TABLE>
        <table width="558" border="0" cellpadding="3" cellspacing="1" bgcolor="#cccccc">
          <tr bgcolor="#FFFFFF"> 
            <td width="119" height="23" align="right">您的大名：</td>
            <td width="470" height="23"> <input name="name" type="text" class="input" id="name" size="15">
              *　Email： 
              <input name="email" type="text" class="input" id="email" size="20"></td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td height="23" align="right">评论内容：</td>
            <td height="23"> <textarea name="comment" cols="45" rows="8" class="input" id="comment"></textarea>
              *小于120个汉字</td>
          </tr>
          <tr bgcolor="#FFFFFF"> 
            <td height="23" align="right">&nbsp;</td>
            <td height="23"> <input name="Submit" type="submit" class="button" value=" 发表评论 "> 
              <input name="id" type="hidden" id="id" value="<%=id%>"></td>
          </tr>
        </table>
      </form></TD>
  </TR>
</TABLE>
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" bgcolor="#FFFFFF"> <iframe src="http://c03.caishow.com/zhdm/zhgd760.asp?style=2&f=1000" height="135" width="770" marginwidth="0" marginheight="0" hspace="0" vspace="0" frameborder="0" scrolling="no"></iframe></td>
  </tr>
</table>
<%rs.close
set rs=nothing
'call closeconn()
%>
<!--#include file="bottom.asp"-->