><%=Round(theProgress.BytesPerSecond/1024, 1)%></BytesPerSecond>
<Information><%=theProgress.Note%></Information>
</plan>
progressupload.asp(处理上传文件)
<%@EnableSessionState=False%>
<%
Response.Expires = -10000
Server.ScriptTimeOut = 300
Set theForm = Server.CreateObject("ABCUpload4.XForm")
theForm.Overwrite = True
theForm.MaxUploadSize = 8000000
theForm.ID = Request.QueryString("ID")
Set theField = theForm("filefield1")(1)
If theField.FileExists Then
theField.Save theField.FileName
End If
%>
<html>
<body>
传送结束
</body>
</html>
对于其他组件上传,原理也就差不多了,只是方法不一样罢了。
希望大家有什么意见和建议和我联系:)
junminliu@msn.com
<Information><%=theProgress.Note%></Information>
</plan>
progressupload.asp(处理上传文件)
<%@EnableSessionState=False%>
<%
Response.Expires = -10000
Server.ScriptTimeOut = 300
Set theForm = Server.CreateObject("ABCUpload4.XForm")
theForm.Overwrite = True
theForm.MaxUploadSize = 8000000
theForm.ID = Request.QueryString("ID")
Set theField = theForm("filefield1")(1)
If theField.FileExists Then
theField.Save theField.FileName
End If
%>
<html>
<body>
传送结束
</body>
</html>
对于其他组件上传,原理也就差不多了,只是方法不一样罢了。
希望大家有什么意见和建议和我联系:)
junminliu@msn.com