<%
'On Error resume Next
dim utente
utente = ""
dim password
password = ""
if Session ("sssUtente") = utente or Session("sssPassword") = password then
response.redirect("password.asp?errore=1")
end if

dim appoggio
appoggio=request.form("txtfile")
dim file
file="../public/"&session("sssUtente")&"/"&session("File")
file2="../mdb-database/"&session("sssUtente")&"/"&session("File")
file_rinomina="../public/"&session("sssUtente")&"/"&appoggio
file_rinomina2="../mdb-database/"&session("sssUtente")&"/"&appoggio
Set fsoMyFile = CreateObject("Scripting.FileSystemObject")
fsoMyFile.moveFile file,file_rinomina
fsoMyFile.moveFile file2,file2_rinomina
set fsoMyfile = nothing
response.redirect ("../public/"&session("sssUtente")&"/"&session("file")&".asp")

if err.Number <> 0 then
response.write("
")
response.write("Probabile errore o malfunzionamento, verificare sul server!")
end if
%>

errore impossibile trovare i files... eppure i nomi dei files sono corretti!