ASP.NET+ACCES视频点播系统设计(源代码+论文)
收藏
资源目录
压缩包内文档预览：(预览前20页/共33页)
编号：148047984
类型：共享资源
大小：738.06KB
格式：RAR
上传时间：2021-10-08
上传人：好资料QQ****51605
认证信息
个人认证
孙**（实名认证）
江苏
IP属地：江苏
20
积分
- 关 键 词：
-
ASP
NET
ACCES
视频点播
系统
设计
源代码
论文
- 资源描述：
-
ASP.NET+ACCES视频点播系统设计(源代码+论文),ASP,NET,ACCES,视频点播,系统,设计,源代码,论文
- 内容简介：
-
南 京 师 范 大 学毕 业 设 计（论 文）（2005届）题 目： 在线视频点播系统 学 院： 数学与计算机科学学院 专 业： 计算机科学与技术（师范） 姓 名： 郝良战 学 号： 06010833 指导教师： 吴强 南京师范大学教务处 制摘要 目前，网络的发展日新月异，尤其是许多的校园网，小区宽带网、企业或者政府机关内部网的建设已经可以满足人们对带宽的需求。于是人们不再满足于单调的文字或者图象，而希望能在网上传输视频。本论文介绍的在线宽带点播系统，属于在线看视频类网站。管理员可以通过系统为用户提供在线收看视频的服务；用户可以通过注册帐号、登陆后便可以在线收看视频。关键词：视频点播、数据库、模块化、信息显示Abstract Currently, the shape of the network change with each passing day, particularly many campus toils, small zone broad - bond electrical noise toil, business or the government agency construction of the inner toil has already can satisfy the peoples demand to the belt width.Hereupon people no longer the character of the contented with monotone or portrait, but hope to deliver the video on the toil.The on-line broad - bond electrical noise dot that this thesis recommend sows the system, pertaining the on line to look the video website.The intendant can pass the system to tender the service that the on line watches the video for the consumer;After consumer can pass to reg. the account number, landing can watch the video with the on line then.Keyword: VideoonDemand,Database, Modularization, Information Show 第一章 视频点播概述41.1 设计思想41.2 系统前景41.3 简介51.4 ACCESS简介6第二章 视频点播系统介绍与技术介绍72.1网站结构设计72.1.1 目标设计72.1.2 系统功能分析设计82.2 数据库结构设计82.2.1 数据库需求分析92.2.2 数据库逻辑设计92.3 会员管理模块102.3.1 userreg.aspx102.3.2 用户登录132.4 视频信息显示模块142.4.1 网站主页default.aspx152.4.2 视频详细信息显示List.aspx172.4.3 类别视频显示dongzuo.aspx192.4.4 Mediaplayer视频播放窗口playwin.aspx202.4.5 Realplayer视频播放窗口playrm.aspx232.5 视频信息搜索模块232.5.1 default.aspx242.5.2 搜索页面search.aspx242.6 视频信息管理模块（后台管理模块）252.6.1 admin.aspx262.6.2 manage.aspx262.6.3 freeadd.aspx272.6.4 adminedit.aspx29设计心得31答谢32参考资料32第一章 视频点播概述1.1 设计思想设计方法采用模块划分、面向对象的设计思想，主要划分为以下几个模块：视频窗口模块、界面设计模块、实现搜索/点击排行等功能模块、数据库模块、后台管理模块，本人主要完成前三个模块的设计。收看视频审查有效性用户注册用户 用户信息 无效密码 有效 用户名 注册成功 用户名密码 用户信息表 视频信息表 系统数据流图开发步骤：首先进行需求分析，对系统进行整体设计对系统进行详细设计对软件的功能及编码进行调试软件维护阶段功能方面：用户进入主页后可以利用搜索引擎输入电影名字或者演员名进行电影搜索，如果用户想要获得一定的权限必须先进行注册、登录。能够对自己的信息进行修改（包括，密码、emial等）在页面的一侧可以浏览电影的最新更新情况和点击排行榜在点播模块中主要是利用Mediaplay与Realplayer的嵌入实现播放的功能，由于视频文件格式不同要求必须两种播放器都得用，所实现的视频不仅包括对由后台管理系统上传的电影文件进行播放，还包括对一些著名的电视台进行连接实现在线实时收看功能。后台管理方面包括实现首先实现对数据库的连接，通过编程实现页面能够读取access数据库的内容（包括电影名称、影视简介、连接海报图片的路径等）并显示在页面一定的位置。除此之外，还要实现通过管理员帐户，可以进在本地或者远程地对影片进行在线上传、删除、填写影片简介。数据库的建立：首先分为3个数据表，包括管理员信息表（含用户名、密码）、用户信息表（含用户名、密码、email等）、影片信息表（含影片路径、影视简介、海报路径、发表时间）。根据要实现的功能，制定一系列的方案，设计实现系统的逻辑结构，功能框架，以及数据库结构，用ASP.NET和ACCESS来实现视频窗口与数据库的连接，实现视频数据的传输功能1.2 系统前景近年来，视频点播VOD（VideoonDemand）的名字在媒体上出现得越来越多。VOD技术使人们可以根据自己的兴趣，不用借助录像机、影碟机、有线电视而在电脑或电视上自由地点播节目库中的视频节目和信息，是可以对视频节目内容进行自由选择的交互式系统。 VOD的本质是信息的使用者根据自己的需求主动获得多媒体信息，它区别于信息发布的最大不同:一是主动性、二是选择性。从某种意义上说这是信息的接受者根据自身需要进行自我完善和自我发展的方式，这种方式在当今的信息社会中将越来越符合信息资源消费者的深层需要，可以说VOD是信息获取的未来主流方式在多媒体视音频方面的表现。VOD的概念将会在信息获取的领域快速扩展,具有无限广阔的发展前景。1.3 简介 ASP.net 是一种建立在通用语言上的程序构架，能被用于一台Web服务器来建立强大的Web应用程序。ASP.net提供许多比现在的Web开发模式强大的的优势。执行效率的大幅提高ASP.net是把基于通用语言的程序在服务器上运行。不像以前的ASP即时解释程序，而是将程序在服务器端首次运行时进行编译，这样的执行效果，当然比一条一条的解释强很多。世界级的工具支持ASP.net构架是可以用Microsoft（R）公司最新的产品 Visual S开发环境进行开发，WYSIWYG（What You See Is What You Get所见即为所得）的编辑。这些仅是ASP.net强大化软件支持的一小部分。强大性和适应性因为ASP.net是基于通用语言的编译运行的程序，所以它的强大性和适应性，可以使它运行在Web应用软件开发者的几乎全部的平台上（笔者到现在为止只知道它只能用在Windows 2000 Server上）。通用语言的基本库，消息机制，数据接口的处理都能无缝的整合到ASP.net的Web应用中。ASP.net同时也是language-independent语言独立化的，所以，你可以选择一种最适合你的语言来编写你的程序，或者把你的程序用很多种语言来写，现在已经支持的有C#（C+和Java的结合体），VB，Jscript。将来，这样的多种程序语言协同工作的能力保护您现在的基于COM+开发的程序，能够完整的移植向ASP.net。简单性和易学性ASP.net是运行一些很平常的任务如表单的提交客户端的身份验证、分布系统和网站配置变得非常简单。例如ASP.net页面构架允许你建立你自己的用户分界面，使其不同于常见的VB-Like界面。另外，通用语言简化开发使把代码结合成软件简单的就像装配电脑。高效可管理性ASP.net使用一种字符基础的，分级的配置系统，使你服务器环境和应用程序的设置更加简单。因为配置信息都保存在简单文本中，新的设置有可能都不需要启动本地的管理员工具就可以实现。这种被称为Zero Local Administration的哲学观念使A的基于应用的开发更加具体，和快捷。一个ASP.net的应用程序在一台服务器系统的安装只需要简单的拷贝一些必须得文件，不需要系统的重新启动，一切就是这么简单。多处理器环境的可靠性ASP.net已经被刻意设计成为一种可以用于多处理器的开发工具，它在多处理器的环境下用特殊的无缝连接技术，将很大的提高运行速度。即使你现在的ASP.net应用软件是为一个处理器开发的，将来多处理器运行时不需要任何改变都能提高他们的效能，但现在的ASP确做不到这一点。自定义性，和可扩展性ASP.net设计时考虑了让网站开发人员可以在自己的代码中自己定义plug-in的模块。这与原来的包含关系不同，ASP.net可以加入自己定义的如何组件。网站程序的开发从来没有这么简单过。安全性基于Windows认证技术和每应用程序配置，你可以确性你的原程序时绝对安全的。（但是Asp的经验告诉我们，不能这么自信，M$老是会出Bug1.4 ACCESS简介数据库是有结构的数据集合,它与一般的数据文件不同，(其中的数据是无结构的)是一串文字或数字流。数据库中的数据可以是文字、图象、声音等。Microsoft Access是一种关系式数据库，关系式数据库由一系列表组成，表又由一系列行和列组成，每一行是一个记录，每一列是一个字段，每个字段有一个字段名，字段名在一个表中不能重复。第二章 视频点播系统介绍与技术介绍2.1网站结构设计本站的系统结构如下图所示。 数据库服务器 web服务器ASP.NET 多媒体播放器 浏览器 系统结构一个典型的在线宽带点播网站应包含软件下载安装、会员管理、视频信息显示播放、视频搜索、视频信息管理和视频文件管理。2.1.1 目标设计 在线宽带点播网站所要实现的功能如下。l 会员管理n 会员注册n 会员登录验证n 会员管理l 视频信息显示n 显示全部视频信息n 按类别显示视频信息n 显示视频详细信息l 视频信息搜索n 按关键字搜索l 视频信息管理n 管理员登录验证n 视频信息添加n 视频信息修改n 视频信息删除n 视频文件海报图上传2.1.2 系统功能分析设计 在线宽带点播共分5个模块：会员管理模块、视频信息显示模块、视频信息搜索模块、视频信息管理模块和视频文件管理模块，其功能如下图所示。视频信息管理模块关键字搜索视频信息搜索模块视频信息添加视频信息删除视频信息修改海报图片上传视频文件上传视频详细信息类别显示信息显示全部信息视频信息显示模块会员管理会员登录验证会员注册会员管理模块功能模块视图2.2 数据库结构设计 根据功能设计的要求和模块划分，本站的数据库主要存储用户信息、视频信息、管理员信息、网站公告栏信息。2.2.1 数据库需求分析 数据项和数据结构如下： 用户信息：ID（自动编号）、用户名和密码。 视频信息：信息名称、连接路径、文件大小、影片类型、影片简介、影片得分等。 管理员信息：ID（自动编号）、管理员名称、管理员密码。 公告栏信息：ID（自动编号）、公告内容、发表日期。2.2.2 数据库逻辑设计1 用户信息表“用户”，如下表：列名数据类型长度允许空Id数字4用户名文本50密码文本50用户信息表2 视频信息表download 如下表列名数据类型长度允许空Id数字4影片名文本100Movie文本50Filename文本50Filename1文本50Filename2文本50影片版本文本100Note文本150Classid数字4影片性质文本50大小文本50系统要求文本100评分文本4海报图文本50影片类型文本50视频信息表2.3 会员管理模块 会员管理模块包含一下子块。 会员注册 userreg.aspx 用户登录验证 default.aspx 修改个人信息 reg_pre.aspx各页面之间的关系如下图所示： userreg.aspx用户提交注册 ASP.NETuserreg.aspx验证注册信息ASP.NETdefault.aspx注册成功登录ASP.NETdefault.aspx登录验证ASP.NET 各个页面之间的关系2.3.1 userreg.aspx1 页面示例下图为用户注册会员所看到的页面。 用户注册会员2 页面中需要用户填写的表单元素这个页面中有6个需要用户填写的表单元素 如下表所示：名称表单元素类型含义最大长度nichengText用户名20FpassPassword用户密码20SepassPassword确认密码20RealnameText真实姓名20Sex1、sex2Bool性别1dianyouTextEmail30zhuyeText个人主页地址503 页面所涉及到的数据库表信息此页向系统提供用户注册名称和密码，并涉及到对数据库表“用户”表的操作。4 页面代码分析按钮提交触发函数代码：以下代码实现了对注目录中的access数据库vod.mdb的连接，此代码的主要作用是当用户点击页面中的“注册”按钮时触发的Button_Click事件，实现把各个控件的数据读取并且通过cmd.CommandText = Insert into 用户 values(?,?,?,?,?,?)语句把所获取的用户所输入的信息写入到数据库，并且当用户点击“清除”按钮或者刷新页面时把所有的控件清空，实现用户注册功能。Sub Button_Click(Sender As Object, e As EventArgs) Dim conn As New OleDbConnection() Dim cmd As New OleDbCommand conn.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0; Data Source= & Server.MapPath(vod.mdb) conn.Open() cmd.Connection = conn cmd.CommandText = Insert into 用户 values(?,?,?,?,?,?) cmd.Parameters.Add(New OleDbParameter(用户名,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(密码,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(性别,OleDbType.Boolean) cmd.Parameters.Add(New OleDbParameter(真实姓名,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(电子邮件,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(用户主页,OleDbType.VarChar,20) cmd.Parameters(用户名).Value = Request(nicheng) cmd.Parameters(密码).Value = Request(fpass) If Sex1.Checked Then cmd.Parameters(性别).Value = True Else cmd.Parameters(性别).Value = False End If cmd.Parameters(真实姓名).Value = Request(realname) cmd.Parameters(电子邮件).Value = Request(dianyou) cmd.Parameters(用户主页).Value = Request(zhuye) cmd.ExecuteNonQuery() 执行sql语句 conn.Close() 关闭数据库 Response.Write(OK) nicheng.text= fpass.text= secpass.text= realname.text= dianyou.text= zhuye.text=End Sub用户输入验证代码：以下代码实现对用户所输入的注册信息进行验证，验证其输入是否为空或者是否合法。 2.3.2 用户登录1 页面示例用户登录系统，页面效果如下所示： 2 页面中需要用户填写的表单元素该表单共有两个表单元素 如下表所示：名称表单元素类型含义最大长度UserNameText用户登录名称20PassPassword用户登录密码203 页面所涉及到的数据库表信息该登录表单仅完成向系统提交会员登录信息，没有使用到系统中的数据库表信息。4 页面代码：以下代码实现对用户对表单填写信息的验证，若登录成功，把当前用户所输入的用户名信息赋值到变量flag中，以便把其值传到其他页面，若登录失败会在页面中显示登录失败信息Response.write(登陆失败！) Sub Login(sender As Object, e As CommandEventArgs) Dim conn As New OleDbConnection() Dim cmd As New OleDbCommand() Dim objReader As OleDbDataReader Dim i As integer conn.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0; Data Source= & Server.MapPath(vod.mdb) conn.Open() cmd.Connection = conn cmd.CommandText = Select 用户名,密码 From 用户 objReader = cmd.ExecuteReader() Do While objReader.Read() If Request.Form(UserName) = objReader.Item(用户名) And Request.Form(pass) = objReader.Item(密码) Then Response.write(登陆成功！) session(flag)=UserName.text Response.Redirect(default.aspx) 成功登录 Exit Do End If Loop Response.write(登陆失败！) ObjReader.Close() 关闭DataReader对象 conn.Close() 关闭数据连接 提交用户名和密码 response.write()End Sub2.4 视频信息显示模块 视频信息显示模块包含以下页面。l default.aspxl dongzuo.aspxl list.aspxl playrm.aspxl playwin.aspx各页面之间的关系如下图所示Playwin.aspx在线视频点播playrm.aspx在线视频点播list.aspx详细显示视频dongzuo.aspx类别视频显示ASP.NETASP.NETASP.NETASP.NETdefault.aspx全部视频显示各页面之间的关系2.4.1 网站主页default.aspx1 页面示例下图为全部信息显示所看到的效果。 全部信息显示2 页面所涉及的数据库表的信息此页用了系统中的信息记录表download。3 页面代码：Sub BindGrid()函数实现了DataGrid 控件TotalShow ，stuDG1、 stuDG2、 stuDG3与指定数据源的绑定，并且三个控件均绑定同一个数据库表“download”不同的是TotalShow显示的视频信息是按照“整理日期”的降序排列，stuDG1显示的视频信息是按照影片星级多少来排序的，并且在所有的datagrid控件的视频显示都实现了分页显示。 Sub BindList()函数实现了DateList控件stuDL与数据库表“download”的绑定，使得视频信息按照“评分”大小来排序。 Sub BindGrid() BindGrid()指定数据源，并绑定到DataGrid控件 Dim conn As New OleDbConnection() Dim cmd As New OleDbCommand() Dim DS As New DataSet() conn.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0; Data Source= & Server.MapPath(vod.mdb) conn.Open() cmd.Connection = conn cmd.CommandText = Select * from download order by 整理日期 desc Select 影片名,整理日期 from download Dim objAdpt As New OleDbDataAdapter(cmd) objAdpt.Fill(DS,download)TotalShow.DataSource = DS.Tables(download).DefaultView 指定stuDG控件的数据源 TotalShow.DataBind() stuDG1.DataSource = DS.Tables(download).DefaultView 指定stuDG控件的数据源 stuDG1.DataBind() stuDG2.DataSource = DS.Tables(download).DefaultView 指定stuDG控件的数据源 stuDG2.DataBind()Dim cmd1 As New OleDbCommand()cmd1.Connection = conn 将数据源与stuDG控件绑定cmd1.CommandText = Select * from download where classid=11Dim objAdpt1 As New OleDbDataAdapter(cmd1)objAdpt1.Fill(DS,download)stuDG3.DataSource = DS.Tables(download).DefaultView 指定stuDG控件的数据源 stuDG3.DataBind() 将数据源与stuDG控件绑定 conn.Close()End SubSub totalshow_sort(sender As Object, e As DataGridsortcommandEventArgs) BindGrid()指定数据源，并绑定到DataGrid控件 sortfield=e.sortexpressionBindGrid() End SubSub BindList() Dim conn As New OleDbConnection() Dim cmd As New OleDbCommand() Dim DS As New DataSet() conn.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0; Data Source= & Server.MapPath(vod.mdb) conn.Open() cmd.Connection = conn cmd.CommandText = Select 影片名 from download Dim objAdpt As New OleDbDataAdapter(cmd) objAdpt.Fill(DS,download) StuDL.DataSource = DS.Tables(download).DefaultView StuDL.DataBind() conn.Close()End Sub2.4.2 视频详细信息显示List.aspx1 页面示例下图为视频信息详细内容显示所看到的页面效果。2 页面所涉及的数据库表信息此页使用了系统中的信息记录表“download”。通过多个textbox控件进行读取了影片版本、影片类型、运行环境、授权方式、影片大小和影片评价的内容，并且通过datalist控件内嵌asp代码实现了读取“download”数据库表中的“海报图”的图片路径，实现了对海报图片的显示。3 页面代码以下代码是一个实现页面加载的函数，在页面加载的时候首先把Artname的值读取到id值为lbtext1的lable控件里，首先通过判断session对象从default.aspx传来的flag值是否为空，若为空页面加载失败，在页面的顶部显示提示文字以及超连接“您还不是会员，请 注册”，若flag值不为空则成功加载页面，并且成功读取数据库表信息。在函数的开头定义了一个全局变量字符串play，并通过session对象把“download”中的与Artname里的影片名对应的字段内容“影片名”、“filename”，“filename1”，“filename2”传到视频播放页面playrm.aspx和playwin.aspx中。dim play as stringsub page_load(sender as object,e as eventargs)if not ispostback thenlbtext1.text=request(Artname)end if if session(flag)Dim cmd As New OleDbCommand()Dim objReader As OleDbDataReader Dim i As integer dim ds as new dataset()dim conn as new OLEDBconnection()conn=new OLEDBconnection(Provider=Microsoft.Jet.OLEDB.4.0; Data Source=&server.mappath(vod.mdb)cmd.Connection = conndim mycommand as new OLEDBDataAdapter()mycommand=new OLEDBDataAdapter(select * from download where 影片名=& Request(Artname) & ,conn)conn.open()mycommand.fill(ds)mydatalist.datasource=new dataview(ds.tables(0)mydatalist.databind()cmd.CommandText = Select * From download where 影片名=& Request(Artname) & objReader = cmd.ExecuteReader() Do While objReader.Read() lbtext2.Text = objReader.Item(影片版本 ) lbtext3.Text = objReader.Item(影片类型 ) lbtext4.Text = objReader.Item(系统要求 ) lbtext5.Text = objReader.Item(影片性质 ) lbtext6.Text = objReader.Item(大小 ) lbtext7.Text = objReader.Item(整理日期 ) session(filename)=objReader.Item(影片名) session(filename1)=objReader.Item(filename) session(filename2)=objReader.Item(filename1) session(filename3)=objReader.Item(filename2)if objReader.Item(movie) then if objReader.Item(movie)=win then play=playwin.aspx else play=playrm.aspx end if end if Exit Do LoopObjReader.Close() 关闭DataReader对象 conn.Close()elseresponse.write(您还不是会员！请:注册)end ifend sub2.4.3 类别视频显示dongzuo.aspx 1页面示例下图为类别视频显示所看到的页面效果。2.涉及的数据表信息此页面使用了系统中的信息记录表download。4 页面代码以下代码实现了根据download数据表中不同classid的对视频信息进行分类显示，把影片总共分为十类（包括动作片、科幻片、恐怖片、爱情片、喜剧片、电视剧、卡通类、战争片、记录片、武侠片），用户可以选择自己想看的视频类别，并且显示每个影片的影片名,影片性质,整理日期,大小,影片版本,系统要求,评分。Sub Page_load(sender as object,e as eventargs)dim ss=Request(classid)response.write (电影类别编号:&ss)Dim conn As New oledbconnection()dim SQLStr as stringdim cmd as new oledbcommand()conn.connectionstring = provider=Microsoft.jet.oledb.4.0;data source= & server.mappath(vod.mdb)conn.open()SQLStr = Select 影片名,影片性质,整理日期,大小,影片版本,系统要求,评分 from download where classid =? cmd = new OleDbCommand(SQLStr,conn)dim para as new oledbparameter(classid,OleDbType.VarChar,50)cmd.parameters.add(para)cmd.parameters(classid).Value = Request(classid)dim objReader as OleDbDataReader objReader = cmd.ExecuteReader()myDataGrid.DataSource =objReader 定义DataGrid对象的数据源myDataGrid.DataBind() 绑定DataGrid对象的数据源objReader.close()conn.close()End Sub2.4.4 Mediaplayer视频播放窗口playwin.aspx1. 页面示例下图为利用Mediaplayer视频播放所看到的页面效果2 涉及的数据库表信息此页使用了系统中的信息记录表download。3 页面代码分析以下页面载入代码，当页面载入时判断是否会员，若非会员显示注册提示信息，若为会员，则把从list.aspx传来的影片路径利用session对象赋值给全局字符串变量url以便下面媒体播放object调用url的值。dim url as stringsub page_load(sender as object,e as eventargs)if session(flag)= thenresponse.write(对不起！此为会员程序，请注册成我们的会员！)end ifif request(downid)=2 thenurl=session(filename2)elseif request(downid)=3 thenurl=session(filename3)elseurl=session(filename1)end ifend sub 一般而言，安装好MediaPlayer之后，有两种方式可供选择来连接视频文件。一种是直接在Web页面上提供视频文件的URL地址，当用户点击链接时，MediaPlayer自动识别并实时连接进行播放；第二种方法是通过ActiveX控件方式在Web页面中嵌入MediaPlayer对象，并通过DHTML为内嵌对象动态指定视频流URL，从而为视频播放提供了一个统一的友好界面。前一种方法对于设计者来说相对比较简单，只需要提供视频文件的播放路径。MediaPlayer的熟练用户，还可以通过自定义MediaPlayer的播放方式、下载视觉插件、添加到收藏夹等方式进行视频管理。但这种方式也存在以下几点缺陷：1、对于含有中文路径和中文名的视频文件，浏览器并不能很好支持，常常出现找不到文件等错误信息。2、需要系统进行文件关联，如果文件关联出错，浏览器将无所适从。3、对终端用户来说，往往希望看到统一的播放界面，而不是弹出式播放。通过Web嵌入式视频流管理，可以把用户端的操作请求减少到最小（用户只需简单的安装RealPlayer播放器）。如果再辅以精心的美工设计，还可以按照设计者的意愿定制出精美大方的播放界面。以下代码实现的方法是通过ActiveX控件方式在Web页面中嵌入MediaPlayer对象，并通过DHTML为内嵌对象动态指定视频流URL，从而为视频播放提供了一个统一的友好界面。 是Microsoft在IE4.0之后推出的，用来替代标签的对象定义标签(IE仍然支持)，通过classid属性定义相应的对象类型。标签是Netscape浏览器支持的对象定义标签。其中CONTROLS参数用来指定播放器的控件外观，可以用多个控件进行组合，并通过CONSOLE参数进行关联。 param name=Filename value= 2.4.5 Realplayer视频播放窗口playrm.aspx1 页面示例下图为利用Realplayer视频播放所看到的页面效果播放窗口2 嵌入式RealPlayer在播放视频文件时，一般采用把视频文件整个下载到本地然后进行播放。这对于较大的视频文件来说，速度让人难以忍受。解决这个问题的方法，一是把视频文件简单的分割成大小适中的小文件分段播放（由于 REAL 公司对 RM 格式的实行“封闭管理”，所以 RM 到目前为止还不能像 MPEG 等视频文件一样用视频软件自由的编辑）；另外一种就是采用ram文件。RealPlayer简单的下载文本格式的ram文件，然后取出其中的真实地址，然后自动连接到网络进行实时的点对点播放。其缺点是增加了服务器负担。3 页面代码由于此页面代码与Mediaplayer播放窗口playwin.aspx内部的代码类似，这里就不作详细介绍了。 2.5 视频信息搜索模块视频信息搜索包含以下页面。l search.aspx 各个页面之间的关系 如下图所示。default.aspx视频搜索default.aspx视频搜索 ASP.NETASP.NETASP.NETSearch.aspx搜索结果2.5.1 default.aspx1 页面示例下图为关键字搜索界面。 2 涉及的数据库表信息未涉及数据库的表的信息。3 代码省略。2.5.2 搜索页面search.aspx1 页面示例下图为搜索引擎结果的返回页面。 2 页面所涉及的数据库表信息此页面是按关键字搜索结果视频信息，涉及到视频信息表download的操作。3 页面代码以下代码实现了利用datagrid控件显示视频信息搜索结果的函数的功能，此函数是以视频的“影片名”为关键字进行搜索，在数据库表中查找到与“影片名”相匹配的字段便成功的返回相关视频的详细信息，包含（影片名,影片性质,整理日期,大小,系统要求,评分）。Sub Page_load(sender as object,e as eventargs)dim ss=Request(classid)Dim conn As New oledbconnection()dim SQLStr as stringdim cmd as new oledbcommand()conn.connectionstring = provider=Microsoft.jet.oledb.4.0;data source= & server.mappath(vod.mdb)conn.open()SQLStr = Select 影片名,影片性质,整理日期,大小,系统要求,评分 from download where 影片名 =? cmd = new OleDbCommand(SQLStr,conn)dim para as new oledbparameter(影片名,OleDbType.VarChar,50)cmd.parameters.add(para)cmd.parameters(影片名).Value = Request(keyword)dim objReader as OleDbDataReader objReader = cmd.ExecuteReader()myDataGrid.DataSource =objReader 定义DataGrid对象的数据源myDataGrid.DataBind() 绑定DataGrid对象的数据源objReader.close()conn.close()End Sub2.6 视频信息管理模块（后台管理模块） 视频栏目管理包含以下子模块l 管理员登录验证n admin.aspxn manage.aspxn login.aspxl 视频信息后台管理n freeadd.aspxn adminedit.aspxn adminuser1.aspxn uploads.aspx各个页面之间的关系如下图所示。admin.aspx管理员登录ASP.NETASP.NETadmin.aspx审核帐号 正确 错误ASP.NETASP.NETmanage.aspx管理员管理页面login.aspx重新登录ASP.NETASP.NETASP.NETASP.NETuploads.aspx视频文件上传adminuser1.aspx管理员信息管理adminedit.aspx视频信息编辑freeadd.aspx添加视频各页面之间的关系2.6.1 admin.aspx1 页面示例管理员登录界面，页面效果如下图所示，用户名:admin密码：546211 2 页面中需要用户填写的表单元素。 名称表单元素类型含义最大长度UserNameText用户名20PassPassword密码163 面所涉及的数据库表信息此页面向系统提供用户名和密码，并涉及到对数据库表“admin”的操作。4页面代码 由于本页面代码与default.aspx登录代码类似，这里就不作介绍了。2.6.2 manage.aspx 1页面示例下图是管理员登录成功后的管理页面的效果。 理员登录成功后的管理页面3 没有使用数据库表。2.6.3 freeadd.aspx1 页面示例下图为管理员添加视频信息的页面效果。 添加视频信息2 页面中需要用户填写的表单有15个。 名称表单元素类型含义最大长度filmName文本影片名50format文本电影格式20down1文本影片名150down2文本影片名250tuijian文本评分100filmsize文本影片大小100filmimg文本海报图100txtComment文本影片简介100down3文本影片名3150film1文本影片性质100need文本运行环境150filmff文本Classid100date1日期时间整理日期100filmlei文本影片类型50filmban文本影片版本503 页面所涉及的数据库表信息此页面向系统提交视频信息，对download进行操作。4 页面代码分析按钮触发函数，当用户点击把表单里面内容写入数据库表。Sub Button_Click(Sender As Object, e As EventArgs) Dim conn As New OleDbConnection() Dim cmd As New OleDbCommand conn.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0; Data Source= & Server.MapPath(./vod.mdb) conn.Open() cmd.Connection = conn cmd.CommandText = Insert into download values(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?) cmd.Parameters.Add(New OleDbParameter(影片名,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(movie,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(filename,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(filename1,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(filename2,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(影片版本,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(note,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(classid,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(影片性质,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(大小,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(系统要求 ,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(评分,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(整理日期 ,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(海报图,OleDbType.VarChar,20) cmd.Parameters.Add(New OleDbParameter(影片类型,OleDbType.VarChar,20) cmd.Parameters(影片名).Value = Request(filmName) cmd.Parameters(movie).Value = Request(format) cmd.Parameters(filename).Value = Request(down1) cmd.Parameters(filename1).Value = Request(down2) cmd.Parameters(评分).Value = Request(tuijian) cmd.Parameters(大小).Value = Request(filmsize) cmd.Parameters(海报图).Value = Request(filmimg) cmd.Parameters(note).Value = Request(txtComment) cmd.Parameters(filename2).Value = Request(down3) cmd.Parameters(影片性质).Value = Request(film1) cmd.Parameters(系统要求).Value = Request(need) cmd.Parameters(classid).Value = Request(filmff) cmd.Parameters(整理日期).Value = Request(date1) cmd.Parameters(影片类型).Value = Request(filmlei) cmd.Parameters(影片版本).Value = Request(filmban) cmd.ExecuteNonQuery() 执行sql语句 conn.Close() 关闭数据库 Response.Write(OK) filmName.text= filmban.text= format.text= filmsize.text= filmimg.text= txtComment.text= down1.text= down2.text= down3.text= filmff.text= film1.text= need.text= tuijian.text= date1.text= filmlei.text=End Sub2.6.4 adminedit.aspx1 页面示例下图为管理员修改、删除视频信息的页面效果。视频信息修改删除页面2 页面所涉及的数据库表信息页面对数据库表download进行操作。 3页面代码 dim SQLStr as stringdim conn as oledbconnectiondim cmd as oledbcommandSub Page_load(sender as object,e as eventargs)if session(flag) = thenresponse.Redirect(userreg.aspx) elseif not ispostback then UserName.text = session(flag)conn = new oledbconnection()conn.connectionstring = provider=Microsoft.jet.oledb.4.0;data source= & server.mappath(vod.mdb)conn.open()SQLStr = Select * from 用户 where 用户名=?cmd = new OleDbCommand(SQLStr,conn)dim para as new oledbparameter(用户名,OleDbType.VarChar,50)cmd.parameters.add(para)cmd.parameters(用户名).Value =session(flag)dim objReader as OleDbDataReader objReader = cmd.ExecuteReader() while objReader.read()OPass.text = objReader.Item(密码)headimg.text = ob
- 温馨提示:
1: 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
2: 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
3.本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
人人文库网所有资源均是用户自行上传分享，仅供网友学习交流，未经上传用户书面授权，请勿作他用。
川公网安备: 51019002004831号