Удаление комментариев из кода

[dab00]

Здравствуйте, уважаемые форумчане!
Представляю вашему вниманию скрипт для удаления комментариев - апострофа (символа " ' "), пробелов, табуляций из файлов исходного кода на VB - в вашем случае модулей .bas - нет на форуме темы VB - Excel (VBA) самая подходящая.
Скрипт создает новый файл с префиксом "New-". Работает в графическом и консольном режиме. Использует регулярные выражения, поэтому довольно шустрый.
Скачать можно здесь: http://da440dil.narod.ru/download.html

[dab00]

- скрипт для удаления комментариев из файлов исходного кода VB: апострофов, rem, пробелов, табуляций
- работает в графическом и консольном режиме (на случай отсутствия библиотеки, необходимой для вызова диалогового окна)
- в графическом режиме предлагает выбрать файлы в диалоге
- в консольном режиме принимает в качестве аргументов полные, относительные пути или только имена файлов
- создает новые файлы с префиксом "New-"
- в завершение работы отображает сообщение с отчетом об удалении комментариев из каждого файла
- подробно закомментирован, при желании разберутся все

[vikttur]

Было бы хорошо почитать мнение, комментарии специалистов по этому файлу (типа "хорошо/плохо").

[dab00]

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

Было бы хорошо почитать мнение, комментарии специалистов по этому файлу (типа "хорошо/плохо").

Попробуйте и сообщите свое

[vikttur]

Я не специалист и мнение знающих просил для себя. Мнение не по пользованию, а по сравнению с уже существующими подобными программами.

[dab00]

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

мнение знающих просил для себя

Стало быть Вас интересует подобный функционал?

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

по сравнению с уже существующими подобными программами

Например? Я пробовал один скрипт, который удаляет все после апострофа, но на подобном коде:

wmiServices.ExecQuery("ASSOCIATORS OF {Win32_DiskDrive.DeviceID='" _
        & DevID & "'} WHERE AssocClass = Win32_DiskDriveToDiskPartition")

он, разумеется, накосячил. Написал свой.
Т.к. пост в форуме Microsoft Office Excel, поясню на примере Excel.
Вы написали приложение Excel - несколько тысяч строчек кода на VBA.
Перед сдачей в эксплуатацию решили удалить все комменты, пробелы, табуляции: уменьшить размер приложения + максимально усложнить анализ кода на случай последующего отказа заказчика от Ваших услуг. С помощью этого скрипта можете реализовать: либо копированием-вставкой кода в файл-обратно в модуль, либо экспортом-импортом модуля.
Такой вот простенький обфускатор для VB.

[EducatedFool]

Для VBA есть куда более удобная утилита VBA Code Cleaner, удаляющая комментарии и пустые строки из кода:

Такой вот простенький обфускатор для VB.

Это не обфускатор.
Вот если бы вы сделали обфускатор, встраиваемый в приложения Office (COM add-in), который бы делал код нечитаемым, при этом работал в Excel всех версий (до 2007-2010 включительно) - вот за это мы были вам очень благодарны
(такие обфускаторы есть, но либо они неудобны в использовании, и в них вшиты ключевые слова только из ранних версий Office, либо они предназначаются для VB - соответственно, для VBA не применимы)

[vikttur]

Спасибо за ответ.

[dab00]

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

Для VBA есть куда более удобная утилита VBA Code Cleaner, удаляющая комментарии и пустые строки из кода:

Действительно более удобная, спасибо.

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

Вот если бы вы сделали обфускатор, встраиваемый в приложения Office

Не сделаю. Свою задачу решил (чистил код VBS), возможно в следующей реинкарнации скрипта реализую рандомизирование имен переменных и констант. В VBA Code Cleaner не обнаружил подобного функционала.

[dab00]

Представляю очередную реинкарнацию скрипта для преображения кода VB.
Возможности:
- удаление комментариев, пробелов, табуляций, переноса строк
- переименование функций, процедур, классов, свойств, методов, явно объявленных переменных, констант (только VBS)
В графическом режиме позволяет выбрать несколько файлов.
В консольном режиме принимает в качестве аргументов абсолютные, относительные пути или только имена файлов.
В секции объявления переменных можно изменить:
- максимальную длину нового случайного имени в символах (по умолчанию - 10)
- процент символов алфавита в новом случайном имени (по умолчанию - 60)
- необходимость переименования переменных и пр. (по умолчанию - True)
- необходимость создания файла журнала переименования (по умолчанию - False)
- префикс нового имени файла (по умолчанию - New)
- суффикс имени файла лога (по умолчанию - "-log-" & Date() & ".csv")
Скрипт создает в каталоге с файлом исходного кода новый файл с указанным префиксом, а также, в случае необходимости, CSV-файл с отчетом о переименованных переменных и пр., в завершение работы отображает сообщение с отчетом о результате работы с каждым файлом.