Purtroppo continua a stamparmi le intestazioni delle colonne:
codice:
'CONTROLLA ESISTENZA FILE
if objFiles.Count = 0 Then
Response.Write ("
[b]<font size=""1"" face=""Verdana"">Nessun file per la cartella selezionata
")
else
response.write ("<tr>")
response.write ("<td>File</td>")
response.write ("<td>Tipo</td>")
response.write ("<td>Data creazione</td>")
response.write ("<td>Data ultima modifica</td>")
response.write ("</tr>")
numfile = 0
For each directoryfile in objFolder.files
if directoryfile.name <> "Thumbs.db" and directoryfile.name <> "default.htm" and directoryfile.name <> "Desktop.ini" and directoryfile.name <> "plot.log" then
numfile = (numfile + 1)
response.write ("<tr>")
response.write ("<td><font size=""1"" face=""Verdana""><a href="""&percorso&"/"&directoryfile.Name&""">")
response.write ("</td>")
response.write ("<td>" & directoryfile.Size & "</td>")
response.write ("<td>" & directoryfile.Type & "</td>")
response.write ("<td>" & directoryfile.DateCreated & "</td>")
response.write ("<td>" & directoryfile.DatelastModified & "</td>")
end if
Next
if numfile > 0 then
response.Write (">Numero di file presenti : " & numfile)
else
Response.Write ("Nessun file per la cartella selezionata.")
end if
end if