asp實(shí)現(xiàn)后臺(tái)添加wma視頻文件前臺(tái)顯示
更新時(shí)間：2012年12月10日 17:43:21 作者：
想用asp來實(shí)現(xiàn)后臺(tái)添加wma視頻文件，前臺(tái)顯示所添加的這個(gè)視頻文件,本文提供實(shí)現(xiàn)代碼
想用asp來實(shí)現(xiàn)后臺(tái)添加wma視頻文件，前臺(tái)顯示所添加的這個(gè)視頻文件。
可以實(shí)現(xiàn)的asp代碼如下：
<table border=1 cellPadding=4 cellSpacing=0 width=500 align=center>
<tr>
<td width="236" align=center class=tdc1></td>
</tr>
<%
lurl="phage1.wma"
%>
<tr>
<td valign=middle>
<%
select case Lcase(right(lurl,4))
case ".swf"
%>
<p 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=541 HEIGHT=374>
<PARAM NAME=movie VALUE=<%=lurl%>> <PARAM NAME=quality VALUE=high> <EMBED SRC=<%=lurl%> QUALITY=high PLUGINSPAGE=http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash TYPE=application/x-shockwave-flash WIDTH=541 HEIGHT=374></EMBED>
</OBJECT>
<%
CASE ".mpg"
%>
<p align=center>
<object align=middle classid=CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95 class=OBJECT id=MediaPlayer width=500 height=350 >
<param name=ShowStatusBar value=-1>
<param name=Filename value=<%=replace(lurl,chr(32),"%20",1)%>>
<embed type=application/x-oleobject codebase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701 flename=mp src=<%=replace(lurl,chr(32),"%20",1)%> width=500 height=100></embed>
</object>
<%
CASE ".mp3",".mid",".wma"
%>
<p align=center>
<object align=middle classid=CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95 class=OBJECT id=MediaPlayer width=500 height=91 >
<param name=ShowStatusBar value=-1>
<param name=Filename value=<%=replace(lurl,chr(32),"%20",1)%>>
<embed type=application/x-oleobject codebase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701 flename=mp src=<%=replace(lurl,chr(32),"%20",1)%> width=500 height=91></embed>
</object>
<%
case else
select case Lcase(right(lurl,3))
case ".rm"
%>
<p align=center>
<OBJECT classid=clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA class=OBJECT id=RAOCX width=500 height=350>
<PARAM NAME=SRC VALUE=<%=lurl%>><PARAM NAME=CONSOLE VALUE=Clip1>
<PARAM NAME=CONTROLS VALUE=imagewindow><PARAM NAME=AUTOSTART VALUE=true>
</OBJECT>
<br>
<OBJECT classid=CLSID:CFCDAA03-8BE4-11CF-B84B-0020AFBBCCFA height=32 id=video2 width=500>
<PARAM NAME=SRC VALUE=<%=lurl%>><PARAM NAME=AUTOSTART VALUE=-1>
<PARAM NAME=CONTROLS VALUE=controlpanel><PARAM NAME=CONSOLE VALUE=Clip1>
</OBJECT>
<%
case ".ra"
%>
<p align=center>
<OBJECT classid=CLSID:CFCDAA03-8BE4-11CF-B84B-0020AFBBCCFA height=32 id=video2 width=500>
<PARAM NAME=SRC VALUE=<%=lurl%>><PARAM NAME=AUTOSTART VALUE=-1>
<PARAM NAME=CONTROLS VALUE=controlpanel><PARAM NAME=CONSOLE VALUE=Clip1>
</OBJECT>
<%
case else
%>
<p align=center>
<embed name=player src=<%=lurl%> type=audio/x-pn-realaudio-plugin width=300 height=350 border=0 autostart=1></embed>
<%
end select
end select%>
</td>
</table>
可以實(shí)現(xiàn)的asp代碼如下：
復(fù)制代碼 代碼如下:
<table border=1 cellPadding=4 cellSpacing=0 width=500 align=center>
<tr>
<td width="236" align=center class=tdc1></td>
</tr>
<%
lurl="phage1.wma"
%>
<tr>
<td valign=middle>
<%
select case Lcase(right(lurl,4))
case ".swf"
%>
<p 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=541 HEIGHT=374>
<PARAM NAME=movie VALUE=<%=lurl%>> <PARAM NAME=quality VALUE=high> <EMBED SRC=<%=lurl%> QUALITY=high PLUGINSPAGE=http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash TYPE=application/x-shockwave-flash WIDTH=541 HEIGHT=374></EMBED>
</OBJECT>
<%
CASE ".mpg"
%>
<p align=center>
<object align=middle classid=CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95 class=OBJECT id=MediaPlayer width=500 height=350 >
<param name=ShowStatusBar value=-1>
<param name=Filename value=<%=replace(lurl,chr(32),"%20",1)%>>
<embed type=application/x-oleobject codebase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701 flename=mp src=<%=replace(lurl,chr(32),"%20",1)%> width=500 height=100></embed>
</object>
<%
CASE ".mp3",".mid",".wma"
%>
<p align=center>
<object align=middle classid=CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95 class=OBJECT id=MediaPlayer width=500 height=91 >
<param name=ShowStatusBar value=-1>
<param name=Filename value=<%=replace(lurl,chr(32),"%20",1)%>>
<embed type=application/x-oleobject codebase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701 flename=mp src=<%=replace(lurl,chr(32),"%20",1)%> width=500 height=91></embed>
</object>
<%
case else
select case Lcase(right(lurl,3))
case ".rm"
%>
<p align=center>
<OBJECT classid=clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA class=OBJECT id=RAOCX width=500 height=350>
<PARAM NAME=SRC VALUE=<%=lurl%>><PARAM NAME=CONSOLE VALUE=Clip1>
<PARAM NAME=CONTROLS VALUE=imagewindow><PARAM NAME=AUTOSTART VALUE=true>
</OBJECT>
<br>
<OBJECT classid=CLSID:CFCDAA03-8BE4-11CF-B84B-0020AFBBCCFA height=32 id=video2 width=500>
<PARAM NAME=SRC VALUE=<%=lurl%>><PARAM NAME=AUTOSTART VALUE=-1>
<PARAM NAME=CONTROLS VALUE=controlpanel><PARAM NAME=CONSOLE VALUE=Clip1>
</OBJECT>
<%
case ".ra"
%>
<p align=center>
<OBJECT classid=CLSID:CFCDAA03-8BE4-11CF-B84B-0020AFBBCCFA height=32 id=video2 width=500>
<PARAM NAME=SRC VALUE=<%=lurl%>><PARAM NAME=AUTOSTART VALUE=-1>
<PARAM NAME=CONTROLS VALUE=controlpanel><PARAM NAME=CONSOLE VALUE=Clip1>
</OBJECT>
<%
case else
%>
<p align=center>
<embed name=player src=<%=lurl%> type=audio/x-pn-realaudio-plugin width=300 height=350 border=0 autostart=1></embed>
<%
end select
end select%>
</td>
</table>
相關(guān)文章
關(guān)于asp+access的安全問題分析...2007-04-04
ASP的URLDecode函數(shù)URLEncode解碼函數(shù)
我們知道，ASP的Server對象有個(gè)URLEncode方法可以對地址進(jìn)行編碼，但卻沒有相應(yīng)的解碼函數(shù)，下邊的這個(gè)函數(shù)可以實(shí)現(xiàn)對URLEncode的解碼。2010-12-12
電影系統(tǒng)經(jīng)常用ASP偽參數(shù)，可以防范通過id采集數(shù)據(jù)。2008-01-01
用asp實(shí)現(xiàn)無組件生成驗(yàn)證碼的方法2種
用asp實(shí)現(xiàn)無組件生成驗(yàn)證碼的方法2種...2007-01-01
使用ASP控制指定站點(diǎn)解析腳本語言函數(shù)
使用ASP控制指定站點(diǎn)解析腳本語言函數(shù)...2007-01-01
一個(gè)能對訪問者進(jìn)行編號、記錄訪問次數(shù)、IP、時(shí)間的統(tǒng)計(jì)制作實(shí)例，需要的朋友可以參考下2015-09-09
下面的代碼以建議在一個(gè)頁面測試2008-04-04
.NET中的6種定時(shí)器的基本用法和特點(diǎn)
.NET中至少有6種定時(shí)器,每一種定時(shí)器都有它的用途和特點(diǎn),根據(jù)定時(shí)器的應(yīng)用場景,可以分為UI相關(guān)的定時(shí)器和UI無關(guān)的定時(shí)器,本文將簡單介紹這6種定時(shí)器的基本用法和特點(diǎn),感興趣的朋友一起看看吧2023-12-12
ASP+FSO生成的網(wǎng)頁文件默認(rèn)編碼格式以及轉(zhuǎn)換成UTF-8編碼方法
有一個(gè)客人的網(wǎng)站想做一個(gè)俄文版，前臺(tái)后臺(tái)，我統(tǒng)一用utf-8編碼，但通過數(shù)據(jù)庫生成的靜態(tài)俄文信息是亂碼。如果用GB2312顯示，通過數(shù)據(jù)庫生成的靜態(tài)俄文信息正確顯示， 但模板文件俄文是亂碼。2009-11-11
完成asp語言對XML文檔中指定節(jié)點(diǎn)文本的增加、刪除、修改、查看，需要的朋友可以參考下。2011-02-02