在线用户    站点地图 技术论坛 文档中心 站点导航 资源下载 语言参考 教程专题 站点统计 业务项目 使用帮助
您的位置
MSDN参考新加了CSS2参考,全中文,制作精良。245k下载。           新加了sxf_sxf推荐的"动态网页专家指导" 下载!          新加了lsg2002lsg推荐的"ASP.NET高级编程(PDF)" 下载!          新加了DHTML代码预览!!,功能强大哦!欢迎试用          新加了网友lincong为大家提供的SQL Server 2000 程序员指南,有点大,但同时也就说明内容全咯!           新加了网友ibra为大家提供的北大的JAVA课件,很适合初学者入门           新加了一个java的连接缓冲池代码示例           新加了人月神话电子版下载!软件工程巨著哦~~           更新了评分标准,引入了“专家分”概念,相信可以更好的激励大家的学习!详情请看“使用帮助”           新加了由网友GGG提供的“IIS超级管理手册”,值得一看哦!(虽然我没看过 :P )           新加了“英雄榜”,欢迎测试!           “无组件上传·从原理剖析到实践”已经全部完成,源码全部开放,有兴趣的朋友请到文档中心一探究竟。  您的位置  首页>技术论坛>ASP>F0131474 在同一窗口中打开页面中的链接 在新窗口中打开页面中的链接 将ASPCHINA设为首页 将ASPCHINA加入书签    
 LOGIN HERE
用户:
密码: 忘记密码
记住密码 用户注册 游客进入

论坛首页
|--web开发
   |--ASP
   |--JSP
   |--ASP.net
   |--DHTML
   |--RUBY
|--软件开发
   |--C++
      |--Code here
   |--JAVA
   |--VB
   |--Delphi
   |--XML
|--.net技术
   |--C#
   |--VB.net
|--Yup开发组
|--站务&投诉
   |--站长专区
|--硬件&网络
|--休息室
|--数据库技术
 进入精华区 我要发言



 请高手大哥改一段丑陋的代码。back to ASP forum  
作者:ac_cheng,5级分数:30
日期:2004/10/21 21:05:00类别:ASP, 技术问题
回复:9次浏览:2052次
状态:尚未结贴

=============观看视频的面面:see.asp===================
<html>
<head>
<title>在线视频</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<embed src="play.asp?id=<%=Id%>" width="460" height="400" autostart="true"></embed>
</body>
</html>

========================play.asp========================
<%
' 由id从数据库中读出视频文件名,代码省略
' FileName为视频文件名
dim St
set St = Server.CreateObject("ADODB.Stream")
St.Type = 1
St.open
St.LoadFromFile Server.MapPath("MovieFolder/" & FileName)
Response.ContentType = "APPLICATION/OCTET-STREAM"
Response.AddHeader "Content-Disposition","attachment;filename=" & FileName
Response.BinaryWrite St.read()
set St = nothing
%>

为什么不能观看视频?

reply[F0131474]
 



 
 re [1] 请高手大哥改一段丑陋的代码。ASP forum  
- sxf_sxf04-10-22 11:18  

有什么错误提示吗?

reply[F0131490]
 



 
 re [2] 请高手大哥改一段丑陋的代码。ASP forum  
- ac_cheng04-10-22 14:44  

就一个框,什么也看不见,
当单击它时,出现标题为“定位对象句柄时出错”的对话框,对话框内容为:您试图打开的对象类型没有可用的查看程序,以下信息可用于该对象:
对象的地址:http://localhost/play.asp?id=8
内容类型:APPLICATION/OCTET-STREAM
查看程序的位置:Microsoft ActiveX Gallery
是否在这一位置下载这种对象类型的查看程序?

========================================
有谁知道,请帮忙指点一下,我认为是 Response.ContentType = "APPLICATION/OCTET-STREAM" 这一行代码有问题。

reply[F0131496]
 



 
 re [3] 请高手大哥改一段丑陋的代码。ASP forum  
- sxf_sxf04-10-22 19:10  

你上传文件的时候获取的有视频文件的类型吧。用那个,不要用APPLICATION/OCTET-STREAM

reply[F0131500]
 



 
 re [4] 请高手大哥改一段丑陋的代码。ASP forum  
- ac_cheng04-10-22 20:07  

有,那该怎么写呀?帮我举个例子,好吗?
哪里有这样的文档可以参考呀?
一、Response.BinaryWrite St.read()

二、while not St.EOS
    Response.BinaryWrite St.Read(1024 * 64)
wend

“一”和“二”有什么区别?在线观看用哪个?下载我用的是第“一”个,可以正常下载。

reply[F0131501]
 



 
 re [5] 请高手大哥改一段丑陋的代码。ASP forum  
- sxf_sxf04-10-23 11:49  

把这一句Response.ContentType = "APPLICATION/OCTET-STREAM"等号右边的值改为你获取的contenttype值。
另你说一和二基本没什么区别。只是二的语法更严谨些。如果文本流存在才执行Response.BinaryWrite St.Read(1024 * 64)这个语句

reply[F0131511]
 



 
 re [6] 请高手大哥改一段丑陋的代码。ASP forum  
- ac_cheng04-10-23 13:00  

还是有错。请看图片:
http://www.love199.net/error.jpg

reply[F0131516]
 



 
 re [7] 请高手大哥改一段丑陋的代码。ASP forum  
- sxf_sxf04-10-23 15:57  

看不到。如果这种用法你用不好的话可以换成别种。视频点播无外乎两种,一种是mediaplayer、另一种是realplayer,这两种播放器都有播放代码,直接用那个。可以在网上找,很容易找到的

reply[F0131518]
 



 
 re [8] 请高手大哥改一段丑陋的代码。ASP forum  
- ac_cheng04-10-23 17:57  

我的影片格式全部是WMV的,所以我用Media Player.
=====================see.asp======================
<object id="nstv" classid="CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6"  width="400" height="350" codebase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701standby=Loading Microsoft? Windows Media? Player components... type="application/x-oleobject">
<param name='URL' value='play.asp?id=<%=Id%>'>
<PARAM NAME='UIMode' VALUE='full'>
<PARAM NAME='AutoStart' VALUE='true'>
<PARAM NAME='Enabled' VALUE='true'>
<PARAM NAME='enableContextMenu' VALUE='false'>
<param name='WindowlessVideo' VALUE='true'>
</object>

=============================play.asp======================
dim St
set St = Server.CreateObject("ADODB.Stream")
St.Type = 1
St.open
St.LoadFromFile Server.MapPath("MovieFile/" & FileName)
Response.ContentType = "APPLICATION/OCTET-STREAM"
Response.AddHeader "Content-Disposition","attachment;filename=" & FileName
Response.BinaryWrite St.read()
Response.Flush()
St.Close()
set St = nothing

我不知道WMV格式的Response.ContentType类型是什么。
但这样能观看,就是滑块不能拖动,非得从头看到尾。好像是一边下载一边播放。一般的电影都是先缓冲到100%,然后才播放。
有没有什么办法启动本地机播放器播放而不将视频嵌入WEB页面中?

reply[F0131523]
 



 
 re [9] 请高手大哥改一段丑陋的代码。ASP forum  
- miles04-10-28 08:19  

一般也不是缓冲100%,而是缓冲几十秒。

文档中心有一个总结播放媒体的文章,你可以看看。如果碰到不知道的contenttype,可以去google搜索一下。

试试看
video/x-ms-asf

video/x-ms-wmv

reply[F0131695]
 



您的位置
  (c)2000-2021 Yup Studio, all rights reserved.  
169.9219