Как получить список файлов в ZIP или в RAR?

@istomin_an62 · Регистрация: 20.07.2020

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

Вынесено из темы Автоматическая распаковка архивов в указанную директорию

Здравствуйте.
А как-бы получить список файлов в зипе или в раре? Искал в интернете, но ничего внятного не не нашёл. Я, конечно, могу архив разрарить (или разиповать) в какую-то директорию и потом загнать полученный список в listbox, но как мне кажется, это не правильно.

Ещё вопрос. Файлы, начинающая с тире (например "-файл1") при удалении не работают, пишет "не известный ключ (или команда)",при копировании файла вообще ничего не происходит. & """ """ & ничего не даёт. Как-бы удалять или копировать подобные файлы? .

@istomin_an62 · 18.03.2023, 16:47 **[ТС]**

пишет, что:

Кликните здесь для просмотра всего текста

Как получить список файлов в ZIP или в RAR?

@OwenGlendower · 18.03.2023, 16:58

istomin_an62, конкретно для этих примеров работает вариант с указанием кодировки. Замените эту строку

VB.NET
41
            Using zipArc As New ZipArchive(stream, ZipArchiveMode.Read)

на

VB.NET
41
            Using zipArc As New ZipArchive(stream, ZipArchiveMode.Read, False, Encoding.GetEncoding(866))

И, конечно, сделайте вывод в ListBox вместо вывода в консоль.

Данный код правильно работает с названиями на английском и русском. Если других языков не будет, то значит всё в порядке.

Добавлено через 1 минуту

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

пишет, что:

Для таких вещей есть специальная тема - https://www.cyberforum.ru/abou... 06915.html

@istomin_an62 · 18.03.2023, 17:22 **[ТС]**

Большое спасибо. Теперь всё работает. А, для справки, в первом случае не подскажете строчку для смены кодировки?

@OwenGlendower · 18.03.2023, 17:25

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

А, для справки, в первом случае не подскажете строчку для смены кодировки?

Первый случай не поддерживает указание кодировки, но это не важно т.к. классы все равно одни и те же. И вообще можно скрыть эти две строки за методом чтобы упростить код

VB.NET
1
2
        Using stream As FileStream = File.OpenRead(путь1 + имя1)
            Using zipArc As New ZipArchive(stream, ZipArchiveMode.Read, False, Encoding.GetEncoding(866))

@istomin_an62 · 18.03.2023, 17:39 **[ТС]**

Что-то не понял. А, впрочем, это неважно, и так всё прекрасно работает, благодаря вашему коду. В первом случае буду разбираться.

@OwenGlendower · 18.03.2023, 17:53

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

Что-то не понял.

Я имел в виду что можно написать метод принимающий путь к архиву и возвращающий ZipArchive с нужной кодировкой. Чтобы писать только одну строку вместо двух.

Добавлено через 22 секунды

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

В первом случае буду разбираться.

С чем именно?

@istomin_an62 · 18.03.2023, 18:35 **[ТС]**

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

С чем именно?

С кодировкой

@OwenGlendower · 18.03.2023, 18:41

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

С кодировкой

Я же сказал что ZipFile.OpenRead не поддерживает указание кодировки или вы что-то другое имеете в виду?

@istomin_an62 · 18.03.2023, 18:51 **[ТС]**

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

Я же сказал что ZipFile.OpenRead не поддерживает указание кодировки

Ясно. Ну, тады, ладно.

Добавлено через 4 минуты
OwenGlendower, Хотя, в первом случае русский алфавит так и будет показываться кракозябрами? Странно это...

@OwenGlendower · 18.03.2023, 18:55

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

Странно это...

Ничего странного. Первый метод ведет себя точно так же как второй когда мы не указывали кодировку.

@istomin_an62 · 18.03.2023, 18:58 **[ТС]**

OwenGlendower, Понятно.

@istomin_an62 · 22.03.2023, 11:15 **[ТС]**

На второй вопрос я сам себе ответил:
"Ключ -- — прервать дальнейший поиск ключей в командной строке"
Т.е., при удалении файла, начинающееся "-", например "-файл1", надо добавлять в конце ключ "--":

VB.NET
1
Dim Rar As String = "c:\Program Files\WinRAR\WinRAR.exe" & " D  -dr -- "

@OwenGlendower · 22.03.2023, 12:06

istomin_an62, к вашему сведению удалить файл из архива можно кодом. Внешний архиватор использовать необязательно.

VB.NET
1
2
3
4
5
6
7
8
Using stream As FileStream = New FileStream("file.zip", FileMode.Open, FileAccess.ReadWrite)
    Using zipArc As New ZipArchive(stream, ZipArchiveMode.Update)
        Dim zipEntryToDelete As ZipArchiveEntry = zipArc.GetEntry("-файл1")
        If zipEntryToDelete IsNot Nothing Then
            zipEntryToDelete.Delete()
        End If
    End Using
End Using

@istomin_an62 · 22.03.2023, 13:55 **[ТС]**

OwenGlendower, Речь идет не только об удалении файла, но об его копировании и переносе. В моём случае проще, правда обязательно установить rar и его подкорректировать, но, опять-же, в моём случае, rar всегда установлен.

@OwenGlendower · 22.03.2023, 16:18

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

в моём случае, rar всегда установлен.

Окей. Будем считать тогда что пример приведен для расширения кругозора

@istomin_an62 · 23.03.2023, 01:38 **[ТС]**

OwenGlendower, Во всяком случае, спасибо.

Новые блоги и статьи Все статьи Все блоги /
ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Nekobox - outbounds[0].transport: unknown transport type: raw damix 01.10.2026 Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@istomin_an62 5 / 5 / 0 Регистрация: 20.07.2020 Сообщений: 146

	Как получить список файлов в ZIP или в RAR? 17.03.2023, 16:16. Показов 4696. Ответов 35 Метки rar, zip, архив, архивы (Все метки) Вынесено из темы Автоматическая распаковка архивов в указанную директорию Здравствуйте. А как-бы получить список файлов в зипе или в раре? Искал в интернете, но ничего внятного не не нашёл. Я, конечно, могу архив разрарить (или разиповать) в какую-то директорию и потом загнать полученный список в listbox, но как мне кажется, это не правильно. Ещё вопрос. Файлы, начинающая с тире (например "-файл1") при удалении не работают, пишет "не известный ключ (или команда)",при копировании файла вообще ничего не происходит. & """ """ & ничего не даёт. Как-бы удалять или копировать подобные файлы? . 0

@istomin_an62 5 / 5 / 0 Регистрация: 20.07.2020 Сообщений: 146
	18.03.2023, 16:47 [ТС]
	пишет, что: Кликните здесь для просмотра всего текста 0

@istomin_an62 5 / 5 / 0 Регистрация: 20.07.2020 Сообщений: 146
	18.03.2023, 17:22 [ТС]
	Большое спасибо. Теперь всё работает. А, для справки, в первом случае не подскажете строчку для смены кодировки? 0

@istomin_an62 5 / 5 / 0 Регистрация: 20.07.2020 Сообщений: 146
	18.03.2023, 17:39 [ТС]
	Что-то не понял. А, впрочем, это неважно, и так всё прекрасно работает, благодаря вашему коду. В первом случае буду разбираться. 0

@istomin_an62 5 / 5 / 0 Регистрация: 20.07.2020 Сообщений: 146
	18.03.2023, 18:58 [ТС]
	OwenGlendower, Понятно. 0

@istomin_an62 5 / 5 / 0 Регистрация: 20.07.2020 Сообщений: 146
	22.03.2023, 13:55 [ТС]
	OwenGlendower, Речь идет не только об удалении файла, но об его копировании и переносе. В моём случае проще, правда обязательно установить rar и его подкорректировать, но, опять-же, в моём случае, rar всегда установлен. 0

@istomin_an62 5 / 5 / 0 Регистрация: 20.07.2020 Сообщений: 146
	23.03.2023, 01:38 [ТС]
	OwenGlendower, Во всяком случае, спасибо. 0