[会员中心]  [发布文章][发布软件]  [中文繁體]

文章·资料  电脑软件  手机软件  网站源码 电脑·手机·网络学习话题娱乐故事 文化·历史国学典籍法律法规 操作系统网络办公·文件音频视频图形图像 硬件·驱动程序行业教学学习编程游戏 安卓苹果鸿蒙 其他 ASPASP.NETJSPPHP HTML·CSS·JavaScript

本 站 搜 索 文章 软件 [选项] 文章类别： [全部]电脑·手机·网络话题故事文化·历史娱乐学习法律·法规国学典籍 搜索选项： 文章编号 文章标题 文章作者 文章来源 相关链接 关键字词 文章标签 文章内容 软件类别： [全部]操作系统网络办公·文件音频视频图形图像行业编程教学学习游戏硬件·驱动程序安卓系统苹果系统鸿蒙系统其他系统HTML·CSS·JavaScriptASPJSPPHPASP.NET 搜索选项： 软件编号 软件名称 软件作者 软件来源 相关链接 关键字词 软件标签 软件简介

发 送 文 章 ASP实现文件直接下载 〖评论()〗〖留言〗〖收藏〗  收信地址 填写收信人的电子邮箱 邮件主题 填写邮件主题 邮件内容 在IE进行文档链接时,如果遇到OLE支持的文档,IE会自动调用相应程序打开它,有时候这种功能并不是我们所需的，虽然我们可以提醒用户用鼠标右键--目标另存为....命令来下载文档，但这样毕竟不太友好，本文描述了利用FSO及Stream方法实现IE直接下载文档。 主程序代码如下： -------------------------------------------------------------------------------- 定义所有需要使用的变量 DimstrFilename,S,Fso,F,intFilelength strFilename=Server.MapPath(Trim(Request(File))) Response.Buffer=True Response.Clear SetS=Server.CreateObject(ADODB.Stream) S.Open S.Type=1 OnErrorResumeNext SetFso=Server.CreateObject(Scripting.FileSystemObject) IfNotFso.FileExists(strFilename)Then Response.Write(h1Error:/h1strFilename你要下载的文件不存在！p) Response.End EndIf SetF=Fso.GetFile(strFilename) intFilelength=F.Size获取文件大小 S.LoadFromFile(strFilename) IfErrThen Response.Write(h1Error：/h1UnknownError！p) Response.End EndIf Response.AddHeaderContent-Disposition,attachment;filename=F.name Response.AddHeaderContent-Length,intFilelength Response.CharSet=GB2312 Response.ContentType=application/octet-stream Response.BinaryWriteS.Read Response.Flush S.Close SetS=Nothing<br /><br />文章网址：<a href="https://dangbai.cn/Article.asp?ID=10001286" target="_blank">https://dangbai.cn/Article.asp?ID=10001286</a> 填写邮件内容 发信地址 填写发信人的电子邮箱 邮件签名 填写邮件签名  验证码   填写验证码，单击刷新验证码    程序执行中，请稍候... 发送协议 ·欢迎使用本站在线文章发送系统。 ·不得使用本站在线发送邮件系统发送垃圾邮件、广告邮件。 ·如果收信人地址或其服务器出现错误，可能无法成功发送。 ·如果有什么问题，或者意见建议，请联系［网站管理员］。

当百网   本站使用【啊估文章软件站】网站系统    〖网站管理员留言簿〗