Создание архива средствами 7zip

LastSoldier · Регистрация: 07.05.2013

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

Всем привет!
Вот пытаюсь написать скрипт на vbs, который должен заархивировать два файла test.txt и test1.txt и положить архив по пути D:\Backup\, так же в имени архива должна быть дата и время создания архива (test_yyy.mm.dd_hh.mm.ss)
Метод сжатия должен быть -t7z -mx9 -m0=lzma2.
Архив должен быть автоматически запаролен (Пароль qwerty).
И еще должен быть создан лог о том что с архивом все в порядке.

Это рабочий пример Bat скрипта с такой же задачей.

Windows Batch file
1
2
3
4
5
6
set MYTIME=%TIME: =0% 
set MYTIME=%MYTIME::=.% 
set MYTIME=%MYTIME:~0,-8%
set MyDate=%date:~6,4%.%date:~3,2%.%date:~0,2%
 
"c:\Program Files\7-Zip\7z.exe" a -t7z -mx9 -m0=lzma2 D:\Backup\test_%MyDate%_%MYTIME%.7z -p24877 D:\test.txt  D:\test1.txt >> D:\Backup\backup_test_log_%MyDate%_%MYTIME%.txt

Вот наброски, не знаю как добавить пароль и создание лог файла.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Set WshShell = CreateObject("WScript.Shell")
 
Dim d : d = Date()
Dim dateStr : dateStr = Year(d) & "." & Right("00" & Month(d), 2) & "." & Right("00" & Day(d), 2)
Dim t : t = Time()
Dim timeStr : timeStr = Hour(t) & "." & Right("00" & Minute(t), 2) & "." & Right("00" & Second(t), 2)
 
WshShell.Run ("""C:\Program Files\7-Zip\7z"" a -t7z -mx9 -m0=lzma2 ""D:\Backup\test_" & dateStr & "_" & timeStr & ".7z""  ""D:\test.txt"" ""D:\test1.txt""")
 
Set WshShell = Nothing
 
rem WScript.Quit 0

FlasherX · 26.12.2020, 12:55

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

У меня стоит x64

Я вижу. Поэтому и предлагаю проверить на x32. Распакуйте куда-нибудь архив и пропишите вместо %ProgramFiles%\7-Zip в коде новый путь.
Заодно протестируйте на обеих версиях с добавкой G в ..\7zG.exe в имя.

LastSoldier · 26.12.2020, 12:55 **[ТС]**

Сейчас еще раз проверил если файлы заполнены чем-то, то и -bb3 отрабатывает.

FlasherX · 26.12.2020, 13:06

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

Ваши разархивированные txt файлы весят по 2 байты

Почему-то думал, что это новый вариант с нулёвками. Пустышки и правда не просят пароль в 7z аналогично zip. Но всегда можно зашифровать заголовки, добавив -mhe=on, тогда запрос точно будет.

LastSoldier · 26.12.2020, 13:26 **[ТС]**

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

-mhe=on

Так это еще лучше получается, чтобы никто содержимое не видел

Спасибо!

Новые блоги и статьи Все статьи Все блоги /
сукцессия 30. Фосфорный и азотный замки по "честному" закону лимитирования Либиха anaschu 16.07.2026 Основные достижения за последние дни 1. Механизм отложенного высвобождения фосфора Добавлен специальный пул для медленного разложения меланизированных гиф ЕСМ Реализована разная скорость. . .	Запрет пометки на удаление и отмены проведения Maks 16.07.2026 Алгоритм из решения ниже реализован на нетиповом документе "ПутевойЛист" разработанного в КА2. Задача: запретить помечать на удаление и отменять проведения путевого листа при условии, если он сдан. . .	Как надо было делать правильно - вообще не слушать ИИ, его дело - текст. Hrethgir 15.07.2026 А вообще надо было делать не так, чтобы не исправлять ошибку https:/ / www. cyberforum. ru/ blogs/ 223907/ 10996. html , правильно было : удалил кнопку, а потом добавил её. Всё это стресс конечно. Почему?. . .	Знаете, от чего появляется стресс? kumehtar 15.07.2026 Стресс появляется оттого, что вы, зная как поступить правильно, делаете наоборот. Ларри Уингет
Нас бьют, а мы крепчаем? Какая чушь! kumehtar 15.07.2026 Вот это вот бытующее мнение, что человек меняется только под действием проблем, всегда считал вредоносным. Поверь, от проблем у людей появляются не изменения, а нервное расстройство и ПТСР. А. . .	сукцессия 29. Переход от одних деревьев на другие делать более или менее вероятностным? anaschu 12.07.2026 Насколько смена типов микоризы — исключительное событие в двухвековой сукцессии? Оценка вероятности в пространстве параметров В текущей версии модели успешно реализован ключевой механизм. . .	сукцессия 27. Думаю, как переделывать уже написанную статью с планами на сукцессию. anaschu 12.07.2026 Анализ соответствия модели требованиям Реализованные компоненты: Механизм закисления почвы через протонную помпу Конкуренция между типами микориз pH как триггер сукцессии C/ P соотношение. . .	Сукцессия 26. Мат модель создана. anaschu 12.07.2026 Модель смены растительных сукцессий посредством управления грибами работает внутри небольшой ячейки почвы, восстанавливающейся после пожара, где ненадолго бывшее царство хвойных снова захватили. . .

LastSoldier 2 / 2 / 0 Регистрация: 07.05.2013 Сообщений: 169
	26.12.2020, 12:55 [ТС]
	Сейчас еще раз проверил если файлы заполнены чем-то, то и -bb3 отрабатывает. 0

Создание архива средствами 7zip

Решение