Baol: caricare solo immagini

[TeoB]

Salve a tutti, sto usando lo script di Baol per caricare delle immagini sul server.

Voglio che vengano caricate SOLO immagini, quindi il file per l'upload è cosí:

Set oUpload = new cUpload
oUpload.SetPath "/public"
oUpload.AutoRename=False
oUpload.OverWrite=False
oUpload.load()
oUpload.UploadOnly "images"
oUpload.Save()

Tutto procede per il meglio, ma vorrei ancora due cose: la prima è rendere obbligatorio il campo file, ovvero bloccare interamente lo script se non c'è nessun file da caricare.

Secondo, vorrei fare in modo che se il file non è un'immagine o se non esiste il file mi venga un messaggio di errore diverso da

Microsoft JET Database Engine error '80004005'

The changes you requested to the table were not successful because they would create duplicate values in the index, primary key, or relationship. Change the data in the field or fields that contain duplicate data, remove the index, or redefine the index to permit duplicate entries and try again.

/pastrugni/uppastrugni.asp, line 28

Cioè...vorrei fare un redirect verso una pagina mia con scritto "File non valido, inserisci solo immagini".

E' possibile?

[Roby_72]

Con

	If Not oUpload.EOF then
		oUpload.MoveFirst

controlli che sia stato inviato qualcosa...

L'errore che ti da è relativo al db, duplicazione di chiave, non al tipo di file che carichi.

Roby

[TeoB]

Originariamente inviato da Roby_72
Con

	If Not oUpload.EOF then
		oUpload.MoveFirst

controlli che sia stato inviato qualcosa...

Dove lo devo mettere nel mio script? Se lo infilo prima del load() mi dà l'errore object required Files (tipico di una riga messa dove non va messa)...

Originariamente inviato da Roby_72

L'errore che ti da è relativo al db, duplicazione di chiave, non al tipo di file che carichi.

Roby

E´ vero, ho sbagliato io, avevo già un record vuoto nel database!

[Roby_72]

http://www.creamweb.it/script/mostra.../?id_script=12

Ci dovrebbe essere la documentazione.

Roby

[TeoB]

Ho dato un occhio ai suoi esempi, tanto per prenderne uno:

.UploadOnly "Images"
While Not .Eof
If .Files("Height")>=80 or .Files("Width")>=60 then
 Response.write ("Le dimensioni dell'immagine " &_
 .GetFileName() &" non sono corrette (" &_
 .Files("Height") &"x" & .Files("Width") &"): File non caricato
"  )
else
 .Save
end if

Lui mette il controllo dopo il filto e prima del .save

Io faccio la stessa cosa:

	oUpload.UploadOnly "images"
if Not oUpload.EOF then
response.write "File non valido"
else
	oUpload.Save()
end if

e anche se carico un file di testo mi salta questo controllo e va avanti con lo script creandomi una voce vuota nel database.

[TeoB]

No, è incredibile questa cosa!

oUpload.UploadOnly "images"
if oUpload.EOF then
response.write "File non valido"
else
oUpload.Save()
end if

Cosí mi fa caricare solo le immagini e mi filtra tutti gli altri files VVoVe:
L'esatto contrario di come dovrebbe essere

[Roby_72]

Originariamente inviato da TeoB
No, è incredibile questa cosa!

oUpload.UploadOnly "images"
if oUpload.EOF then
response.write "File non valido"
else
oUpload.Save()
end if

Cosí mi fa caricare solo le immagini e mi filtra tutti gli altri files VVoVe:
L'esatto contrario di come dovrebbe essere

Veramente è giusto: solo immagini.

Roby

[TeoB]

Continuo a non capire

oUpload.UploadOnly "images" 'upload solamente le immagini
if oUpload.EOF then 'se esiste un file uploadato
response.write "File non valido" 'rispondi file non valido
else 'altrimenti (se non esiste)
oUpload.Save() 'salvalo
end if

O sono io che leggo male?

[santino83_11_04]

oUpload.EOF ti dice se c'è qualcosa da uplodare...se tu gli dici "caricami solo immagini" e poi gli passi un file di testo, è normale che ti risponda "non devo caricare nulla"