The file was successfully transmitted by the user.
<% if not (upl.IsEmpty) then '---Parses out the Content type FCONT = upl.ContentType Select Case LCase(FCONT) Case "gif" , "image/jpeg", "image/jpg", "image/pjpeg", "" upl.SaveInVirtual "..\upload\" Case Else Response.Write "" & "You are restricted to only upload gif and Jpeg files.
"
Response.End
End Select
end if
on error resume next
if Err <> 0 Then %>
<% elseif not isempty(request.querystring("hid")) then %>
<% else %>
<%
Response.Write("Upload saved successfully to " & upl.ServerName) & "
"
response.write ("The filename is now " & upl.ServerName)
End If %>
| User's filename | <%=upl.UserFilename%> |
| Size in bytes | <%=upl.TotalBytes%> |
| Content Type | <%=upl.ContentType%> |
| Content Disposition | <%=upl.ContentDisposition%> |
| MIME Version | <%=upl.MimeVersion%> |
| Content Transfer Encoding | <%=upl.ContentTransferEncoding%> |