Hi!
Auf Uschis bitte hin, habe ich das skript noch so geändert, daß die ausgabe alle files beinhaltet:
<html>
<title>Folder 2.0</title>
<!-- Folder 2.0 211000 -->
<!-- idea and development by Roman Pfarrhofer, r.pfarrhofer@happy-snack.at -->
<HTA:APPLICATION ID=Folder" BORDER="normal" BORDERSTYLE="normal" CAPTION="yes" MAXIMIZEBUTTON="yes" MINIMIZEBUTTON="yes" SHOWINTASKBAR="yes" SINGLEINSTANCE="no" SYSMENU="yes" WINDOWSTATE="maximize" VERSION="1.0" STATUSBAR="YES">
<body>
<textarea id="tocopy"></textarea>
<script>
// Achtung: Nie einen Backslash verwenden und ohne slash am schluß!
path = "d:/temp";
subfolder = new Array();
fso = new ActiveXObject("Scripting.FileSystemObject");
lenpath=path.length+1;
function folder(x) {
var f = fso.GetFolder(x);
var sf = new Enumerator(f.SubFolders);
var sfn = new Enumerator(f.Files);
subfolder+="<ul>";
for(; !sf.atEnd(); sf.moveNext()) {
subfolder+='<li><a href="'+String(sf.item()).substr(lenpath,String(sf.item()).length)+'/">'+String(sf.item()).substr(lenpath,String(sf.item()).length)+'/</li>';
folder(sf.item());
}
for(; !sfn.atEnd(); sfn.moveNext()) {
if (String(sfn.item())) {
subfolder+='<li><a href="'+String(sfn.item()).substr(lenpath,String(sfn.item()).length)+'">'+String(sfn.item()).substr(lenpath,String(sfn.item()).length)+'</li>';
}
}
subfolder+="</ul>";
}
folder(path);
document.getElementById("tocopy").value=subfolder.split(String.fromCharCode(92)).join("/").toLowerCase();
</script>
</body>
</html>
Viel Spaß Uschi
Roman