28,407
社区成员
发帖
与我相关
我的任务
分享请高手帮忙看这段代码（关于嵌入式播放），为何会引起部分电脑的IE崩溃？送分
问题是这样，一段WEB嵌入式播放的代码，大部分电脑上打开这段网页很正常，但部分电脑上打开就会引起IE出错关闭，不知什么原因，整个代码如下，是ASP页面。
<%Option Explicit%>
<!--#include file="articleconn.asp"-->
<%
dim RS,sql,strSQL,rs1
dim url,id,ddd,dddd,ftype
id = Request.QueryString("id")
filmid=request("filmid")
ftitle=request("title")
if Trim(id) <> "" and IsNumeric(id) then
Set RS = Server.CreateObject("ADODB.RecordSet")
sql = "select * from url where id = " & id
RS.Open sql, Conn, 3, 3
url=rs("url")
ddd=rs("filmid")
dddd=rs("title")
RS.Close
Set RS = nothing
end if
Set rs1 = Server.CreateObject("ADODB.Recordset")
strSQL ="SELECT * FROM film where id=" & ddd
rs1.open strSQL,Conn,3,3
rs1("hits")=rs1("hits")+1
ftype=rs1("runsystem")
rs1.update
rs1.Close
Set rs1 = nothing
Conn.Close
Set Conn = nothing
%>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<title>正在播放……</title>
<META http-equiv=Content-Type content="text/html; charset=unicode">
<META content="MSHTML 6.00.2462.0" name=GENERATOR></HEAD>
<SCRIPT LANGUAGE=javascript>
<!--
function Player_FullScreen() {
VodPlayer.SetFullScreen();
}
//-->
</SCRIPT>
</HEAD>
<BODY oncontextmenu="return false" onselectstart="return false" bgColor=black topMargin=0 leftMargin=0 rightMargin=0 bottomMargin=0>
<TABLE border=5 cellpadding=0 cellspacing=0 width=485 height=420 align="left">
<TR>
<TD align=center vAlign=middle height="320">
<%if len(ftype)=2 then%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td>
<object id=VodPlayer height=100% width=100% CLASSID=clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA HEIGHT=100% WIDTH=100%>
<param name=_ExtentX value=9604>
<param name=_ExtentY value=8149>
<param name=AUTOSTART value=1>
<param name=SHUFFLE value=0>
<param name=PREFETCH value=0>
<param name=NOLABELS value=0>
<param name=SRC VALUE="<%=url%>">
<param name=CONTROLS value=ImageWindow>
<param name=CONSOLE value=Clip1>
<param name=LOOP value=0>
<param name=NUMLOOP value=0>
<param name=CENTER value=0>
<param name=MAINTAINASPECT value=1>
<param name=BACKGROUNDCOLOR value=#000000>
</object>
</td> </tr>
<tr> <td height="27">
<object id=VodPlayer1 height=55 width=100% CLASSID="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" HEIGHT="55" WIDTH="100%">
<param name="_ExtentX" value="9604">
<param name="_ExtentY" value="1455">
<param name="AUTOSTART" value="1">
<param name="SHUFFLE" value="0">
<param name="PREFETCH" value="0">
<param name="NOLABELS" value="0">
<param name="CONTROLS" value="ControlPanel,StatusBar">
<param name="CONSOLE" value="Clip1">
<param name="LOOP" value="0">
<param name="NUMLOOP" value="0">
<param name="CENTER" value="0">
<param name="MAINTAINASPECT" value="1">
<param name="BACKGROUNDCOLOR" value="#000000">
<embed type="audio/x-pn-realaudio-plugin" CONSOLE="Clip1" CONTROLS="ControlPanel,StatusBar" HEIGHT="55" WIDTH="230" AUTOSTART="true"></object>
</td></tr>
</table><%else%>
<object id=VodPlayer classid=clsid:22D6F312-B0F6-11D0-94AB-0080C74C7E95 width=100% height=100%>
<param name="AutoRewind" value=1>
<param name="FileName" value=<%=url%>>
<!-- Display Controls -->
<param name="ShowControls" value="1">
<!-- Display Position Controls -->
<param name="ShowPositionControls" value="1">
<!-- Display Audio Controls -->
<param name="ShowAudioControls" value="1">
<!-- Display Tracker Controls -->
<param name="ShowTracker" value="-1">
<!-- Show Display -->
<param name="ShowDisplay" value="0">
<!-- Display Status Bar -->
<param name="ShowStatusBar" value="-1">
<!-- Diplay Go To Bar -->
<param name="ShowGotoBar" value="0">
<!-- Display Controls -->
<param name="ShowCaptioning" value="0">
<!-- Player Autostart -->
<param name="AutoStart" value=1>
<!-- Animation at Start -->
<param name="Volume" value="-30">
<param name="AnimationAtStart" value="0">
<!-- Transparent at Start -->
<param name="TransparentAtStart" value="0">
<!-- Do not allow a change in display size -->
<param name="AllowChangeDisplaySize" value="0">
<!-- Do not allow scanning -->
<param name="AllowScan" value="0">
<!-- Do not show contect menu on right mouse click -->
<param name="EnableContextMenu" value="0">
<!-- Do not allow playback toggling on mouse click -->
<param name="ClickToPlay" value="0">
</object><% end if%>
</TD>
</TR><tr><td height="27"><font size="2" color="#FFFFFF" > ■ 在播放RM格式电影时，如果希望改用realone播放器实现全屏播放，可在播放时对画面按鼠标右键菜单里选择“在REALONEPLAY中播放”即可</font></td>
</tr>
</TABLE>
<</////////////用于打开这个页面的代码如下：
<script language="javascript">
function popwin2(id)
{ window.open("review.asp?id="+id,"","height=500,width=550,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
</script>
<script language="javascript">
<!--
function Listen(ListenURL)
{
var Listen = window.open(ListenURL,"Listen","scrollbars=no,width=485,height=420");
return false;
}
function Listci(ListenURL)
{
var Listci = window.open(ListenURL,"listci","scrollbars=yes,width=300,height=380");
return false;
}
function addci(ListenURL)
{
var addci = window.open(ListenURL,"addci","scrollbars=yes,width=440,height=500");
return false;
}
function popwin2(id)
{ window.open("review.asp?id="+id,"","height=500,width=550,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
//-->
</script>
<%Option Explicit%>
<!--#include file="articleconn.asp"-->
<%
dim RS,sql,strSQL,rs1
dim url,id,ddd,dddd,ftype
id = Request.QueryString("id")
filmid=request("filmid")
ftitle=request("title")
if Trim(id) <> "" and IsNumeric(id) then
Set RS = Server.CreateObject("ADODB.RecordSet")
sql = "select * from url where id = " & id
RS.Open sql, Conn, 3, 3
url=rs("url")
ddd=rs("filmid")
dddd=rs("title")
RS.Close
Set RS = nothing
end if
Set rs1 = Server.CreateObject("ADODB.Recordset")
strSQL ="SELECT * FROM film where id=" & ddd
rs1.open strSQL,Conn,3,3
rs1("hits")=rs1("hits")+1
ftype=rs1("runsystem")
rs1.update
rs1.Close
Set rs1 = nothing
Conn.Close
Set Conn = nothing
%>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<title>正在播放……</title>
<META http-equiv=Content-Type content="text/html; charset=unicode">
<META content="MSHTML 6.00.2462.0" name=GENERATOR></HEAD>
<SCRIPT LANGUAGE=javascript>
<!--
function Player_FullScreen() {
VodPlayer.SetFullScreen();
}
//-->
</SCRIPT>
</HEAD>
<BODY oncontextmenu="return false" onselectstart="return false" bgColor=black topMargin=0 leftMargin=0 rightMargin=0 bottomMargin=0>
<TABLE border=5 cellpadding=0 cellspacing=0 width=485 height=420 align="left">
<TR>
<TD align=center vAlign=middle height="320">
<%if len(ftype)=2 then%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td>
<object id=VodPlayer height=100% width=100% CLASSID=clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA HEIGHT=100% WIDTH=100%>
<param name=_ExtentX value=9604>
<param name=_ExtentY value=8149>
<param name=AUTOSTART value=1>
<param name=SHUFFLE value=0>
<param name=PREFETCH value=0>
<param name=NOLABELS value=0>
<param name=SRC VALUE="<%=url%>">
<param name=CONTROLS value=ImageWindow>
<param name=CONSOLE value=Clip1>
<param name=LOOP value=0>
<param name=NUMLOOP value=0>
<param name=CENTER value=0>
<param name=MAINTAINASPECT value=1>
<param name=BACKGROUNDCOLOR value=#000000>
</object>
</td> </tr>
<tr> <td height="27">
<object id=VodPlayer1 height=55 width=100% CLASSID="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" HEIGHT="55" WIDTH="100%">
<param name="_ExtentX" value="9604">
<param name="_ExtentY" value="1455">
<param name="AUTOSTART" value="1">
<param name="SHUFFLE" value="0">
<param name="PREFETCH" value="0">
<param name="NOLABELS" value="0">
<param name="CONTROLS" value="ControlPanel,StatusBar">
<param name="CONSOLE" value="Clip1">
<param name="LOOP" value="0">
<param name="NUMLOOP" value="0">
<param name="CENTER" value="0">
<param name="MAINTAINASPECT" value="1">
<param name="BACKGROUNDCOLOR" value="#000000">
<embed type="audio/x-pn-realaudio-plugin" CONSOLE="Clip1" CONTROLS="ControlPanel,StatusBar" HEIGHT="55" WIDTH="230" AUTOSTART="true"></object>
</td></tr>
</table><%else%>
<object id=VodPlayer classid=clsid:22D6F312-B0F6-11D0-94AB-0080C74C7E95 width=100% height=100%>
<param name="AutoRewind" value=1>
<param name="FileName" value=<%=url%>>
<!-- Display Controls -->
<param name="ShowControls" value="1">
<!-- Display Position Controls -->
<param name="ShowPositionControls" value="1">
<!-- Display Audio Controls -->
<param name="ShowAudioControls" value="1">
<!-- Display Tracker Controls -->
<param name="ShowTracker" value="-1">
<!-- Show Display -->
<param name="ShowDisplay" value="0">
<!-- Display Status Bar -->
<param name="ShowStatusBar" value="-1">
<!-- Diplay Go To Bar -->
<param name="ShowGotoBar" value="0">
<!-- Display Controls -->
<param name="ShowCaptioning" value="0">
<!-- Player Autostart -->
<param name="AutoStart" value=1>
<!-- Animation at Start -->
<param name="Volume" value="-30">
<param name="AnimationAtStart" value="0">
<!-- Transparent at Start -->
<param name="TransparentAtStart" value="0">
<!-- Do not allow a change in display size -->
<param name="AllowChangeDisplaySize" value="0">
<!-- Do not allow scanning -->
<param name="AllowScan" value="0">
<!-- Do not show contect menu on right mouse click -->
<param name="EnableContextMenu" value="0">
<!-- Do not allow playback toggling on mouse click -->
<param name="ClickToPlay" value="0">
</object><% end if%>
</TD>
</TR><tr><td height="27"><font size="2" color="#FFFFFF" > ■ 在播放RM格式电影时，如果希望改用realone播放器实现全屏播放，可在播放时对画面按鼠标右键菜单里选择“在REALONEPLAY中播放”即可</font></td>
</tr>
</TABLE>
<</////////////用于打开这个页面的代码如下：
<script language="javascript">
function popwin2(id)
{ window.open("review.asp?id="+id,"","height=500,width=550,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
</script>
<script language="javascript">
<!--
function Listen(ListenURL)
{
var Listen = window.open(ListenURL,"Listen","scrollbars=no,width=485,height=420");
return false;
}
function Listci(ListenURL)
{
var Listci = window.open(ListenURL,"listci","scrollbars=yes,width=300,height=380");
return false;
}
function addci(ListenURL)
{
var addci = window.open(ListenURL,"addci","scrollbars=yes,width=440,height=500");
return false;
}
function popwin2(id)
{ window.open("review.asp?id="+id,"","height=500,width=550,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
//-->
</script>
...全文
请发表友善的回复…
发表回复
