Дублирование файловой структуры в обнулённом виде

[Avada]

Чтобы не плодить ещё одну тему, спрашиваю тут.

Замечание за нарушение правил форума. Элементарный вопрос, ответ на который легко найти в справке (см. здесь), плюс оффтоп ("чтобы... спрашиваю тут").

[NIK_59]

Здравствуйте мастера и знатоки ТС.
При переносе с помощью Total Commander (F-6) c флешки 4 Гиг на 8 Гиг (новую) корневые папки видны, а подкаталогов не видно. Контроль содержимого папок - 0. На флешке суммарно 3.63 ГБ есть.
Cначала я копировал папки на новую флешку, проверил, убедился в нормальной работе и начал переносить остальное. Копируемые данные есть, а перенесенные папки пустые - 0 кБ. Информация в основном в виде документов Word и Exel.
Сканировал версией R-Studio 5.4 - картина та же: содержания папок не видно, что дальше делать не знаю.
С уважением и надеждой на Ваши знания ТС. Если можно, ответ упростить для неопытного пользователя пошаговым алгоритмом.

[Вахмурка]

А проводник и/или другие файл-менеджеры что говорят?

[Flasher]

NIK_59
Зачем в двух темах писать?
Да ещё и оффтоп...

[Avada]

NIK_59
Замечание за нарушение правил форума. Дальнейшее обсуждение — только здесь.

[Skif_off]

Если кто-то, как и я, надумает пользовать %WL, вместо %L при копировании "пустой" структуры каталогов с файлами, то нужно заменить

Код: Выделить всё

Set OTF = FSO.OpenTextFile(WScript.Arguments(0), 1)

на

Код: Выделить всё

Set OTF = FSO.OpenTextFile(WScript.Arguments(0), 1, False, -1)

Добавлено:
Ай, тоже не дружит с MAX_PATH и даже \\?\ не переварит Или прикручивать проверку if error, или таки смотреть AutoIt.

[MVV]

Ого, fsutil, это же права админа нужны... Помнится, я создавал пустые файлы из батника командой вида set ok=>file.ext.
А со сверхдлинными именами файлов вообще мало кто дружит. Хотя, попробовал сейчас set ok=>\\?\d:\file.ext - работает.

[Skif_off]

MVV
Можно поподробнее? С циклами в батниках у меня беда. И такое использование set вроде недокументировано, хотя выглядит логично.

попробовал сейчас set ok=>\\?\d:\file.ext - работает

Консоль вроде всегда дружила с UNC-путями А вот с некоторыми символами - нет: куча проблем как-то вылезли с "&", в итоге плюнул и всё переименовал на всякий случай ) Здесь, наверное, то же самое будет?

Ого, fsutil, это же права админа нужны...

Flasher предложил исправления, только в статью они не попали почему-то.
У меня ещё MkFileSize.exe лежит, как-то думал приспособить её (на MAX_PATH не проверял), т.к. отказался от скрипта сначала - думал, для него нужен Script Helper ActiveX, недавно только начал побольше понимать

А со сверхдлинными именами файлов вообще мало кто дружит.

[cut]Ну, для некоторых программ это натурально грех - средства автоматизации, архиваторы, ФМ. Я был, мягко говоря, в огромном изумлении, когда TeraCopy и со второй попытки не скопировала папку целиком - размер был меньше, причем всё молча. Это недопустимо для такого рода утилит.[/cut]

[MVV]

Проблема с префиксом \\?\, что с ним путь к папке вообще не чистится, не удаляются лишние пробелы и точки в конце и т.п., поэтому при простом добавлении префикса ко вроде бы рабочему пути к папке можно получить полный бред.

Я когда-то использовал такой вариант:

Код: Выделить всё

@echo off
if -%2==- echo Parameters required: %%WF "%%T" & pause & goto :EOF
if -%1==-go goto go
echo Nuller by MVV. Version 2.1
echo.
for /f "usebackq delims=" %%f in (`type %1`) do call %0 go "%%f" %2
pause
goto :EOF

:go
if -%3==- goto :EOF
if -%4==-D goto go_dir
if not -%4==-F if exist %2\* goto go_dir

if exist %3\%2 goto :EOF
set Nuller=%2>"%~3\%~2"
echo %~3\%~2
goto :EOF

:go_dir
if not exist %3\%2 md %3\%2
for /d %%d in (%2\*) do call %0 go %%d %3 D
for %%f in (%2\*) do call %0 go %%f %3 F

[Skif_off]

В смысле "чистится"? Не понимаю - путь или правильный, или нет.

[MVV]

Без префикса винда выполняет предобработку пути, удаляя лишние точки и пробелы в конце. Например, C:\dir и C:\dir. - это одинаковые пути. В случае использования префикса это не так. Аналогично с префиксом можно создать и использовать папку с пробелом в конце имени, что невозможно при обычном обращении.

[Flasher]

Если кто-то, как и я, надумает пользовать %WL, вместо %L

Ну, это относится не только к этому скрипту. И этот метод не везде проходит. Лучше

Код: Выделить всё

Set OTF = FSO.GetFile(WScript.Arguments(0)).OpenAsTextStream(1, -1)

Flasher предложил исправления, только в статью они не попали почему-то.

Кто ж станет править чужие скрипты без согласия автора?

[Skif_off]

Flasher
Посмотрел OpenAsTextStream на MSDN и не понял разницы Честно говоря, сам не разбираюсь, у себя исправил, спасибо.

Кто ж станет править чужие скрипты без согласия автора?

О способе изменений не говорил, кто ж станет игнорировать элементарную вежливость? С Batya, наверное, можно связаться. Ход кОнем: добавить в конце описания ссылку на тему.

[Batya]

Кто ж станет править чужие скрипты без согласия автора?

Хотел поправить статью, но не даёт сохранить
[cut="Ошибка"]Detected bug in an extension! Hook ReCaptcha::confirmEdit failed to return a value; should return true to continue hook processing or false to abort.
Backtrace:
#0 /home/u52/tckb.ru/WWW/includes/EditPage.php(791): wfRunHooks('EditFilter', Array)
#1 /home/u52/tckb.ru/WWW/includes/EditPage.php(2483): EditPage->internalAttemptSave(false, false)
#2 /home/u52/tckb.ru/WWW/includes/EditPage.php(449): EditPage->attemptSave()
#3 /home/u52/tckb.ru/WWW/includes/EditPage.php(340): EditPage->edit()
#4 /home/u52/tckb.ru/WWW/includes/Wiki.php(510): EditPage->submit()
#5 /home/u52/tckb.ru/WWW/includes/Wiki.php(63): MediaWiki->performAction(Object(OutputPage), Object(Article), Object(Title), Object(User), Object(WebRequest))
#6 /home/u52/tckb.ru/WWW/index.php(117): MediaWiki->initialize(Object(Title), Object(Article), Object(OutputPage), Object(User), Object(WebRequest))
#7 {main}[/cut]

[Flasher]

не даёт сохранить

Подтверждаю. В обсуждение тоже не даёт.