Mi pare che tu stia cercando di usare l'oggetto Upload prima di averlo istanziato...


If Upload.Form("file1").Value <> "" then

Dim objFS,objFolder,objFile
Set objFS = Server.CreateObject("Scripting.FileSystemObject")
percorso = Server.MapPath("/public/admin/img_libri/")
Set objFolder = objFS.GetFolder(""&percorso&"")

Set Upload = Server.CreateObject("Persits.Upload")