
三、检测用户是否安装RealPlayer播放器
在页面的<head></head>部分加入以下JavaScript代码,用以检测用户是否安装RealPlayer播放器:
<SCRIPT LANGUAGE=JavaScript>
   <!--
   var RealMode=0;
   var RealPlayer5=0;
   var RealPlayer4=0;
   var RealPlayerG2=0;
   if (navigator.userAgent.indexOf("MSIE")< 0 ){
   numPlugins = navigator.plugins.length;
   for (i = 0; i < numPlugins; i++){
   plugin = navigator.plugins[i];
   if (plugin.name.substring(0,10)=="RealPlayer"){
   RealMode=1;
   }
   }
   }
// 以下代码通过VBScript的CreateObject()函数动态的创建RealPlayer对象
   document.write('<SCRIPT LANGUAGE=VBScript\> \n');
   document.write('on error resume next \n');
   document.write('RealPlayerG2 = (NOT IsNull(CreateObject("rmocx.RealPlayer G2 Control")))\n');
   document.write('RealPlayer5 = (NOT IsNull(CreateObject("RealPlayer.RealPlayer(tm) ActiveX Control (32-bit)")))\n');
   document.write('RealPlayer4 = (NOT IsNull(CreateObject("RealVideo.RealVideo(tm) ActiveX Control (32-bit)")))\n');
   document.write('</SCRIPT\> \n');
   if ( RealPlayerG2 
RealPlayer5
 RealPlayer4 ){
   //可以在此处添加<object>对象
   }else if ( RealMode ){ // NetScape浏览器用户
   // 可以在此处加入<embed>对象
   }else{
   window.location.replace("install.htm"); // 转入install.htm页面指导用户进行安装
   }
   -->
   </Script>
至此,我们已经实现了一个基于Web的视频点播的基本功能。但我们要想把功能做的更完美一些,还需要其它更复杂的考虑。如流媒体的制作、网页美工的设计、网络流速的考虑,以及网站视频文件的有效组织。这些话题已经超出了本文的讨论范围,请读者自行参考相关资料。