Можно ли добавить лицензионный ключ для созданной программы в VB 6.0 ?

@-keksik- · Регистрация: 23.02.2014

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

Можно ли добавить лицензионный ключ для созданной программы в VB 6.0 ? Что бы ключ работал по железу?

@Антихакер32 · 25.02.2014, 20:00

в реестре запишите значение методом SaveSetting
и ссумируйте его вызовом GetSetting и перезаписью ...
так-же, поставтьте в код условие по достижению критического значение чтоб удалилась Kill Path

у вас появится, множество интересных идей по удалению собственных программ, если вы хотя-бы ознакомитесь для начала с базовыми знаниями файловых операций, и работой с реестром

Забыл добавить, программа сама себя удалить не сможет, от неё нужно передать управление батнику или временному exe-шнику, как-то так...

хотя батник может сам себя удалить по окончанию .... я делал так ...

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

@Pro_grammer · 25.02.2014, 20:09

Сообщение от -keksik-

На кол-во запусков программы.

Код на 5 запусков программы.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Form_Load()
'SaveSetting "VB6_My_proga", "My_section", "run_5", "0" ' Сброс счетчика
 
 All_run$ = GetSetting("VB6_My_proga", "My_section", "run_5", "0")
If Val(All_run$) < 5 Then
All_run = Val(All_run$) + 1
SaveSetting "VB6_My_proga", "My_section", "run_5", Str(All_run)
MsgBox "Осталось " & 5 - All_run & " запусков программы"
Else
MsgBox "Пробный период закончен"
End
End If
 
End Sub

@Антихакер32 · 25.02.2014, 20:12

Я бы тоже написал, идею-то я подал, просто у меня руки не так сильно чесались )
а там где "Пробный период закончен" надо вызывать батник
программа завершится а батник удалит программу и сам себя, всё ...

@The trick · 25.02.2014, 20:14

Не по теме:

Самая трудная задача для крэкера :D

Самая нормальная защита, в твоем случае писать 2 программы демо и обычная, демо - урезанный функционал.

@Антихакер32 · 25.02.2014, 20:26

здесь можно спокойно отследить реестр так-что это самая слабая защита

...зато простая

Добавлено через 5 минут
Представляю, что-бы сделал коллега The trick, если бы ему поручили защитить программу, там бы даже Сноуден не разобрался

@Pro_grammer · 25.02.2014, 20:48

Сообщение от The trick

демо - урезанный функционал.

Демо с урезанными функциями несомненно самая лучшая и не ломаемая защита

Но это не всегда приемлемо. Как убрать именно ту функцию, ради которой покупается программа и её необходимо протестировать пользователю?
Приходится делать ограничения по времени. Записывать данные об ограничении работы в реестр или файл конечно очень наивно. Тут и хакером быть не надо - сейчас куча программ, которые отслеживают установку программ для их последующего полного удаления. Они всё заметят и подскажут, где какие ключи реестра создавались, какие файлы.

@Антихакер32 · 25.02.2014, 21:14

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

и вовремя говорить ...досвидание....

или писать, я не запущусь, пока вы не выключите мониторинг меня ...

можно ещё пере-шифроваться, заподозрив неладное ... ,а за новым ключём, к производителю

Новые блоги и статьи Все статьи Все блоги /
GitHub Copilot в JetBrains: модель по умолчанию, Fix и контроль MCP and_y87 12.10.2026 10 октября 2026 года GitHub обновил Copilot для JetBrains: добавил настройки стартовой модели, исправления из диагностики и управление автозапуском MCP. Поддержка IDE 2025. 1 прекращена — требуется. . .	GitHub Copilot в JetBrains: модель по умолчанию, Fix и контроль MCP and_y87 12.10.2026 10 октября 2026 года GitHub обновил Copilot для JetBrains: добавил настройки стартовой модели, исправления из диагностики и управление автозапуском MCP. Поддержка IDE 2025. 1 прекращена — требуется. . .	День 5 из 28: Codex подсказывает следующий запрос and_y87 12.10.2026 9 октября 2026 года OpenAI запустила бету Composer predictions — подсказок следующего сообщения в текущем диалоге Codex. Это помощь с формулировкой запроса, а не автоматическое продолжение задачи. . . .	Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .

@-keksik- 0 / 0 / 0 Регистрация: 23.02.2014 Сообщений: 10

	Можно ли добавить лицензионный ключ для созданной программы в VB 6.0 ? 23.02.2014, 20:01. Показов 4062. Ответов 26 Метки нет (Все метки) Можно ли добавить лицензионный ключ для созданной программы в VB 6.0 ? Что бы ключ работал по железу? 0

@Антихакер32 1201 / 473 / 46 Регистрация: 06.01.2014 Сообщений: 1,797 Записей в блоге: 19
	25.02.2014, 20:00
	в реестре запишите значение методом SaveSetting и ссумируйте его вызовом GetSetting и перезаписью ... так-же, поставтьте в код условие по достижению критического значение чтоб удалилась Kill Path у вас появится, множество интересных идей по удалению собственных программ, если вы хотя-бы ознакомитесь для начала с базовыми знаниями файловых операций, и работой с реестром Забыл добавить, программа сама себя удалить не сможет, от неё нужно передать управление батнику или временному exe-шнику, как-то так... хотя батник может сам себя удалить по окончанию .... я делал так ... ...с другой стороны кому надо, могут декомпелировать ваш код, как бы глубоко его не прятали, потому-что запускать то всёравно придёться .... если только он не будет у вас болтаться в зашифрованном виде мертвым грузом ... 0

@Антихакер32 1201 / 473 / 46 Регистрация: 06.01.2014 Сообщений: 1,797 Записей в блоге: 19
	25.02.2014, 20:12
	Я бы тоже написал, идею-то я подал, просто у меня руки не так сильно чесались ) а там где "Пробный период закончен" надо вызывать батник программа завершится а батник удалит программу и сам себя, всё ... 0

@The trick Модератор 10068 / 3913 / 886 Регистрация: 22.02.2013 Сообщений: 5,863 Записей в блоге: 79
	25.02.2014, 20:14
	Не по теме: Самая трудная задача для крэкера :D Самая нормальная защита, в твоем случае писать 2 программы демо и обычная, демо - урезанный функционал. 1

@Антихакер32 1201 / 473 / 46 Регистрация: 06.01.2014 Сообщений: 1,797 Записей в блоге: 19
	25.02.2014, 20:26
	здесь можно спокойно отследить реестр так-что это самая слабая защита ...зато простая Добавлено через 5 минут Представляю, что-бы сделал коллега The trick, если бы ему поручили защитить программу, там бы даже Сноуден не разобрался 0

@Антихакер32 1201 / 473 / 46 Регистрация: 06.01.2014 Сообщений: 1,797 Записей в блоге: 19
	25.02.2014, 21:14
	Да можно конечно сделать очень мощную защиту, простыми способами программа должна тоже уметь угадывать намерения пользователя, вот и всё... и вовремя говорить ...досвидание.... или писать, я не запущусь, пока вы не выключите мониторинг меня ... можно ещё пере-шифроваться, заподозрив неладное ... ,а за новым ключём, к производителю 0