dreamweaver: dimensione file su server

Di: spila | 26/09/2020 17:44:56
devo creare uno spazio download sul mio sito e ho usato l'estenzione di dreamweaver scaricat aappositamente e modificata per il mio caso
ora devo estrarre con una query le info inserita dalla form di upload compresa la dimensione del file inserito ce vado a leggere direttamente sul server aruba .
con questa funzione leggo le dimensioni del file presente sul server :
codice:
<%
'dimensione file
Function GetFileSize(filepath)
Dim fso, f
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(filepath)
Response.Write("La dimensione del file è: ")
Response.Write(FormatNumber(f.Size/1024, 2)&" Kb")
Set f = nothing
Set fso = nothing
End Function
Dim fname, fpath
fname = "/public/download/q.txt" 'nome del file da controllare
fpath = Server.MapPath(fname)
GetFileSize(fpath)
'fine
%>
il problema è che in questo caso devo inserire il percorso e il nome del file
codice:
fname = "/public/download/q.txt"
io invese lo voglio dinamico come posso modificarlo in questa tabella di estrazione dati ?
codice:
<%
While ((Repeat1__numRows <> 0) AND (NOT Estrai.EOF))
%>
<tr>
<th scope="row"><a href="../public/download<%=Estrai.Fields.Item("NomeFile").Value%>"><%=(Estrai.Fields.Item("NomeFile").Value)%></a></th>
<td><%=(Estrai.Fields.Item("DataFile").Value)%></th>
<td><%=(Estrai.Fields.Item("Data").Value)%></td>
<td><%=(Estrai.Fields.Item("Categoria").Value)%></td>
<td> <td><%=(Estrai.Fields.Item("Autore").Value)%>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Estrai.MoveNext()
Wend
%>

Risposte


Nessuna risposta trovata!