Malkavianer : ich mach das immer mit einem Visual Basic Script , das mir eine Html Datei aus dem Verzeichniss erzeugt
Text in eine Datei mit dem Namen "index.vbs" kopieren (oder im Script den 'Fname' ändern) , diese Datei in das zu druckende Verzeichniss kopieren und mit Doppelklick starten". Die Tabelle kann noch mit Dateigrösse , Datum usw erweitert werden (im Text auskommentiert). Der gepostete Scripttext erzeugt eine Liste von mp3,wav und ogg Dateien ohne Datei-Suffix (Typauswahl lässt sich im 'Filter' einstellen ).
Code:
Dim fso,f,folder,files,ts,fname,filter,datei
fname ="index.vbs" 'Name des Scripts im zum listenden Ordner
filter ="mp3 ogg wav"
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(fname)
set folder = fso.GetFolder(f.ParentFolder)
set files = folder.files
Set ts = fso.CreateTextFile("index.htm", True)
ts.WriteLine "<HTML><HEAD></HEAD><BODY><TABLE width ='100%'>"
for each datei in files
if instr(1,filter, right(datei.name,3),1) then
ts.WriteLine "<TR>"
ts.WriteLine "<TD>" & left (datei.name,len(datei.name)-4) & "</TD>" 'ohne Dateiendung
' ts.WriteLine "<TD align='right'>" & (datei.size) & " bytes</TD>"
' ts.WriteLine "<TD align='center'>" & (datei.DateLastModified) & "</TD>"
' ts.WriteLine "<TD>" & (datei.name) & "</TD>" ' Dateiname mit Suffix
ts.WriteLine "</TR>"
end if
next
ts.WriteLine "</TABLE></BODY></HTML>"
ts.close