Цитата Iska:
Расшифруйте, как перевести 036 в обыденный, человеческий вид. »
|
036 - это второе февраля, 36 порядковый день в году.
Цитата Iska:
Покажите вывод tree из «корневого» каталога. »
|
Я могу ошибаться, но вот он
Set objFolder = fso.GetFolder(DirPath)
Set colSubfolders = objFolder.SubFolders
For Each objSubfolder in colSubfolders
varSrc = Replace(objSubfolder.Path, "\", "\\")
Set FileList = objWMIService.ExecQuery _
("ASSOCIATORS OF {Win32_Directory.Name=""" & varSrc & """} Where " _
& "ResultClass = CIM_DataFile")
Но я не уверен, потому что начал работать с VBS совсем недавно.
Цитата Iska:
А если окажутся с одинаковыми? Ответственность пользователей — это, конечно, хорошо, но скрипт об этом ничего не знает, и должен знать, что делать в такой ситуации. »
|
В этом случае я не задумывался. По идее он просто копирует один из них.
Цитата Iska:
Я Вам верю. Но меня не Ваш скрипт интересует, а алгоритм поведения. Итак, если в конечном каталоге одноимённый файл уже существует — то его не надо перезаписывать поверх, так? »
|
Да, всё верно, перезаписывать сверху скрипт не должен.