Поиск файлов по списку и запись в CSV с учетом русских букв

@ruslaw · Регистрация: 23.08.2013

Студворк — интернет-сервис помощи студентам

Имеется главная папка (напр. - "D:\folderA\") с различными файлами и субпапаками разной степени вложения.
Имеется список имен файлов.
Как сделать bat(vbs/js)-файл который создавал бы отчет в виде csv-файла где первой строкой шел бы этот список, а второй список полных имен (полных адресов) этих файлов, напр.:
test1.txt D:\folderA\folderK\test1.txt
test2.pdf D:\folderA\folderW\test2.pdf
test3.doc D:\folderA\folderX\test3.doc
....................................
Т.е. речь идет о пакетном поиске с отчетом.

Добавлено через 4 часа 33 минуты
Забыл добавить, что файлы и папки имеют русские имена и включают пробелы. Имя и полное имя файла в каждой строке разделены табулятором.

Dragokas · 03.10.2013, 11:46

Сообщение от ruslaw

где первой строкой

судя по примеру - первым столбцом...

Сообщение от ruslaw

Имеется список имен файлов.

где?

@ruslaw · 03.10.2013, 18:21 **[ТС]**

судя по примеру - первым столбцом...
Именно так. Описка.
где?
Отдельный текстовый файл помещенный в эту же папку, например FileList.txt

Dragokas · 03.10.2013, 21:08

FilesCSV.cmd

Bash
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
@echo off
SetLocal EnableExtensions
:: Список с именами файлов
set List=File-List.txt
:: Где ищем
set MainFolder=l:\Bash
:: Куда записываем CSV-log
set CSV=List.csv
 
echo Short;Full> "%CSV%"
 
For /F "UseBackQ delims=" %%L in ("%List%") do (
  For /F "delims=" %%F in ('dir /B /S /A-D "%MainFolder%\%%L"') do (
    echo %%L;%%F
  )
) >> "%CSV%"
 
cscript.exe //nologo Recode.vbs "cp866" "windows-1251" "%CSV%"

Recode.vbs

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
On Error Resume Next
FullName = WScript.Arguments(2)
 
With CreateObject("ADODB.Stream")
    .Type = 2
    .Charset = WScript.Arguments(0)
    .Open
    .LoadFromFile FullName
    Text = .ReadText()
    .Close
 
    .Charset = WScript.Arguments(1)
    .Open
    .WriteText (Text)
    .SaveToFile FullName, 2
    .Close
End with

@ruslaw · 05.10.2013, 00:02 **[ТС]**

Я положил cmd-файл (и свой File-List.txt) в свою папку, но он генерирует только csv-файл с одной строкой - Short;Full
Увы.

Dragokas · 05.10.2013, 13:16

Значит что-то не правильно указываете. У меня все работает.
Выкладывайте сюда архивом все созданные файлы - посмотрим.

@ruslaw · 05.10.2013, 16:16 **[ТС]**

Пишет: Системе не удается найти указанный путь. Ошибка ввода.

Dragokas · 05.10.2013, 17:26

Строка 6 кода - путь не изменили. Комментарии для кого писал?

Bash
1
set MainFolder=Example

или полный путь.

Где файл Recode.vbs ?
Я, конечно, много прошу. Но не всегда есть возможность расписывать каждую деталь.

@ruslaw · 05.10.2013, 22:09 **[ТС]**

Установив папку должным образом система заработала. Файл на vbs я не использовал, а просто перекодировал в редакторе Bred, очень удобный, мгновенно открывает любые файлы и перекодирует между ANSI, UTF и DOS.
Кстати, а как надо использовать Recode.vbs?
Но скрипт не работает с именами файлов содержащими пробелы, будь то английский, будь то русский.
Хотя я конечно брал их в кавычки.
Прилагаю архив

Dragokas · 05.10.2013, 22:15

Не нужно было ничего брать в кавычки. Скриптом уже все предусмотрено.

Сообщение от ruslaw

Кстати, а как надо использовать Recode.vbs?

Никак. Его использует батник (строка № 18 кода).

@ruslaw · 05.10.2013, 23:47 **[ТС]**

Ну наконец-то все получилось. Спасибище огромное!!!

Новые блоги и статьи Все статьи Все блоги /
Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .	Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .

@ruslaw 3 / 3 / 0 Регистрация: 23.08.2013 Сообщений: 85

	Поиск файлов по списку и запись в CSV с учетом русских букв 03.10.2013, 02:22. Показов 5753. Ответов 10 Метки нет (Все метки) Имеется главная папка (напр. - "D:\folderA\") с различными файлами и субпапаками разной степени вложения. Имеется список имен файлов. Как сделать bat(vbs/js)-файл который создавал бы отчет в виде csv-файла где первой строкой шел бы этот список, а второй список полных имен (полных адресов) этих файлов, напр.: test1.txt D:\folderA\folderK\test1.txt test2.pdf D:\folderA\folderW\test2.pdf test3.doc D:\folderA\folderX\test3.doc .................................... Т.е. речь идет о пакетном поиске с отчетом. Добавлено через 4 часа 33 минуты Забыл добавить, что файлы и папки имеют русские имена и включают пробелы. Имя и полное имя файла в каждой строке разделены табулятором. 0

@ruslaw 3 / 3 / 0 Регистрация: 23.08.2013 Сообщений: 85
	03.10.2013, 18:21 [ТС]
	судя по примеру - первым столбцом... Именно так. Описка. где? Отдельный текстовый файл помещенный в эту же папку, например FileList.txt 0

@ruslaw 3 / 3 / 0 Регистрация: 23.08.2013 Сообщений: 85
	05.10.2013, 00:02 [ТС]
	Я положил cmd-файл (и свой File-List.txt) в свою папку, но он генерирует только csv-файл с одной строкой - Short;Full Увы. 0

Dragokas 18030 / 7733 / 892 Регистрация: 25.12.2011 Сообщений: 11,502 Записей в блоге: 16
	05.10.2013, 13:16
	Значит что-то не правильно указываете. У меня все работает. Выкладывайте сюда архивом все созданные файлы - посмотрим. 0

@ruslaw 3 / 3 / 0 Регистрация: 23.08.2013 Сообщений: 85
	05.10.2013, 23:47 [ТС]
	Ну наконец-то все получилось. Спасибище огромное!!! 0

Поиск файлов по списку и запись в CSV с учетом русских букв

Решение