upload di Baol per file video ..

[Baol74]

Prova un po' questo..ti restituisce true?

<%
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()
WriteLn "Multipart="&oUpload.IsMultipart
Response.End
	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
%>

[angelicab]

yes

[Baol74]

Ok, scoperto l'arcano...così funziona,ma come ti dicevo non calcola le dim video:

<%
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()
oUpload.Filter = oUpload.FilterVideo() & AND_ & oUpload.FilterSize(2000000)
	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
%>

[angelicab]

infatti .. stavo postando la stessa cosa io ..

ma cosa intendi dicendo che "non calcola le dim del video" ???

tra i parametri del file che stampa a video dice

Files("Size")=450000

poi .. se provo a caricare un file che non è video, non fa l'upload ma non da nessun messaggio di errore ... non è possibile stampare a video qualcosa che dica "hai sbagliato file" ??

[Baol74]

Non calcola le dimensioni di altezza e largezza del video. Size è la dimensione in bytes del file.

Certo che se provi a caricare un file che non è video non te lo carica!!! Ha messo un filtro !!!

Di modi per testare ce ne sono diversi, il puiù semplice si chiama IF
Puoi testare il numero di files con oUpload.Count
Oppure puoi testare la Proprietà oUpload.EOF

[angelicab]

Originariamente inviato da Baol74
Non calcola le dimensioni di altezza e largezza del video. Size è la dimensione in bytes del file.

Certo che se provi a caricare un file che non è video non te lo carica!!! Ha messo un filtro !!!

Di modi per testare ce ne sono diversi, il puiù semplice si chiama IF
Puoi testare il numero di files con oUpload.Count
Oppure puoi testare la Proprietà oUpload.EOF

ok .. il controllo sui file inviati l'ho inserito .. ma se voglio controllare anche altezza e larghezza del video?? ho visto che c'è

				
If Mid(ContentType,1,5) = "image" then
   pGetImageSize RequestBin,ContentType,ar
	Files("Height") = ar(0)
	Files("Width") = ar(1)
	Files("Info") = ar(2)
end if

non c'è qualcosa di simile per i video??

[Baol74]

(4) La mia classe non calcola le dimesioni dei video.
L'algoritmo comunque non è difficile e può essere implementato.

[angelicab]

Originariamente inviato da Baol74
(4) La mia classe non calcola le dimesioni dei video.
L'algoritmo comunque non è difficile e può essere implementato.

ehm... me l'invento l'algoritmo ???


cmq grazie per l'aiuto

[Baol74]

No, lo cerchi su internet, se lo trovi (magari sviluppato in php) ti do una mano.

[angelicab]

Originariamente inviato da Baol74
No, lo cerchi su internet, se lo trovi (magari sviluppato in php) ti do una mano.

non saprei da dove cominciare .. e per me php è arabo ..