><%=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
上一页 [1] [2]
打印本文 
关闭窗口