asp上传文件代码

ASP里写文件上传，传文最坑人的传文不是代码本身，而是传文那些藏在细节里的坑。我去年接手一个老项目，传文客户说上传图片老失败，传文我打开代码一看，传文好家伙，传文用的传文还是经典的Form + Request.Form方式，连个enctype都没设对。传文你说这能不失败吗？传文

先说实话，ASP自带的传文Request.BinaryRead处理上传，简直是传文噩梦。你得自己解析二进制流，传文手动分割boundary，传文稍不留神就乱码。传文所以大多数人直接用第三方组件，比如LyfUpload或者ASPUpload。但组件要注册，服务器一换就抓瞎。我见过一个运维同事，因为服务器重装系统，忘了注册组件，整个上传功能瘫了三天。

要是你非要用纯ASP写，那就得做好心理准备。核心思路是利用ADODB.Stream对象读取请求体，然后按multipart/form-data的格式拆分数据。给你看个简化版本：

Dim stream, data, boundary boundary = Request.ServerVariables("CONTENT_TYPE") boundary = Mid(boundary, InStr(boundary, "boundary=") + 9) Set stream = Server.CreateObject("ADODB.Stream") stream.Type = 1 stream.Open stream.Write Request.BinaryRead(Request.TotalBytes) stream.SaveToFile Server.MapPath("temp.dat"), 2 stream.Close

这段代码只是把原始数据存成临时文件。接下来你要读这个文件，按boundary分割出每个字段。文件部分得用ADODB.Stream的CopyTo方法，把字节流写到目标文件。注意编码问题——文件名如果是中文，Request.BinaryRead读出来的字节是UTF-8还是GBK，得看客户端浏览器设置。我吃过这个亏，IE下传的"照片.jpg"，存下来变成乱码文件名。

更麻烦的是大文件。ASP默认没有超时控制，但IIS有。你传个500MB的视频，IIS默认AspScriptTimeout是90秒，带宽不够直接超时。得在代码里加Server.ScriptTimeout = 600，还得调IIS的maxRequestEntityAllowed，默认才200KB！对，你没看错，IIS6默认允许的请求体就200KB，超过直接返回404.13错误。很多人上传失败就是栽在这，网上搜半天代码，结果问题是服务器配置。

我个人的建议是，除非是维护老系统，否则别用纯ASP写上传。用ASP.NET的FileUpload控件，三行代码搞定。但你要是真被困在ASP环境里，那就老老实实用组件。免费的LyfUpload虽然老，但稳定，支持多文件，带进度条。收费的ASPUpload功能强，但授权费够买台服务器了。

最后说个安全细节。上传目录一定要设成禁止执行脚本，不然别人传个.asp文件上去，直接getshell。我见过一个小网站，上传目录没设权限，攻击者传了个小马，整个站都被人挂马了。你代码写得再完善，这个漏了全白搭。

ASP上传真不是个舒服的活，但理解了底层的二进制处理逻辑，以后转任何语言都顺手。毕竟上传的本质就是：解析HTTP请求，按boundary切分数据，把文件部分提出来存盘。剩下的都是工程问题。