×
大家都在搜

DBNT云维护技术支持 - 深圳市聚源科技有限公司

QQ登录

只需一步,快速开始

+发表新主题

更换5CTV--ASP--队长完美版

[复制链接]

更换5CTV--ASP--队长完美版

lomey 发表于 2007-7-24 06:46:06 浏览:  1591 回复:  13 [显示全部楼层] 回帖奖励 |倒序浏览 |阅读模式
点播电影的时候出现以下错误:

ADODB.Recordset 错误 '800a0cc1'

在对应所需名称或序数的集合中,未找到项目。

/oemui/vod/progshow.asp,行 23
网吧技术群:6351536
回复

使用道具 举报

更换5CTV--ASP--队长完美版

lomey 发表于 2007-7-24 06:46:06 浏览:  1591 回复:  13 [显示全部楼层] 回帖奖励 |倒序浏览 |阅读模式
点播电影的时候出现以下错误:

ADODB.Recordset 错误 '800a0cc1'

在对应所需名称或序数的集合中,未找到项目。

/oemui/vod/progshow.asp,行 23
网吧技术群:6351536
回复

使用道具 举报

kokomo kokomo 发表于 2007-7-24 07:47:30 显示全部楼层
好像这个不是完美版的!!
有点小问题 !!
回复 支持 反对

使用道具 举报

lomey
 楼主|
lomey 发表于 2007-7-24 08:18:30 显示全部楼层
请问楼上有好的版本吗?
网吧技术群:6351536
回复 支持 反对

使用道具 举报

kokomo kokomo 发表于 2007-7-24 08:54:52 显示全部楼层
回复 支持 反对

使用道具 举报

lomey
 楼主|
lomey 发表于 2007-7-24 09:01:04 显示全部楼层
噢。。用的就这个
网吧技术群:6351536
回复 支持 反对

使用道具 举报

yasa98 yasa98 发表于 2007-7-24 10:25:49 显示全部楼层
可能是你的数据库名称不支持。你是在原来已经有远古的情况下覆盖的模板吧?
[MOVE]一撇、一捺,是什么字?[/MOVE]
回复 支持 反对

使用道具 举报

江湖仔 江湖仔 发表于 2007-7-24 12:43:54 显示全部楼层
progshow.asp
文件第23行是什么代码?
回复 支持 反对

使用道具 举报

lomey
 楼主|
lomey 发表于 2007-7-24 20:27:28 显示全部楼层
引用第5楼yasa98于2007-07-24 10:25发表的  :
可能是你的数据库名称不支持。你是在原来已经有远古的情况下覆盖的模板吧?

是的,默认的模版没问题的~一覆盖就出现错误!
网吧技术群:6351536
回复 支持 反对

使用道具 举报

lomey
 楼主|
lomey 发表于 2007-7-24 20:29:00 显示全部楼层
引用第6楼江湖仔于2007-07-24 12:43发表的  :
progshow.asp
文件第23行是什么代码?
23行代码是:   
iTypeID            = rsData("Type_ID")

原代码如下:

<% szPath = "../../" %>
<!--#include file="../../common/dbcon.inc.asp" -->
<%
iUserType = 10
if Len(Session("UserPayMode")) > 0 then iUserType = Cint(Session("UserPayMode"))

iGameID = Encode(Request.QueryString("id"))
szSQL = "SELECT v_proginfo.*,v_pro_price.Price,LevelInfo.LevelName"
szSQL = szSQL & " FROM (v_proginfo LEFT JOIN LevelInfo ON v_proginfo.ProgLevel=LevelInfo.Level_ID)"
szSQL = szSQL & " INNER JOIN v_pro_price ON v_proginfo.Prog_ID=v_pro_price.Prog_ID"
szSQL = szSQL & " WHERE v_proginfo.Prog_ID=" & iGameID
rsData.Open szSQL,con,1,3
if not rsData.EOF then
    szProgName        = GetRecordGameName(rsData(&quotrogName"))
    szActor            = rsData("Actor")
    szJoinTime        = rsData("JoinTime")
    szGameLevel        = rsData("LevelName")
    szSynopsis        = rsData("Synopsis")
    szFileType        = rsData("FileType")
    szPhotoName        = rsData(&quothotoName")
    szPlayTime        = rsData(&quotlayTime")
    iPrice            = rsData(&quotrice")
    iWhere            = rsData("Wherefrom")
    iTypeID            = rsData("Type_ID")
    szMaxBitRate    = rsData("MaxBitRate")
    szAvgBitRate    = rsData("AvgBitRate")
    if IsNull(szSynopsis) then szSynopsis = ""

    szSQL = "SELECT TypeName FROM TypeInfo WHERE Type_ID=" & iTypeID
    set rsData_Type = Server.CreateObject("ADODB.Recordset")
    rsData_Type.Open szSQL,con,1,3
    if not rsData_Type.EOF then szTypeName = rsData_Type("TypeName")
    rsData_Type.Close

    if Len(szPlayTime) = 6 then
        szPlayTime = GetPlayTime(szPlayTime, szBitRate)

        if rsData(&quotlayTime") <> "000000" then
            bWinResize = 0
        else
            bWinResize = 1
        end if
    end if
end if
iClick = GetRealClick(GetProgramGUID(iGameID))
content=left(szActor,2)&""
%>
<HTML>
<HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link href="<% =szSkinDir %>main.css" type="text/css" rel="stylesheet">
</head>
<body leftmargin=0 topmargin=0  oncontextmenu='return false' ondragstart='return false' onselect='document.selection.empty()' oncopy='document.selection.empty()' onbeforecopy='return false' >
<a name=点播>
<TABLE cellSpacing=0 cellPadding=0 width=100% border=0 bgColor=#f6f6ee>
  <tr>
    <TD valign="top" width="205">
     <div align="center">
       <table width="100%" border="0" cellpadding="4" cellspacing="1" bgcolor="#CCCCCC">
        <tr>
         <td bgcolor="#FFFFFF">
         <% if Len(rsData(&quothotoName")) > 0 and Mid(rsData(&quothotoName"), 1, 1) <> "*" then %>
         <img src="/<% =URLEncode(rsData(&quothotoName")) %>" width="200" height="280" border="0" style="cursor:hand;" onClick="opence('opence.asp?fn=<% =URLEncode(rsData(&quothotoName")) %>')">
          <%else%>
          <img src="<% =szPath %>images/photo.jpg" width="200" height="280" border="0">
         <% end if %>
         <%rsData.Close%></td>
        </tr>
    </table></div></td>
    <td> </td>
    <td vAlign="top"><TABLE cellSpacing="0" cellPadding="1" width="460" border="0">                           
                                    <TR>                           
                                      <TD colspan="2" height="25" style="font-size:24px;font-weight:bold"><strong><font color="#ff6600"><b>《<% =szProgName %>》</b></font></strong></TD>                           
                                    </TR>
                                    <TR>
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>
                                    </TR>
                                    <TR>
                                      <TD width="69"><STRONG>主要演员: </STRONG></TD>
                                      <TD width="387"><% =szActor %></TD>
                                    </TR>
                                    <TR>
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>
                                    <TR>
                                      <TD><STRONG>发布时间: </STRONG></TD>
                                      <TD><% =Year(szJoinTime) %> - <% =Month(szJoinTime) %> - <% =Day(szJoinTime) %></TD>                           
                                    </TR>
                                    <TR>
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>
                                    <TR>
                                      <TD><STRONG>影片类别: </STRONG></TD>                           
                                      <TD><%=szTypeName %></TD>
                                    </TR>                           
                                    <TR>                           
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>
                                    <TR>
                                      <TD><STRONG>地区分类:</STRONG></TD>                           
                                      <TD vAlign="top">
                    <% if iwhere = 1 then%>大陆地区
                    <%elseif iwhere = 2 then%>港台地区
                    <%elseif iwhere = 3 then%>日韩地区
                    <%elseif iwhere = 4 then%>欧美地区
                    <%elseif iwhere = 5 then%>其它地区
                    <%end if %></FONT></TD>                           
                                    </TR>                           
                                    <TR>                           
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>
                                    <TR>                           
                                      <TD><STRONG>影片类型: </STRONG></TD>                           
                                      <TD><b><% =szFileType %></b> 格式</TD>                           
                                    </TR>                           
                                    <TR>                           
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>
                                    <tr>
                                      <td><STRONG>最大码流: </STRONG></td>
                                      <td><% =szMaxBitRate %> </td>
                                    </tr>
                                    <TR>                           
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>
                                    <TR>                           
                                      <TD><STRONG>平均码流: </STRONG></TD>                           
                                      <TD><% =szAvgBitRate %> Kbps</TD>                           
                                    </TR>                           
                                    <TR>
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>                           
                                    <TR>
                                      <TD><STRONG>节目长度: </STRONG></TD>                           
                                      <TD vAlign="top"><% =szPlayTime %></TD>                           
                                    </TR>                           
                                    <TR>
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>                           
                                    <TR>
                                      <TD><STRONG>影片等级: </STRONG></TD>                           
                                      <TD vAlign="top"><% =szGameLevel %></TD>                           
                                    </TR>                           
                                    <TR>
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>                           
                                    <TR>
                                      <TD><STRONG>所需影币:</STRONG></TD>                           
                                      <TD vAlign="top"><% if iPrice = 0 then Response.Write"免费观赏" else Response.Write iPrice & " 影币 / 集" end if %></FONT></TD>                           
                                    </TR>                           
                                    <TR>                           
                                      <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>                           
                                    </TR>                           
                                    <TR>                           
                                      <TD><STRONG>人气指数: </STRONG></TD>                           
                                      <TD><% =iClick%></TD>                           
                                    </TR>                           
                                       <TD colSpan="2"><IMG height="5" src="<% =szSkinDir %>dtl_leftdot.gif" width="445"></TD>
                                    </TR>
                              </TABLE></td>
  </tr>
  <tr>
    <td colspan="3">
<br>
      <TABLE cellSpacing=0 cellPadding=0 width="99%" border=0 align='center'>
        <TR>
          <TD class=style12 bgColor=#d9ceb8 height=25><font color="#808080"><b>   播放列表:</b></font>
   <a onclick="CheckPlayer()" title="播放器下载" style="cursor:hand"><font color="#FF0000">观看影片务必下载播放器</font></a>
   <a onclick="openError('SendError.asp?ProgName=<% =szProgName %>')" title="影片报错" style="cursor:hand"><font color="#FF0000">向管理员报告该片有错误</font></a></TD>
         </TR>
     </TABLE>
          <TABLE cellSpacing=0 cellPadding=4 width=100% align=center border=0>
            <TBODY>
              <tr>
                <TD>
<table  border='0'>
<tr align='center'>
<%
szProg_GUID = GetProgramGUID(iGameID)
           
szSQL = "SELECT Part_No,Prog_ID,Type_ID,Click FROM v_proginfo WHERE Prog_GUID='" & szProg_GUID & "' ORDER BY Part_No ASC"
rsData.Open szSQL,con,1,3

if not rsData.EOF then
szTypeID=rsData("Type_ID")
    if rsData.RecordCount = 1 then
%>
        <td height='23'>
        <a style="cursor:hand;" title='已被点播<% =rsData("Click") %> 次' onClick="popup('../player.asp?id=<% =rsData(&quotrog_ID") %>',410,390,<% =bWinResize %>,0,0);">            
        <table width=70 border=0 cellpadding=3 cellspacing=1 bgcolor=#999999><tr style='cursor:hand;'><td bgcolor=#FFFFFF align=center>观看影片</table></td>
<%  
    elseif rsData.RecordCount = 2 then  
        iCount = 1  
        do while not rsData.EOF  
            szShow = szShow & "<td height='23'><a style='cursor:hand' title='已被点播 "  
            szShow = szShow & rsData("Click") & " 次' onClick=""popup('../player.asp?id="  
            szShow = szShow & rsData("Prog_ID") & "',410,390," & bWinResize & ",0,0);""> "  
            if iCount = 1 then szShow = szShow & "<table width=70 border=0 cellpadding=3 cellspacing=1 bgcolor=#999999><tr style='cursor:hand;'><td bgcolor=#FFFFFF align=center>上集</table>"  
            if iCount = 2 then szShow = szShow & "<table width=70 border=0 cellpadding=3 cellspacing=1 bgcolor=#999999><tr style='cursor:hand;'><td bgcolor=#FFFFFF align=center>下集</table>"  
            szShow = szShow & " </a></td>" & Chr(13)  
            iCount = iCount + 1  
            rsData.MoveNext  
        loop  
        Response.Write szShow  
    elseif rsData.RecordCount = 3 then  
        iCount = 1  
        do while not rsData.EOF  
            szShow = szShow & "<td align='center' height='23'><a style='cursor:hand' title='已被点播 "  
            szShow = szShow & rsData("Click") & " 次' onClick=""popup('../player.asp?id="  
            szShow = szShow & rsData("Prog_ID") & "',410,390," & bWinResize & ",0,0);""> "  
            if iCount = 1 then szShow = szShow & "<table width=70 border=0 cellpadding=3 cellspacing=1 bgcolor=#999999><tr style='cursor:hand;'><td bgcolor=#FFFFFF align=center>上集</table>"  
            if iCount = 2 then szShow = szShow & "<table width=70 border=0 cellpadding=3 cellspacing=1 bgcolor=#999999><tr style='cursor:hand;'><td bgcolor=#FFFFFF align=center>中集</table>"  
            if iCount = 3 then szShow = szShow & "<table width=70 border=0 cellpadding=3 cellspacing=1 bgcolor=#999999><tr style='cursor:hand;'><td bgcolor=#FFFFFF align=center>下集</table>"  
            szShow = szShow & " </a></td>" & Chr(13)  
            iCount = iCount + 1  
            rsData.MoveNext  
        loop  
        Response.Write szShow  
    else  
        iCount = 0  
        do while not rsData.EOF  
            if iCount mod 10 = 0 then szShow = szShow & "</tr><tr>"  
            szShow = szShow & "<td align='center' height='23'><a style='cursor:hand' title='已被点播 "  
            szShow = szShow & rsData("Click") & " 次' onClick=""popup('../player.asp?id="  
            szShow = szShow & rsData("Prog_ID") & "',410,390," & bWinResize & ",0,0);""> "  
            szShow = szShow & "<table width=67 border=0 cellpadding=3 cellspacing=1 bgcolor=#999999><tr style='cursor:hand;'><td bgcolor=#FFFFFF align=center>" & GetProgramName(rsData("Prog_ID")) & "</table></a></td>" & Chr(13)
            iCount = iCount + 1  
            rsData.MoveNext  
        loop  
        Response.Write szShow  
    end if  
    rsData.Close  
end if  
%></tr></table></td></tr></tbody></table>
        </td>
  </tr>
  <tr>
    <td colspan="3">
        <TABLE cellSpacing=0 cellPadding=0 width="99%" border=0 align='center'>
          <TBODY>
            <TR><TD bgColor=#d9ceb8 height=25><font color="#808080"><b>   影片简介:</b></font>
            </TD>
        </TR></TBODY>
    </TABLE>
    <TABLE cellSpacing=0 cellPadding=0 width="99%" align=center border=0>     
        <TBODY>     
        <TR>     
          <TD height=40 align="center" width="97%">     
            <DIV align=left><span class="menu">    <% =Replace(Replace(szSynopsis, vbCrLf, "<br>"), Chr(32), " ") %></span></DIV></TD>
        </TR>
    </TBODY>
</TABLE>
    </td>
  </tr>
  <tr>
    <td colspan="3">
        <TABLE cellSpacing=0 cellPadding=0 width="99%" border=0 align='center'>
          <TBODY>
            <TR><TD bgColor=#d9ceb8 height=25><font color="#808080"><b>   相关影片:</b></font></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=2 width=98% border=0>
                          <TBODY>
                            <TR>
                              <TD vAlign=top width="31%" rowSpan=2>
<TABLE cellSpacing=0 cellPadding=0 align=center border=0>
                                  <TBODY>
                                    <TR>
                                      <TD bgColor=#cccccc>
<%
szSQL = "SELECT TOP 7 v_pro_price.Price,v_proginfo.Prog_ID,v_proginfo.ProgName,v_proginfo.photoname,v_proginfo.Actor "
szSQL = szSQL & "FROM v_proginfo,v_pro_price "
szSQL = szSQL & "WHERE v_proginfo.Prog_ID=v_pro_price.Prog_ID AND v_proginfo.Part_No=1 AND v_proginfo.Actor LIKE '%" & content & "%'"
szSQL = szSQL & "ORDER BY v_proginfo.Prog_ID DESC"
rsData.Open szSQL,con,1,3
i=0  
do while not rsData.EOF
%>
                                        <TABLE cellSpacing=1 cellPadding=3 width="100%" border=0>
                                          <TBODY>
                                            <TR>
                                              <TD vAlign=top align=middle bgColor=#ffffff><DIV align=center>
                                                  <% if rsData("photoname") <> "*" then %>
                                                  <a style="cursor:'hand'" href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播">
                                                  <img src="/<% =URLEncode(rsData("photoname")) %>" name="img" width="252" height="360" border="0"></a>
                                                  <%else%>
                                                  <a style="cursor:'hand'" href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播">
                                                  <img src="<%=szPath %>images/photo.jpg" width="252" height="360" border=0 align="middle"></a>
                                                  <% end if %>
                                                  </DIV></TD>
                                            </TR><tr><td vAlign=top align=middle bgColor=#ffffff><div align="center"><span class=menu><strong><font color=#000000>
                        <a href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播"><% =GetLeftString(GetRecordGameName(rsData("ProgName")), 12) %></a></font></strong></span></div></td></tr> </TBODY>
                                        </TABLE></TD>
                                    </TR>
                                  </TBODY>
                                </TABLE>
<%
i=i+1  
rsData.MoveNext   
if i>=1 then exit do   
loop
%>                              </TD>
                              <TD vAlign=top> <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
                                  <TBODY>
                                    <TR>  
<%if not rsData.eof  then
do while not rsData.eof
%>
                                      <TD vAlign=top align=middle width=161> <TABLE cellSpacing=0 cellPadding=0 width=122 align=center border=0>
                                          <TBODY>
                                            <TR>  
                                              <TD width=118 bgColor=#cccccc> <TABLE cellSpacing=1 cellPadding=3 width="100%" border=0>
                                                  <TBODY>
                                                    <TR>  
                                                      <TD vAlign=top bgColor=#ffffff>  
                                                        <TABLE width=10 border=0 align="center" cellPadding=0 cellSpacing=0>
                                                          <TBODY>
                                                            <TR>  
                                                               <TD>
                                                  <% if rsData("photoname") <> "*" then %>
                                                  <a style="cursor:'hand'" href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播">
                                                  <img src="/<% =URLEncode(rsData("photoname")) %>" name="img" width="125" height="165" border="0"></a>
                                                  <%else%>
                                                  <a style="cursor:'hand'" href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播">
                                                  <img src="<%=szPath %>images/photo.jpg" width="125" height="165" border=0 align="middle"></a>
                                                  <% end if %> </TD>  
                                                            </TR>  
                                                            <TR>   
                                                              <TD class=font4 vAlign=bottom align=middle height=20>
                                <a href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播"><% =GetLeftString(GetRecordGameName(rsData("ProgName")), 6) %></a></TD>  
                                                            </TR>  
                                                          </TBODY>  
                                                        </TABLE></TD>  
                                                    </TR>  
                                                  </TBODY>  
                                                </TABLE></TD>  
                                            </TR>  
                                          </TBODY>  
                                        </TABLE></TD>  
<%  
i=i+1  
rsData.movenext  
if i>=4 then exit do  
loop  
end if  
%>  
                                    </TR>  
                                  </TBODY>  
                                </TABLE></TD>  
                            </TR>  
                            <TR>   
                              <TD vAlign=top align=middle> <table width="100%"  border="0" cellspacing="0" cellpadding="0">  
                        <tr>  
<%if not rsData.eof then  
do while not rsData.eof  
%>  
                          <td><TABLE cellSpacing=0 cellPadding=0 width=122 align=center border=0>
                                          <TBODY>
                                            <TR>  
                                              <TD width=118 bgColor=#cccccc> <TABLE cellSpacing=1 cellPadding=3 width="100%" border=0>
                                                  <TBODY>
                                                    <TR>  
                                                      <TD vAlign=top bgColor=#ffffff>  
                                                        <TABLE width=10 border=0 align="center" cellPadding=0 cellSpacing=0>
                                                          <TBODY>
                                                            <TR>  
                                                               <TD>
                                                  <% if rsData("photoname") <> "*" then %>
                                                  <a style="cursor:'hand'" href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播">
                                                  <img src="/<% =URLEncode(rsData("photoname")) %>" name="img" width="125" height="165" border="0"></a>
                                                  <%else%>
                                                  <a style="cursor:'hand'" href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播">
                                                  <img src="<%=szPath %>images/photo.jpg" width="125" height="165" border=0 align="middle"></a>
                                                  <% end if %> </TD>  
                                                            </TR>  
                                                            <TR>   
                                                              <TD class=font4 vAlign=bottom align=middle height=20>
                                <a href="<% =szPath %>oemui/vod/progshow.asp?ID=<% =rsData("Prog_ID") %>#点播"><% =GetLeftString(GetRecordGameName(rsData("ProgName")), 6) %></a></TD>  
                                                            </TR>  
                                                          </TBODY>  
                                                        </TABLE></TD>  
                                                    </TR>  
                                                  </TBODY>  
                                                </TABLE></TD>  
                                            </TR>  
                                          </TBODY>  
                                        </TABLE></td>  
<%  
i=i+1  
rsData.movenext  
if i>=7 then exit do  
loop  
end if  
rsData.close  
set rsData=nothing  
%>  
                          </tr>  
                      </table></TD>  
                            </TR>  
                          </TBODY>  
                        </TABLE></td></tr></table>
    </td>
  </tr>
  <tr>
    <td height=1 align=left vAlign=top><iframe src="<% =szPath %>oemui/comment/comment_list.asp?ProgType=2&ProgID=<% =iGameID %>" width="98%" height="200" frameborder="0" scrolling="no"></iframe></td>
  </tr>
</table>
</BODY></HTML>
<script language="JScript">              
document.body.onload = ResizeFrame;
function ResizeFrame()
{
    parent.document.all.main.height = document.body.scrollHeight;
}

function opence(htm)
{
    var iWinLeft, iWinTop;
    iWinLeft    = (screen.Width - 640) / 2;
    iWinTop    = (screen.Height - 480) / 2;

    window.open(htm, "_blank", "toolbar=no,directories=no,status=no,menubar=no,resizable=no,scrollbars=no, location=no ,width=350 ,height=470,left=" + iWinLeft + ",top=" + iWinTop);
    return;
}

function openError(Url)
{
    var iWinLeft, iWinTop;
    iWinLeft    = (screen.Width - 640) / 2;
    iWinTop    = (screen.Height - 480) / 2;

    window.open(Url,"_blank","toolbar=no,directories=no,status=no,menubar=no,resizable=no,scrollbars=no,location=no,width=390,height=195,left=" + iWinLeft + ",top=" + iWinTop);
    return;
}

function CheckPlayer()
{
    try
    {
        var oPlayerAx = new ActiveXObject("VGPlayer.WebVGPlayer.1");
    }
    catch(e)
    {
        window.location.href = "/webmedia/download/WebPlayer.exe";
        return;
    }

    alert("\\n播放器已经正确安装!");
}
</script>
<!--#include file="../../common/dbend.inc.asp" -->
<!--#include file="../../common/popwin.inc.asp" -->
网吧技术群:6351536
回复 支持 反对

使用道具 举报

12下一页
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

青出于蓝(04级)

9

主题

195

帖子

202

积分

青出于蓝(04级)

Rank: 4

青出于蓝(04级)

9

主题

195

帖子

202

积分

青出于蓝(04级)

Rank: 4

DBNT云维护技术支持 - 深圳市聚源科技有限公司 ( 粤ICP备17103197号-2 )

© 2013-2016 Comsenz Inc. Powered by Discuz! X3.2