| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 987 人关注过本帖
标题:怎样实现网页中下载一个视频,而不是将该视频打开
取消只看楼主 加入收藏
vivi123
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-8-8
收藏
 问题点数:0 回复次数:2 
怎样实现网页中下载一个视频,而不是将该视频打开

各位,我在网页中要提供一个下载视频的功能,但现在遇到了一个问题
用http形式的话,点击超链接后就直接在播放器中播放该视频了,只能通过点击右键来实现
请问一下优美哟其他的方法来实现这个功能啊
我在网页中是这样写的
<a href="http://...../aa.wmv">下载</a>
是不是不能这样写啊??

[此贴子已经被作者于2006-8-8 17:53:13编辑过]

搜索更多相关主题的帖子: 视频 网页 
2006-08-08 17:43
vivi123
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-8-8
收藏
得分:0 
我在网上搜到一段代码,是用asp实现直接下载的,但有问题,能帮我看看吗?
&lt;%
'定义所有需要使用的变量
Dim strFilename,S,Fso,F,intFilelength
Filename =Server.MapPath(Trim(Request("File")))      
Response.Buffer = True   
Response.Clear   
Set S = Server.CreateObject("ADODB.Stream")   
S.Open   
S.Type  =  1   
On  Error  Resume  Next   
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
strFilename=Filename
If Not Fso.FileExists(strFilename) Then
Response.Write("&lt;h1&gt;Error:&lt;/h1&gt;"&amp;strFilename&amp;"你要下载的文件不存在!&lt;p&gt;")   
Response.End   
End  If

Set F = Fso.GetFile(strFilename)   
intFilelength = F.Size '获取文件大小
S.LoadFromFile(strFilename)   
If Err Then   
Response.Write("&lt;h1&gt;Error: &lt;/h1&gt;Unknown Error!&lt;p&gt;")   
Response.End
End If  

Response.AddHeader "Content-Disposition","attachment;filename="&amp;F.name   
Response.AddHeader "Content-Length",intFilelength   
Response.CharSet = "GB2312"   
Response.ContentType = "application/octet-stream"   
Response.BinaryWrite  S.Read   
Response.Flush        
S.Close   
Set S = Nothing
%&gt;
2006-08-09 09:04
vivi123
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-8-8
收藏
得分:0 
我从另一个页面传了File的值过来,但要下载的文件只能是和该网页在同一目录下,而且那个文件本来是有8兆多的,只能下载300多k
我把Filename =Server.MapPath(Trim(Request("File")))这句变为Filename =Request("File")以后,直接传了文件所在的路径
结果显示的是要下载的文件不存在
请问是哪里没对啊?
2006-08-09 09:08
快速回复:怎样实现网页中下载一个视频,而不是将该视频打开
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.060945 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved