ASP生成动态SMIL文件
smil 文件 是调用Realone播放器 来播放文件的..
首先本程序思路是,通过ASP动态连接数据库生成SMIL文件来播放视频文件.
SQL数据库
首先建立数据库: movie 表:movietalbe 表中有 ID字段 类型为 int 自动增加 种子为:1 moviename字段 为char类型
存放电影名字 这里不做多讲了...............
直切重点,通过一个页面的连接来传递URL参数id id为数据库中的值
以下是生成SMIL文件的ASP文件
<%
Dim id
id = QueryString("id")
Set MyFileObject = server.createobject("Scripting.FileSystemObject")
set MytestFile= MyFileObject.CreateTeXtFile("物理路径/名字.SMIL") '建立SMIL文件
'下面为写SMIL文件(SMIL文件跟HTML有点相识,这里不多做介绍了)
MytestFile.WriteLine("<smil>")
MytestFile.WriteLine("<head>")
MytestFile.WriteLine("<layout>")
MytestFile.WriteLine("<root-layout width="&Chr(34)&"400"&Chr(34)&" height="&Chr(34)"300"&Chr(34)&"/>")
MytestFile.WriteLine("</layout>")
MytestFile.WriteLine("</head>")
MytestFile.WriteLine("<body>")
MytestFile.WriteLine("<seq>")
MytestFile.WriteLine("<img dur="&Chr(34)&"5s"&Chr(34)&" src="&Chr(34)id&".jpg"&Chr(34)&" />")
MytestFile.WriteLine("</seq>")
MytestFile.WriteLine("</body>")
MytestFile.WriteLine("</smil>")
%>
谢谢! ...............
