object = new ActiveXObject(DLL or OCX Classname);

var fso, curFolder, files, outFileStream;

// ファイルシステムオブジェクトを取得する。
fso = new ActiveXObject("Scripting.FileSystemObject");

// 出力ファイルを上書きモードで作成する。
outFileStream = fso.CreateTextFile(curFolder.Path + "\\filelist.txt", true);

// このスクリプトが存在するフォルダ オブジェクトを取得する。
curFolder = fso.GetFolder(".");

// Files オブジェクトの列挙体を取得する。
files = new Enumerator(curFolder.Files);

// ファイル一覧を出力する。
while(!files.atEnd())
{
    outFileStream.WriteLine(files.item().Name);
    files.moveNext();
}

// オブジェクトを開放する。
outFileStream.Close();
delete outFileStream;
delete curFolder;
delete fso;