<%@ LANGUAGE="VBSCRIPT" %> <% set upl = Server.CreateObject("SoftArtisans.FileUp") IMGREVIEW= "IMG3" If upl.Form("Image").TotalBytes <> 0 Then ImagePathV=IMGREVIEW & "." & Right( upl.Form("Image").UserFilename , 3) vImage="Images/BusItem/"& ImagePath1 ImagePath1= "c:/inetpub/thai-industry/exchangeHub/Images/Images/"& ImagePathV upl.Form("Image").SaveAs ImagePath1 End If %>

Save complete at \Images:

<%=upl.Form("Image").TotalBytes%> bytes