<!-- #include file="include/con_flash.asp" -->
<%
dim id
id=trim(request.querystring("id"))
if not(isnumeric(id)) then
  call format_redirect("flash.asp")
end if
%>
<!-- #include file="include/jk_review.asp" -->
<!-- #include file="include/jk_emoney.asp" -->
<!-- #include file="include/jk_ubb.asp" -->
<%
dim username,name,remark,tim,counter,pic,tt,power,emoney
sql="select top 1 * from flash where hidden=1 and id="&id
set rs=joekoe_cms.exec(sql,1)
if rs.eof then
  rs.close
  call format_redirect("flash.asp")
end if
cid=rs("c_id")
sid=rs("s_id")
username=rs("username")
name=rs("name")
remark=rs("remark")
tim=rs("tim")
counter=rs("counter")
power=rs("power")
emoney=rs("emoney")
pic=rs("pic")
rs.close

tit="动画浏览"
cname=""
sname=""
if cint(cid)>0 then
  if cint(sid)>0 then
    sql="select top 1 jk_class.c_name,jk_sort.s_name from jk_sort inner join jk_class on jk_sort.c_id=jk_class.c_id where jk_sort.c_id="&cid&" and jk_sort.s_id="&sid
  else
    sql="select top 1 c_name from jk_class where c_id="&cid
  end if
  set rs=joekoe_cms.exec(sql,1)
 if not rs.eof then 
    cname=rs("c_name") 
    tit=tit&" - "&cname 
    if sid>0 then 
      sname=rs("s_name") 
      tit=topic 
    end if 
    tit=name 
  end if 
  rs.close 
end if 

page_power=power
call web_head(0,0,0,0,0)
call emoney_notes(power,emoney,n_sort,id,1,"flash_list.asp?c_id="&cid&"&s_id="&sid)
call flash_load(0,0,0)
call flash_sort(0)
call flash_left("hot",10,10,"热门动画")
call flash_left("good",10,10,"推荐动画")
'----------------------------左边 结束----------------------------
call web_center(0)
'----------------------------中间 开始----------------------------
tim=joekoe_cms.time_type(tim,1)
name=joekoe_cms.code_html(name,1,0)

dim id1,name1,id2,name2
id1=0
name1=""
id2=0
name2=""
sql="select top 1 id,name from flash where hidden=1 and id<"&id&" order by id desc"
set rs=joekoe_cms.exec(sql,1)
if not(rs.eof) then
  id1=rs(0)
  name1=rs(1)
end if
rs.close
sql="select top 1 id,name from flash where hidden=1 and id>"&id&" order by id"
set rs=joekoe_cms.exec(sql,1)
if not(rs.eof) then
  id2=rs(0)
  name2=rs(1)
end if
rs.close

'response.write vbcrlf&flash_view1(id,name,joekoe_cms.time_type(tim,5),comto,author)
%>
<table cellspacing=1 cellpadding=4 class=table>
<tr><td class=td0>&nbsp;<%response.write img_skin(web_img_m)&tit%></td></tr>
<tr><td class=bg_td align=center height=40><font class=blue size=3><b><%response.write joekoe_cms.code_html(name,1,0)%></b></font></td></tr>
<tr><td class=bg_td align=center>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width='500' height='400'>
<param name=movie value="<%response.write pic_url(pic,0)%>">
<param name=quality value=high>
<embed src="<%response.write pic_url(pic,0)%>" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width='500' height='400'></embed>
</object>
</td></tr>
<tr><td class=bg_td><%response.write img_skin(web_img_h)%>发布用户：<%response.write format_user_name(username,0,"")%>　<%response.write img_skin(web_img_h)%>发布时间：<%response.write joekoe_cms.time_type(tim,5)%>　<%response.write img_skin(web_img_h)%>浏览：<font class=red><%response.write counter%></font> 人次</td></tr>
<tr><td class=bg_td><%response.write img_skin(web_img_h)%>相关说明：　　　　<%response.write img_skin(web_img_h)%><a href='javascript:;' onclick="javascript:open_view('<%response.write pic_url(pic,0)%>',1);">新窗口中浏览</a>　　　<%response.write commend_friend(tit,name,"gallery_view.asp?id="&id)%></td></tr>
<tr><td class=bg_td align=center>
  <table border=0 cellspacing=0 cellpadding=2 width='98%' class=tf>
  <tr><td class=bw><%response.write code_jk(remark)%></td></tr>
  </table>
</td></tr>
<tr><td class=td0>&nbsp;<%response.write img_skin(web_img_m)%>相关评论</td></tr>
<tr><td class=bg_td align=center>
<%call review_type(n_sort,id,"gallery_view.asp?id="&id,1,username)%>
</td></tr>
</table>
<%
call joekoe_cms.exec("update flash set counter=counter+1 where id="&id,0)
'----------------------------中间 结束----------------------------
call flash_end()
call web_end(0,0)
%>