conoscerai bene questo script come vedi ho evidenziato dove ho cambiato i parametri da getcompletepathfile in getnomefile, e facendo il response con la var stampa mi stampa solo il nome del file pero' in upload mi carica tutto il path...........

<%
Dim oUpload,SaveOK
Set oUpload = new cUpload
SaveOK = True
oUpload.OverWrite=True
oUpload.AutoRename=False
oUpload.SetPath "Files\"
oUpload.Load
oUpload.SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("db_categorie.mdb"),"SELECT Top 1 * FROM categorie"
oUpload.Database.Open()
Do While Not oUpload.EOF
oUpload.Save()
If oUpload.Files("ErrorNumber")<>0 then
SaveOK=False
Exit Do
End if
oUpload.Database.Fields(oUpload.Files("InputName") ) = oUpload.GetFileName
stampa =oUpload.GetFileName 'oUpload.Database.Fields(oUpload.Files("InputName" )) = oUpload.GetCompletePathFile
oUpload.MoveNext
Loop

If Not SaveOK then
oUpload.Movefirst
Do While oUpload.EOF
If oUpload.Files("Saved") then
oUpload.Fso.DeleteFile oUpload.GetFileName(),true

'oUpload.Fso.DeleteFile oUpload.GetCompletePathFile(),true End if
oUpload.MoveNext
Loop
Else
Response.Write "I files sono stati salvati."
'Inserimento dei valori
response.write stampa
oUpload.Database.Fields("riferimento") = oUpload.Form.Item("riferimento")
oUpload.Database.Fields("idcat") = oUpload.Form.Item("idcat")
oUpload.Database.Fields("categoria") = oUpload.Form.Item("categoria")
oUpload.Database.Fields("localita") = oUpload.Form.Item("localita")
oUpload.Database.Fields("descrizione") = oUpload.Form.Item("descrizione")
oUpload.Database.Fields("prezzo") = oUpload.Form.Item("prezzo")
oUpload.Database.Fields("foto") = oUpload.Form.Item("foto")
oUpload.Database.Fields("foto1") = oUpload.Form.Item("foto1")
oUpload.Database.Fields("foto2") = oUpload.Form.Item("foto2")
oUpload.Database.Fields("foto3") = oUpload.Form.Item("foto3")
oUpload.Database.Fields("foto4") = oUpload.Form.Item("foto4")
oUpload.Database.Fields("foto5") = oUpload.Form.Item("foto5")

oUpload.Database.AddNew()
End if
oUpload.Database.Close()
Set oUpload=Nothing
%>