<html>
<head>
<hta:application id="DeineID" applicationname="DeinAppName" windowState="normal" >
<title></title>
<script type="text/javascript">
//-----------------------------
//-----------------------------
function init( )
{
var startFolder = "C:";
msg( getFiles( startFolder, 4 ) );
}
//-----------------------------------------------------------------------------------
//-- returns an array: [ array of folder objects, array of file objects ]
//-- filter:
//-- n = 0000 (0): all folders and subfolders and all files
//-- n = 0001 (1): no folders
//-- n = 0010 (2): no files
//-- n = 0100 (4): no subfolders
//-----------------------------------------------------------------------------------
function getFiles( startfolder, n )
{
if( !n ) n = 0;
var fso = new ActiveXObject("Scripting.FileSystemObject");
var folders = new Array();
var files = new Array();
if( !fso.FolderExists( startfolder ) )
{
msg("Folder " + startfolder + " not found!");
return [ [],[] ];
}
getNext( startfolder );
return [ folders, files ];
function getNext( fld )
{
var folderObj = fso.getFolder( fld );
var filesEn, foldersEn;
if( (n & 2) == 0 )
{
filesEn = new Enumerator( folderObj.Files );
for (; !filesEn.atEnd(); filesEn.moveNext()) files.push( filesEn.item() );
}
if( (n & 1) == 0 )
{
folders.push( folderObj );
foldersEn = new Enumerator( folderObj.SubFolders );
if( (n & 4) == 0 )
{
for (; !foldersEn.atEnd(); foldersEn.moveNext()) getNext( foldersEn.item().path );
}
}
}
}
//-----------------------------
//-----------------------------
function msg( s )
{
document.getElementById("msgs").innerHTML = "FOLDERS:<br>" + s[0].join("<br>") + "<br><br>FILES:<br>" + s[1].join("<br>") ;
//alert( s );
//WScript.Echo( s );
}
</script>
</head>
<body onload="init()">
<div id="msgs"></div>
</body>
</html>
