主题:  做在线影视系统的一点心得!

ziriyan

职务:普通成员
等级:2
金币:1.0
发贴:303
注册:2002/1/28 15:58:03
#12003/3/4 7:46:49
www.surfvans.com/movie

这是我用UD加少部分手写完成的一个在线影视播放系统,后台我简单将一下,我考虑到各个影片的集数很不固定,我就用;把地址间隔开存入到一个字段里面。好了,我现在要讲的重点是首页根据不同的文件后缀调用不同的播放器播放影片,比如.rm就调用realplayer,.asf等就调用media player进行播放,这里我主要用到了两个函数:Right(string, length)和Split (S[,d]) ,请看我主要部分的源文件:
<%
strTest = Recordset1.Fields.Item("dizhi1").value '把影片URL赋给strTest
session("url")=Right(strTest, 3) '保存strTest的最右边3个字符到session("url")
myurl=split(strTest,";",-1,1) '分离strTest中的地址,然后赋给myurl
%>
<%
if session("url")=".rm" then
%>
'realplayer播放器代码
<%else %>
'media player播放器代码
<%end if %>

另外首页播放器中要调用的影片地址也说一下吧,分离出来的地址有好几个,我怎样让它播放第一个地址呢?呵呵,用<%=myurl(0)%>就OK啦~~~~

这是我在制作当中的一点心得,希望对大家有所帮助~~



5D荣誉斑竹

职务:普通成员
等级:2
金币:10.0
发贴:710
注册:2001/10/24 18:34:42
#22003/3/4 10:08:00
不错!希望大家也都把自己的心得帖一帖:)