Come anteprima file in xp

[Luis33]

grazie questo è risolto...
adesso il problema è che vedo i files contenuti all'interno della mia directory come in un elenco...
vorrei vederli invece come nel file che ho allegato nel mio promo messaggio.

[rixx]

devi solo splittare al punto oppure calcolare la distanza di 4 prima della fine
cosi ottieni l'estensione del file..poi per il peso usa
getfilesize

[rixx]

ps: l'anteprima che cavolo è? :master:

[Luis33]

Originariamente inviato da rixx
ps: l'anteprima che cavolo è? :master:

http://forum.html.it/forum/attachmen...postid=6777635

[rixx]

quindi nome,bytes,e disegnino...
ti ho detto tutto allora

[rixx]

non so te lo hanno gia detto ma il nome del file è nella variabile
FileName ri-

[Luis33]

Originariamente inviato da rixx
devi solo splittare al punto oppure calcolare la distanza di 4 prima della fine
cosi ottieni l'estensione del file..poi per il peso usa
getfilesize

non ho capito gran chè... puoi fare qualche esempio?

[rixx]

<%		
Percorso = "tuo percorso"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(Percorso)
Set fc = f.Files
For Each whatever in fc
Nome_File = LCase(whatever.name)
estensione=right(Nome_File,4)
filesize=GetFileSize(Percorso)

if estensione=".jpg" then
response.write("è una jpg oppure ovglio fa vede na icona di foto")
response.write(filesize & "kb")
elseif estensione=".pdf" then
response.write("è pdf oppure ovglio fa vede na icona di adobe")
response.write(filesize & "kb")
end if

Next

puoi andare avanti quanto ti pare per tutti i tipi file del mondo ovviamente

[Luis33]

qualunche cosa scrivo nel percorso restituisce:

Microsoft VBScript runtime error '800a004c'

Path not found

[rixx]

forse perchè non esiste? :rollo:
che percorso scrivi? guarda che deve essere un percorso del tipo:

C:/masterfolder/