С контекстным меню я разберус посредством FileMenuTools.
Но есть вопрос по командной строке
Вот кусок скрипта, с использованием winrar. Просто принято решение, отказаться от winrar по ряду всем известным причинам.
Код:
filePath = """F:\welding\""" 'Тут указываем, то что архивируем.
archPath = """G:\archive_welding\welding.rar""" 'Куда архивируем, плюс название.
winRarPath = """c:\Program Files\WinRAR\winrar.exe""" 'Путь к архиватору, у нас это winrar.
parm1 = "-x*.exe -x*.ex_ -x*.indd -x*.pak -x*.jpg -x*.bmp -x*.avi -x*.mpeg -x*.mpg -x*.thm -x*.mp4 -x*.asf -x*.ifo -x*.vob -x*.bup -x*.gif -x*.tiff -x*.tif -x*.eps -x*.otf -x*.pf* -x*.tmp -x*.rar -x*.zip -x*.mp3 -x*.db -x*.ini -x*.pdf -x*.djvu -x*.opt -x*.pac -x*.msi -x*.inf -x*.ppt -x*.wmv -x*.psd"
Set fs = CreateObject("Scripting.FileSystemObject")
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run winRarPath & " a -t -m3 -r -y -dh -agDD-MMM-YY -ep2 " & parm1 & " " & archPath & " " & filePath, 0, True
Можно указывать исключения файлов добавления в архив, по маске?
Второе есть модуль sfx измененный, который всеми антивирусами определяется как вирус.
