salve
ho un problema con lo script di baol per upload file.
utilizzo l'upload e scrittura in un database, e fin qui tutto ok, ora vorrei inserire il filtro :
oUpload.Filter = oUpload.FilterSize(102000)
nel seguente codice :
<%
Dim oUpload
Set oUpload= new cUpload
With oUpload
.SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("modifiche.mdb"),"SELECT Top 1 * FROM progetto"
.EnabledAspUpload = False
.EnabledImageSize = False
.EnabledLog = False
.AutoRename = True
.Overwrite = False
.SetPath "/public/upload4/aggiornamenti/"
.Load
.MoveFirst
if .EOF then
NumFiles = .Count()
Response.write "0 Files caricati su " & NumFiles &" : controlla le dimensioni e il tipo di file."
else
.Database.Open()
While Not .EOF
.Save
response.Write "il file " & .GetFileName &" è stato salvato
"
'Inserimento dei valori
.Database.Fields("Titolo") = .Form("Titolo")
.Database.Fields("Descrizione") = .Form("Descrizione")
.Database.Fields("N_File") = .GetFileName
'Inserimento
.Database.AddNew()
.MoveNext
Wend
end if
End With
Set oUpload = Nothing
%>
ho provato intutte le salse ma nulla .
mi potete dire come inserire il filtro di dimensione del file?

Rispondi quotando