<!-- #include file="include/con_vouch.asp" -->
<!-- #include file="include/jk_ubb.asp" -->
<!-- #include file="include/jk_review.asp" -->
<!-- #include file="include/jk_emoney.asp" -->
<%
dim id,name,pic,remark,username,emoney,counter,tim,istop,view_true,v_width,v_height,vtit
id=trim(request.querystring("id"))
if not int_true(id) then
  call format_redirect("gallery.asp")
end if
sql="select top 1 name,types,pic,remark,username,power,emoney,counter,tim,istop from gallery where hidden=1 and id="&id
set rs=joekoe_cms.exec(sql,1)
if rs.eof then
  rs.close
  call format_redirect("gallery.asp")
end if
name=rs("name")
types=rs("types")
pic=rs("pic")
remark=rs("remark")
username=rs("username")
page_power=rs("power")
emoney=rs("emoney")
counter=rs("counter")
tim=rs("tim")
istop=rs("istop")
rs.close

v_width=500
v_height=400

select case types
case "flash"
  n_sort="flash"
  vtit="精彩Flash"
%>
<!-- #include file="style/data_sort_flash.asp" -->
<%
case "film"
  n_sort="film"
  vtit="精彩视频"
%>
<!-- #include file="style/data_sort_film.asp" -->
<%
case else
  n_sort="gall"
  types="paste"
  vtit="精彩照片"
%>
<!-- #include file="style/data_sort_gall.asp" -->
<%
end select
tit="浏览"&vtit&" - "&name 

call web_head(0,0,0,0,0)
call emoney_notes(page_power,emoney,n_sort,id,1,"gallery.asp")
call vouch_load(1,0,0)
'----------------------------左边 开始----------------------------
call vouch_left_sort(vtit,0)
call vouch_left()
'----------------------------左边 结束----------------------------
call web_center(0)
'----------------------------中间 开始----------------------------
%>
<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>
<%
  select case types
  case "flash"
%>
<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='<%response.write v_width%>' height='<%response.write v_height%>'>
<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='<%response.write v_width%>' height='<%response.write v_height%>'></embed>
</object>
<%
  case "film"
    call vouch_film_view(pic,v_width,v_height)
  case else
%>
<a href='javascript:;' onclick="javascript:open_view('<%response.write pic_url(pic,0)%>',1);"><img src='<%response.write pic_url(pic,0)%>' border=0 onload="javascript:if(this.width><%response.write v_width%>)this.width=<%response.write v_width%>;" align=center alt='在新窗口中浏览此图片'></a>
<% end select %>
</td></tr>

<tr><td class=bg_td><%response.write img_skin(web_img_h)%>专家介绍：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;　&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;　&nbsp;&nbsp;&nbsp;&nbsp;　　　&nbsp;&nbsp;&nbsp;&nbsp;　<b>　[<a href='javascript:;' onclick="javascript:open_view('<%response.write pic_url(pic,0)%>',1);">新窗口中浏览照片</a>]</b></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=bg_td><%response.write img_skin(web_img_h)%>发布时间：<%response.write joekoe_cms.time_type(tim,5)%>　<%response.write img_skin(web_img_h)%>发布人：<%response.write format_user_name(username,0,"")%>　<%response.write img_skin(web_img_h)%>浏览：<font class=red><%response.write counter%></font> 人次</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>
<%
response.write ukong
call joekoe_cms.exec("update gallery set counter=counter+1 where id="&id,0)
'----------------------------中间 结束----------------------------
call vouch_end()
call web_end(0,0)

sub vouch_film_view(npic,nwidth,nheight)
  dim file_type
  file_type=right(npic,4)
  if instr(1,file_type,".")>0 then
    file_type=right(file_type,len(file_type)-instr(1,file_type,"."))
  else
    file_type="mms"
  end if
  file_type=lcase(file_type)
  if lcase(left(npic,3))="mms" then file_type="mms"
  select case file_type
  case "rm","ram","rmvb","avi"
%>
<object id="video2" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" width=530 height=400>
  <param name="_ExtentX" value="11906">
  <param name="_ExtentY" value="8996">
  <param name="AUTOSTART" value="-1">
  <param name="SHUFFLE" value="0">
  <param name="PREFETCH" value="0">
  <param name="NOLABELS" value="0">
  <param name="SRC" value="<%response.write joekoe_cms.url_true(joekoe_cms.web_upload,npic)%>">
  <param name="CONTROLS" value="ImageWindow">
  <param name="CONSOLE" value="Clip1">
  <param name="LOOP" value="0">
  <param name="NUMLOOP" value="0">
  <param name="CENTER" value="0">
  <param name="MAINTAINASPECT" value="0">
  <param name="BACKGROUNDCOLOR" value="#000000">
  <embed src="4.rpm" type="audio/x-pn-realaudio-plugin" console="Clip1" controls="ImageWindow" width=530 height=400 autostart="false"></embed> 
</object>
<object id="video1" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" width=530 height=60>
  <param name="_ExtentX" value="11906">
  <param name="_ExtentY" value="1588">
  <param name="AUTOSTART" value="-1">
  <param name="SHUFFLE" value="0">
  <param name="PREFETCH" value="0">
  <param name="NOLABELS" value="0">
  <param name="CONTROLS" value="ControlPanel,StatusBar">
  <param name="CONSOLE" value="Clip1">
  <param name="LOOP" value="0">
  <param name="NUMLOOP" value="0">
  <param name="CENTER" value="0">
  <param name="MAINTAINASPECT" value="0">
  <param name="BACKGROUNDCOLOR" value="#000000">
  <embed type="audio/x-pn-realaudio-plugin" console="Clip1" controls="ControlPanel,StatusBar" width=530 height=60 autostart="false"></embed>
</object>
<% case "asf","wmv","mpg","mpeg","wma","asx","mms" %>
<object id="Joekoe.com.mPlayer" width=544 height=440 classid="CLSID:6BF52A52-394A-11D3-B153-00C04F79FAA6" type="application/x-oleobject" standby="正在载入 Windows Media Player 播放流 ...">
  <param name="URL" value="<%response.write joekoe_cms.url_true(joekoe_cms.web_upload,npic)%>">
  <param name="Album" value="Joekoe.com"/>
  <param name="rate" value="1">
  <param name="balance" value="0">
  <param name="currentPosition" value="0">
  <param name="defaultFrame" value="">
  <param name="playCount" value="100">
  <param name="autoStart" value="-1">
  <param name="currentMarker" value="0">
  <param name="invokeURLs" value="-1">
  <param name="baseURL" value="">
  <param name="volume" value="100">
  <param name="mute" value="0">
  <param name="uiMode" value="full">
  <param name="stretchToFit" value="0">
  <param name="windowlessVideo" value="0">
  <param name="enabled" value="-1">
  <param name="enableContextMenu" value="0">
  <param name="fullScreen" value="0">
  <param name="SAMIStyle" value="">
  <param name="SAMILang" value="">
  <param name="SAMIFilename" value="">
  <param name="captioningID" value="">
</object>
<%
  end select
end sub
%>