📄 gallery_view.asp
字号:
<!-- #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
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> <%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)%>发布用户:<%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> <%response.write img_skin(web_img_m)%>相关评论</td></tr>
<tr><td class=bg_td align=center>
<%response.write 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,5)
if instr(1,file_type,".")>0 then
file_type=right(file_type,len(file_type)-instr(1,file_type,"."))
else
file_type="rm"
end if
file_type=lcase(file_type)
if lcase(left(npic,3))="rm" then file_type="rm"
select case file_type
case "rmvb","rm","ram","avi","smi","rmvb"
%>
<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
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -