多媒体视频网站用什么数据库比较合适

多媒体数据库 多媒体数据库是数据库技术与多媒体技术结合的产物。多媒体数据库不是对现有的数据进行界面上的包装，而是从多媒体数据与信息本身的特性出发，考虑将其引入到数据库中之后而带来的有关问题。多媒体数据库从本质上来说，要解决三个难题。第一是信息媒体的多样化，不仅仅是数值数据和字符数据，要扩大到多媒体数据的存储、组织、使用和管理。第二要解决多媒体数据集成或表现集成，实现多媒体数据之间的交叉调用和融合，集成粒度越细，多媒体一体化表现才越强，应用的价值也才越大。第三是多媒体数据与人之间的交互性。没有交互性就没有多媒体，要改变传统数据库查询的被动性，能以多媒体方式主动表现。 简单的说 就是计算机存放电影,音乐以及其他非文本数据的地方

多媒体编程技术--------制作音乐播放器

最佳答案其实 网上有很多 关于类似的开发源代码，我给你找一些资料吧。。在VB中使用MCI指令设计多媒体程序湖北赵军 《VB多媒体程序设计》一文详细的介绍了VB中多媒体控件MCI.VBX的用法。用MCI.VBX控件可以非常方便，快捷的制作出一个多媒体作品。其固然好，但MCI.VBX控件的控制界面有些太古老，能不能自己做一个精美的控制界面？另外，有时程序中只想放声音而已，用MCI.VBX感觉有杀鸡用宰牛刀的味道，有没有杀鸡刀可用？答案都是肯定的。那就是Windows为多媒体程序的设计提供的标准多媒体控制接口，即 MCI(Media Control Interface)。 MCI接口 MCI覆盖了音频、视频、影片、激光视碟机、和录像机的多媒体的主要产品，够满足大多数多媒体应用程序的需要。对于标准设备安装相应的Mci Driver,Windows即可对此进行访问操作，对于非标准设备如果它提供MCI Driver,可以直接从平台发出MCI命令对之进行操作。因此Windows对MCI标准的支持可使Windows能够支持所有符合MCI标准的设备。其突出的优点及设备无关性，要更换设备是只要更换相应的MCI Driver,应用系统无需修改即可操作新的设备。MCI设备 应用系统通过指定一个MCI设备的类型区分设备，由于前几期已有文章介绍了已定义的设备类型，这里就不再叙述了。Windows3.x API中MCI函数 MCI指令有两种风格：命令-字符串接口（Command-String Interface）和命令－消息接口(Command-Message Interface)。Windows API中提供了三组MCI函数(全以mci词首开始)。Command-String Interface MciSendString()Mciexecute()Command-Message Interface MciSendCommand()MciGetDeviceID()CSI And CMI Mix Interface MciGetErrorString()McisetYieldProc() （VB中不支持）MCI指令还有其相对固定的格式，即：Command Device_Name Arguments[Wait][notify]Command:要使用的MCI指令，如Play等。Device_Name:设备名称或文件名，如cdAudio等。Argements:参数。例如：Play cdAudio Wait。VB MCI编程实例 播放声音文件(wav,midi) 播放声音文件最简单的函数是（2）组中的mciExecute(),他只需传递一组字符串即可。在VB Moudel中声明为：DECLARE FUNCTION MCIExecute Lib MMSystem(ByVal CommandString As String)As Integer好了!现在只需在你的程序里加入:Result%=MCIExecute(Play C:\windows\tata.wav)就可以听到美妙的声音了。但这个函数的功能似乎是太简单了，例如不能返回字符串等。下一步我们来试一试MCISendString()这个函数来播放放声音文件，MCISendString()函数在VB Moudel中声明为：Declare Function mciSendString Lib MMSystem(ByVal lpstrCommand As String,lpstrString As Any,ByVal wRtnLenght As Integer,ByVal hcallback as Integer)AS Long (windows 3.X)Declare Function mciSendString Lib winmm.dll Alias mciSendStringA (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long(windows 95)其中第一个参数是告诉MCI所做的事情；第二个参数为该函数返回的字符串信息:第三个参数是用于存放返回的字符串的缓冲区的大小:第四个参数用于建立一个调用返回参数,在VB中为0。接下来就可以用MCI指令做事情了,播放声音文件的一些常用的MCI指令如下表:MCI指令 功能参数 OpenPlayPauseResumeSeekRecordSaveStopClose 打开声音文件播放声音文件暂停恢复搜索指定位置开始录音保存当前文件停止关闭声音文件 Alias 表示打开声音文件的别名From start_time to end_time 通常以秒为单位 To position ,to start,to end开始录音后必须保存文件 读者只需按照上表的命令，在使用MCIsendString函数即可播放文件了，这里就不给例子了。播放CD音频(Cdaudio) 虽然有一些强大的CD播放器,但我还是喜欢自己动手来做一个,哪怕是最简单的,只是每一个初学编程的人都想做的事,现在让我们来把梦想变成现实,来制作一个简单的播放器。源程序如下：声明部分:Option ExplicitDeclare Function mcisendstring Lib MMSystem (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal wReturnLength As Integer, ByVal hCallback As Integer) As LongGlobal Result As IntegerGlobal ReturnString As String * 128程序部分:Sub Command1_Click ()result = mcisendstring(play CDAudio, returnstring, 1End subSub Command2_Click ()result = mcisendstring(pause CDAudio, returnstring, 127, 0)End SubSub Command3_Click ()result = mcisendstring(stop CDAudio, returnstring, 127, 0)result = mcisendstring(close CDAudio, returnstring, 127, 0)End SubSub Command4_Click ()result = mcisendstring(stop CDAudio, returnstring, 127, 0)result = mcisendstring(close CDAudio, returnstring, 127, 0)result = mcisendstring(set CDAudio door open, returnstring, 127, 0)End SubSub Form_Load ()result = mcisendstring(close CDAudio, returnstring, 127, 0)result = mcisendstring(open CDAudio shareable, returnstring, 127, 0) '以共享的方式打开If result <> 0 ThenMsgBox 不能打开CDAudio设备!, 16, 错误EndElseresult = mcisendstring(status CDAudio number of tracks, returnstring, 127, 0)Label4.Caption = Left$(returnstring, InStr(returnstring, Chr$(0)) - 1)'清除多余的字符result = mcisendstring(status CDAudio current track, returnstring, 127, 0)CurrentTrackNumber = Left$(returnstring, InStr(returnstring, Chr$(0)) - 1)'得到当前的歌曲号result = mcisendstring(status CDAudio length track & CurrentTrackNumber, returnstring, 127, 0)label6.Caption = Left$(Left$(returnstring, InStr(returnstring, Chr$(0)) - 1), 5)'得到当前的歌曲时间End IfEnd Sub以上程序在Windows 3.x vb3.0中通过，在32位 Windows中只需改变MciSendstring()声明即可。Video 视频(AVI) 我每当看一张多媒体光盘时，都会被其中的一些数字电影所折倒。现在有了MCI我们也可以播放AVI动画了，并且并不他们的差。其源程序如下：VERSION 5.00Begin VB.Form AVI Appearance = 0 'FlatBackColor = &H00FFFFFF&Caption = AVI播放器 ClientHeight = 2700ClientLeft = 3105ClientTop = 3405ClientWidth = 4710ForeColor = &H80000008&LinkTopic = Form1PaletteMode = 1 'UseZOrderScaleHeight = 180ScaleMode = 3 'PixelScaleWidth = 314WindowState = 2 'MaximizedEndAttribute VB_Name = AVIAttribute VB_GlobalNameSpace = FalseAttribute VB_Creatable = FalseAttribute VB_PredeclaredId = TrueAttribute VB_Exposed = FalseOption ExplicitPrivate Declare Function mciSendString Lib winmm.dll Alias mciSendStringA (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As LongPrivate Sub Form_Click()PlayVideo f:\2.avi, AVI.hWndEndEnd SubPrivate Function Mcistring(commandstring As String) As StringDim returnstring As String * 256Dim dummy As Integerdummy = mciSendString(commandstring, returnstring, 255, 0)Mcistring = returnstringEnd FunctionPrivate Sub PlayVideo(FileName As String, ByVal hWindow As Integer)Dim commandstring As StringDim pstring As String * 255'打开AVI设备commandstring = Open & FileName & alias AVIpstring = Mcistring(commandstring)'设置输出窗口commandstring = Window AVI handle & Str$(hWindow)pstring = Mcistring(commandstring)'定义全屏commandstring = Put AVI destination at 0 0 640 480'读者不妨试试改改字符串中0 0 648 480 几个字符,你会大吃一惊的!但要注意字符之 间要有空格。(显示模式为:640*480) pstring = Mcistring(commandstring)'播放AVIMousePointer = 11commandstring = Play AVI wait pstring = Mcistring(commandstring)MousePointer = 0'关闭AVI设备commandstring = Close AVIpstring = Mcistring(commandstring)End Sub以上程序也只是用到了MCI指令的一小部分,但是实现功能却很强大,写到这我们不能不感谢Microsoft的程序工程师们!(VB5.0 Windows 95中通过，在Windows 3.x中只需改变声明即可,但必需按装Video For Windows。)五、结束语 Windows强大的MCI为多媒体的程序设计开辟了广阔的天地，如果我们灵活应用它，可以作出一个不错的多媒体程序。由于篇幅有限，在加上本人能力有限，关于Windows API的MciSendCommand()函数本人尚未完全掌握，有兴趣的读者可参考有关书籍。