2021-02-16 06:01:22 +00:00
|
|
|
a = new ActiveXObject("scripting.filesystemobject")
|
|
|
|
|
fileinfo = "# This file is automatically generated\r\n"
|
|
|
|
|
|
|
|
|
|
for (b = new Enumerator(a.GetFolder(WScript.Arguments(0)).files); !b.atEnd(); b.moveNext())
|
|
|
|
|
{
|
|
|
|
|
if (b.item().Name.toUpperCase() != "_FILEINFORMATION.TXT")
|
|
|
|
|
{
|
|
|
|
|
fileinfo += "\r\n" + b.item().Name.toUpperCase() + "=Type(" + WScript.Arguments(1) + "),AuxType(" + WScript.Arguments(2) + "),Access(C3)"
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
fileinfo += "\r\n" + "_FileInformation.txt=Type(" + WScript.Arguments(1) + "),AuxType(" + WScript.Arguments(2) + "),Access(C3)\r\n"
|
2022-08-23 02:04:55 +00:00
|
|
|
a.createtextfile(WScript.Arguments(0)+"\\_FileInformation.txt", 1).write(fileinfo)
|
