<%@ENABLESESSIONSTATE=FALSE%>
<% 'We disable maintaining session state so that more than one ASP
' page can be processed at the same time
Response.Buffer = true %>
<%
'most methods throw an exception if unsuccessful
on error resume next
%>
<%
'now we must create an instance of the UploadProgress component and retrieve a new state (progress) id
dim objProgress 'ProgressBar component instance
dim ProgressID 'new progress (state) id, used to uniquely identify this particular upload operation
set objProgress = server.CreateObject("Dundas.UploadProgress")
ProgressID = objProgress.GetNewProgressID 'used in the client side "Upload" function
if IsEmpty(ProgressID) = true then
Response.Write "The State Server is not currently running, so a Progress ID can not be obtained. "
Response.Write " Please run the StateServer.exe and try this demo again."
Response.End
end if
%>
This sample application demonstrates the use of a progress bar.
Please note that the maximum allowable size of the file to be uploaded is 2 MBytes.
<%
'look for Result Querystring item, if it exists then output the success/failure message
' of the upload operation
if Request.QueryString("Success") <> "" then
Response.Write "
<%
'most methods throw an exception if unsuccessful
on error resume next
%>
