%@ENABLESESSIONSTATE=FALSE%> <% '****************************************************************************** 'Copyright Dundas Software Ltd. 2000. All Rights Reserved. ' 'PURPOSE: The user can try uploading files to the server using ' different settings for the Dundas Upload control. ' 'POST DESTINATION: UplLimitAction.asp. ' 'Dundas Software Contact Information: ' Email: sales@dundas.com ' Phone: (800) 463-1492 ' (416) 467-5100 ' Fax: (416) 422-4801 '****************************************************************************** Response.Expires = -10000 %>
Using this demo you can upload files to the server using different settings. It demonstrates accessing form data prior to the file upload, progress bar implementation, setting limitations on the uploading of data and the usage of unique names.
<% on error resume next 'create UploadProgress object set UplProg = Server.CreateObject("Dundas.UploadProgress") 'set the StateServer IP address 'UplProg.StateServer = "127.0.0.1" 'retrieve a new progress ID NewProgressID = UplProg.GetNewProgressID set UplProg = nothing if Err <> 0 then NewProgressID = -1 'display an error message Response.Write "" Response.Write " " & "State Server Error: " & Err.description & " Progress bar will be disabled!
" end if %>