%@ Language=VBScript %> <% Option Explicit dim oFileUpProgress dim intProgressID set oFileUpProgress = Server.CreateObject("SoftArtisans.FileUpProgress") intProgressID = oFileUpProgress.NextProgressID %>