upload di Baol per file video ..

[angelicab]

ciao!
sto cercando di utilizzare l'upload di Baol per dei file video ...
dovrei controllare il peso massimo e l'estensione ... come posso fare??

[Roby_72]

Mi sembra ci siano i metodi per controllare queste due cose.
Controlla nel forum tra i vecchi post...

Roby

[angelicab]

utilizzo questo codice ..

<%
Function WriteLn(s,value)
	Response.Write "" & s & "=" & value & "
"
End Function

Dim oUpload
Set oUpload = new cUpload
oUpload.SetPath "..\..\video_web\"
oUpload.Autorename = True
oUpload.OverWrite = False
oUpload.EnabledImageSize = True
oUpload.Load()
	While Not oUpload.EOF
		oUpload.Filter = oUpload.FilterVideo() & AND_ & oUpload.FilterSize(2000000)
		oUpload.Save()
		WriteLn "GetFileName()",oUpload.GetFileName()
		WriteLn "GetCompletePathFile()",oUpload.GetCompletePathFile()
		WriteLn "GetHTTPPathFile()",oUpload.GetHTTPPathFile()
		WriteLn "Files(""InputName"")",oUpload.Files("InputName")
		WriteLn "Files(""DestPath"")",oUpload.Files("DestPath")
		WriteLn "Files(""FileExists"")",oUpload.Files("FileExists")
		WriteLn "Files(""Size"")",oUpload.Files("Size")
		WriteLn "Files(""ContentType"")",oUpload.Files("ContentType")
		WriteLn "Files(""ErrorNumber"")",oUpload.Files("ErrorNumber")
		WriteLn "Files(""Error"")",oUpload.Files("Error")
		WriteLn "Files(""Height"")",oUpload.Files("Height")
		WriteLn "Files(""Width"")",oUpload.Files("Width")
		Response.Write "<hr>"
		oUpload.MoveNext
	Wend
Set oUpload=Nothing
%>

solo che non riesco a gestire gli errori .. cioè .. se faccio l'upload di un file video con il peso giusto (meno di 2 Mb) va tutto bene .. ma se provo a fare un upload di un file più pesante o di un file immagine mi dice

error '80020009' 
Exception occurred

[Baol74]

<%
Function WriteLn(s,value)
	Response.Write "" & s & "=" & value & "
"
End Function

Dim oUpload
Set oUpload = new cUpload
oUpload.SetPath "..\..\video_web\"
oUpload.Autorename = True
oUpload.OverWrite = False
oUpload.EnabledImageSize = True
oUpload.Filter = oUpload.FilterVideo() & AND_ & oUpload.FilterSize(2000000)
oUpload.Load()
	While Not oUpload.EOF
		oUpload.Save()
		WriteLn "GetFileName()",oUpload.GetFileName()
		WriteLn "GetCompletePathFile()",oUpload.GetCompletePathFile()
		WriteLn "GetHTTPPathFile()",oUpload.GetHTTPPathFile()
		WriteLn "Files(""InputName"")",oUpload.Files("InputName")
		WriteLn "Files(""DestPath"")",oUpload.Files("DestPath")
		WriteLn "Files(""FileExists"")",oUpload.Files("FileExists")
		WriteLn "Files(""Size"")",oUpload.Files("Size")
		WriteLn "Files(""ContentType"")",oUpload.Files("ContentType")
		WriteLn "Files(""ErrorNumber"")",oUpload.Files("ErrorNumber")
		WriteLn "Files(""Error"")",oUpload.Files("Error")
		WriteLn "Files(""Height"")",oUpload.Files("Height")
		WriteLn "Files(""Width"")",oUpload.Files("Width")
		Response.Write "<hr>"
		oUpload.MoveNext
	Wend
Set oUpload=Nothing
%>

No calcola le dimensioni video, non è difficile comunque fare l'algoritmo. I video hanno uno standard per le dimensioni.

Ciao

[angelicab]

uhm... adesso mi da questo errore

Microsoft VBScript runtime error '800a01a8' 

Object required: 'Files' 

/pugliasport/upload/esempi/upload.asp, line 412

[Baol74]

Controlla di aver messo l'attributo Enctype corretto nel tag form

[angelicab]

Originariamente inviato da Baol74
Controlla di aver messo l'attributo Enctype corretto nel tag form

ehm... ovvero??

[angelicab]

Originariamente inviato da Baol74

No calcola le dimensioni video, non è difficile comunque fare l'algoritmo. I video hanno uno standard per le dimensioni.

Ciao

questa non l'ho capita ....

[Baol74]

Ovvero, per fare un upload devi specificare un attributo particolare nel tag form chiamato enctype. Così:

<FORM METHOD="Post" enctype="multipart/form-data"ACTION="Salva.asp">

PS: Significa: La mia classe non calcola le dimensioni video.

[angelicab]

Originariamente inviato da Baol74
Ovvero, per fare un upload devi specificare un attributo particolare nel tag form chiamato enctype. Così:

<FORM METHOD="Post" enctype="multipart/form-data"ACTION="Salva.asp">

ah.. ma è già così .. sto utilizzando il tuo form di esempio ...