#8751

tonne
Participant

Prev-file version…


// This macro opens the prev ".txt" file in the current folder.
//
sFolder = document.Path;
if( sFolder != "" ) {
fso = new ActiveXObject("Scripting.FileSystemObject");
f = fso.GetFolder(sFolder);
fc = new Enumerator(f.files);
sItem = "";
for (; !fc.atEnd(); fc.moveNext()) {
if( fc.item().name == document.Name ) {
try {
editor.OpenFile( sPath );
}
catch(e) {
}
break;
}
else {
n = fc.item().name.lastIndexOf(".");
if( n != -1 && fc.item().name.slice( n ) == ".txt" )
sPath = sFolder + "" + fc.item().name;
}
}
}