ASP无组件上载,带进度条,多文件上载
Example.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="SundyUpload.asp"-->
<%
此例子文档编码都是UTF-8,如果是其他编码的系统，请将编码转换为相应的编码，不然表单获取数据可能会乱码
Dim objUpload,opt
Dim xml(标准化越来越近了)Path
Dim fileFormName,objFile,counter
opt = request.QueryString("opt")
If opt = "Upload" Then
xml(标准化越来越近了)Path = Server.MapPath(request.QueryString("xml(标准化越来越近了)Path"))将虚拟路径转换为实际路径
Set objUpload=new SundyUpload 建立上传对象
objUpload.UploadInit xml(标准化越来越近了)Path,"utf-8"
counter = 1
Response.Write("普通表单：" & objUpload.Form("normalForm") & "<BR><BR>")获取表单数据
For Each fileFormName In objUpload.objFile
Set objFile=objUpload.objFile(fileFormName)
fileSize = objFile.FileSize
strTemp= objFile.FilePath
Response.Write strTemp
fileName = mid(strTemp,InStrRev(strTemp, "")+1)
If fileSize > 0 Then
Response.Write("File Size:" & fileSize & "<BR>")
Response.Write("File Name:" & objFile.FilePath & "<BR>")
Response.Write("File Description:" & objUpload.Form("fileDesc" & counter) & "<BR><BR>")
objFile.SaveAs Server.MapPath(".") & "upload" & fileName
Response.Write "Save at: "&Server.MapPath(".") & "upload" & fileName & "<br><br>"
End If
counter = counter + 1
Next
End If
为上载进度条数据文件（xml(标准化越来越近了)文件指定虚拟路径）
最好是随机的，因为可能多个人同时上载，需要不同的进度数据
这个路径需要在提交的时候传入上载组件中，以便在上载过程中更改进度数据
客户端使用Javascript来读取此xml(标准化越来越近了)文件，显示进度
xml(标准化越来越近了)Path = "upload/" & Timer & ".xml(标准化越来越近了)"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Sundy Upload Progress Bar Example</title>
<script language="javascript">
function chkFrm(){
var objFrm = document.frmUpload;
if (objFrm.file1.value=="" && objFrm.file2.value==""){
alert("请选择一个文件");
objFrm.file1.focus();
return false;
}
objFrm.action = "Example.asp?opt=Upload&xml(标准化越来越近了)Path=<%=xml(标准化越来越近了)Path%>";
startProgress(<%=xml(标准化越来越近了)Path%>);//启动进度条
return true;
}
</script>
</head>
<body>
<form name="frmUpload" method="post" action="Example.asp" enctype="multipart/form-data" onSubmit="return chkFrm()">
普通表单：<BR><input type="text" name="normalForm" size="40"><BR><BR>
文件1：<BR>
<input type="file" name="file1" size="40"></br>
<input type="text" name="fileDesc1" size="30"><BR><BR>
文件2：<BR>
<input
相关新闻>>
- 发表评论
-
- 最新评论 更多>>
