peso del file

[Tonygnagno]

Ciao a tutti, ho un problema
Allora nel mio database ho dei file zip.... nella mia pagina, dove visualizzo la lista di zip da scaricare, vorrei tirar fuori anche il peso del file.....

Non riesco a farlo.
Qualcuno può aiutarmi?

Grazie.
Tony

[Tonygnagno]

[Baol74]

File.Size

[Tonygnagno]

Allora.... avevo già provato con File.Size....

ho riprovato:

dopo aver aperto il recordset ho scritto:

Dim File
set File = rsstampa("StampaFile")

e dove dovrei estrarre il peso dello zip ho scritto:

<a href="cartella-stampa/<%=rsstampa("StampaFile")%>" class="anew">
<font color="#3D4E57">scarica cartella
completa (<%=File.Size%>Mb)</font></a>

mi restituisce questo errore....

Errore di run-time di Microsoft VBScript error '800a01b6' 

Proprietà o metodo non supportati dall'oggetto: 'Size' 

/pressroom-ok.asp, line 304

perchè.........

[Baol74]

<%
PathHTTP = "cartella-stampa/" & RsStampa("StampaFile") 
PathFSO = Server.MapPath(PathHTTP)
Set File = Fso.GetFile(PathFSO)
Response.Write "<a href='" & PathHTTP & "' class='anew'>"
Response.Write "<font color='#3D4E57'>scarica cartella
completa (" & File.Size & "Mb)</font></a>
"
Set File = Nothing
%>

Sai cos'è Fso vero? non devo dirti di crearlo fuori dal ciclo del recordset.

Set si usa per assegnare un oggetto ad una variabile. In termine tecnico si dice istanziare. Rsstampa("StampaFile") è una stringa (in realtà non è proprio una stringa..ma questa è un'altra storia)
Le stringhe non possono essere istanziate ma solo assegnate ad altre variabili.

L'istruzione Set File = Fso.GetFile(PathFSO) assegna a file l'oggetto restituito da Fso.GetFile

L'oggetto File ha diverse proprietà

File.Size
File.Type
File.DataCreated
File.Path
ect...

[Tonygnagno]

No non lo so... infatti mi dice:

Errore di run-time di Microsoft VBScript error '800a01a8' 

Necessario oggetto: 'Fso' 

/pressroom-ok.asp, line 43

Non è che sei così gentile da dirmi cos'è?

Ah.. dimenticavo... è fuori dal ciclo...

Grazie mille

[Baol74]

E' l'oggetto per accedere al File System (pui leggere files, directory, dimensioni ect.)
per crearlo fai così:

Set Fso = Server.CreateObject("Scripting.FileSystemObject")

Prima del ciclo di scorrimento del recordset! Ne basta uno.

Per distruggerlo, fuori dal ciclo metti

Set Fso = Nothing

[Tonygnagno]

grazie mille.......