Lets' you access this asp form from another thread (another ASP script) in the same application using this ID.
vUploadID = ASPForm.UploadID
ASPForm.UploadID = vUploadID
Long
Upload - Progress bar concept. |
| Web browrser (IE/NN) does not accept response data when uploading. So there is one another way to show progress bar during upload - open a new client browser window with another server script on begginning of upload and access current uploading form from the second server script (task). These two server upload tasks are join using ScriptUtils.ASPForm.UploadID property (in the uploading task) and ScriptUtils.ASPForm.getForm property (progress bar task). You can use ScriptUtils.ASPForm.NewUploadID property to get unique upload ID, or you can get this ID by any other way (for example, using rnd() function). |
<%
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
Dim Form: Set Form = Server.CreateObject("ScriptUtils.ASPForm")
Form.UploadID = Request.QueryString("UploadID")
If Form.State = 0 Then
....
End If
End If'POST
%>
Progress bar script:
<%
Dim Form: Set Form = CreateObject("ScriptUtils.ASPForm")
On Error Resume Next
Set Form = Form.getForm(Request.QueryString("UploadID"))
If Err = 0 Then '?completed 0 = in progress
For Each Field In Form.Files
fHTML = fHTML & "FieldName:" & Field.Name
If Field.Length<=0 And Field.FileName<>"" Then
fHTML = fHTML & ", uploading: " & Field.FileName
ElseIf Field.Length>0 Then
fHTML = fHTML & ", OK: " & Field.FileName & "," & FormatSize(Field.Length)
End If
fHTML = fHTML & "<br>"
Next
Response.Write fHTML
End If
%> |
AddConnection, CancelConnection, CheckRequirements, Read, Sleep, StringToBinary
BytesRead, Files, FormType, getForm, CharSet, ChunkReadSize, Items, MaxMemoryStorage, NewUploadID, ReadTime, ReadTimeout, SizeLimit, SourceData, State, TempPath, Texts, ThreadPriority, TotalBytes, UploadID
The ASPForm collection retrieves the values of form elements posted to ASP script by a form using the POST method. ASPForm can process multipart/form-data or application/x-www-form-urlencoded data with length up to 2GB.
© 1996 - 2009 Antonin Foller, Motobit Software | About, Contacts | e-mail: info@pstruh.cz