ASP网站制作之asp上传下载

显示全部楼层 · 发表于 2015-1-16 22:16:43

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？立即注册

x

减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件，简单易用，无需专业技术支持。上传|下载一共3个文件
<--upfile.asp-->http://ktgirl001.0033.cn
<%OPTIONEXPLICIT%>
<%Server.ScriptTimeOut=5000%>

<html>
<head>
<title>文件上传</title>
</head>
<body>
 化境文件上传!<hrsize=1noshadowwidth=300align=left> 
<%
dimupload,file,formName,formPath,iCount
setupload=newupload_5xsoft创建上传工具
response.writeupload.Version&" "显现上传类的版本
ifupload.form("filepath")=""then失掉上传目次
HtmEnd"请输出要上传至的目次!"
setupload=nothing
response.end
else
formPath=upload.form("filepath")
在目次后加(/)
ifright(formPath,1)"/"thenformPath=formPath&"/"
endif
iCount=0
foreachformNameinupload.objForm列出一切form数据
response.writeformName&"="&upload.form(formName)&" "
next
response.write" "
foreachformNameinupload.objFile列出一切上传了的文件
setfile=upload.file(formName)天生一个文件工具
iffile.FileSize>0then假如FileSize>0申明有文件数据
file.SaveAsServer.mappath(formPath&file.FileName)保留文件
response.writefile.FilePath&file.FileName&"("&file.FileSize&")=>"&formPath&File.FileName&"乐成! "
iCount=iCount+1
endif
setfile=nothing
next
setupload=nothing删除此工具
HtmendiCount&"个文件上传停止!"
subHtmEnd(Msg)
setupload=nothing
response.write" "&Msg&"[<ahref=""javascript:history.back();"">前往</a>]</body></html>"
response.end
endsub
%>
</body>
</html>
ASP脚本是采用明文（plaintext）方式来编写的。

		自动登录	找回密码
密码			立即注册

[学习教程] ASP网站制作之asp上传下载

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子