视频播放的实现
<object width="320" height="250" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA"><param name="CONTROLS" value="ImageWindow"><param name="CONSOLE" value="Video"><param name="CENTER" value="TRUE"><param name="MAINTAINSPECT" value="TRUE"></object> //定义播放界面<object width="320" height="30" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA"><param name="CONTROLS" value="StatusBar"><param name="CONSOLE" value="Video"></object> //定义状态栏<object width="320" height="30" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA"><param name="CONTROLS" value="ControlPanel"><param name="CONSOLE" value="Video"><param name="SRC" value="<?php echo getsrc(); ?>"><param name="AUTOSTART" value="TRUE"><param name="PREFETCH" value="0"><param name="LOOP" value="0"><param name="NUMLOOP" value="0"></object> //定义控制面板//三、检测用户是否安装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>