Ciao
volevo implementare dei controlli prima di fare l UPLOAD di un file con ASPUPLOAD
in particolare volevo verificare se il file esiste già e il tipo di file
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
' SOVRASCRIVI FILE
Upload.OverwriteFiles = False
On Error Resume Next
' Limit file size to 50000 bytes, throw an exception if file is larger
Upload.SetMaxSize 150000, True
' Intercept all exceptions to display user-friendly error
On Error Resume Next
Count = Upload.Save("\filepath\upload\")
%>
<%
For Each File in Upload.Files
if Upload.FileExists("\filepath\upload\" & File.FileName & "") then Response.Redirect("/admin?IDscheda=" & VARIDscheda & "&errore=3")
Next
' 8 is the number of "File too large" exception
If Err.Number = 8 Then
Response.Redirect("/admin/foto-associate.asp?IDscheda=" & VARIDscheda & "&errore=1")
Else
If Err <> 0 Then
Response.Redirect("/admin/foto-associate.asp?IDscheda=" & VARIDscheda & "&errore=10&DescErr=" & Err.Description & "")
End If
end if
%>
così funziona ma i file li carica ugulmente.
Io volevo fare un controllo a priori non a posteriori
Grazie

Rispondi quotando