Сообщение при первом запуске программы

@Sac Svipe · Регистрация: 02.08.2012

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

Как сделать так, чтобы при первом запуске программы, вадавало любое сообщение (MsgBox), а при всех последующих - ничего не вылезало...

dev.Free · 22.09.2012, 13:57

Сообщение от Sac Svipe

Как сделать так, чтобы при первом запуске программы, вадавало любое сообщение (MsgBox), а при всех последующих - ничего не вылезало...

Для начала какую цель ты преследуешь? Можно создать текстовый файл в него писать "Запуск выполнен" и если надпись есть, тогда MSGBOX не выдавать, и если нету, тогда писать.

dev.Free · 22.09.2012, 14:06

Вот на примере .INI файла.

Dragokas · 22.09.2012, 20:47

Sac Svipe, например через реестр:

Visual Basic
1
2
3
4
5
6
7
8
9
10
sub FirstRun()
Dim ret&
on error resume next
ret = CreateObject("WScript.Shell").RegRead("HKEY_CURRENT_USER\Software\MyProgram\FirstRun")
on error resume 0
if ret=0 then 
  CreateObject("WScript.Shell").RegWrite "HKEY_CURRENT_USER\Software\MyProgram\FirstRun", 1, "REG_BINARY"
  msgbox "Первый запуск"
end if
end sub

@Казанский · 23.09.2012, 00:04

Вообще-то есть штатные средства для работы со специальным разделом реестра

Visual Basic
1
2
3
4
5
6
Sub bb()
If GetSetting("MyProg", "General", "SkipIntro") = "" Then
    MsgBox "Первый запуск!"
    SaveSetting "MyProg", "General", "SkipIntro", 1
End If
End Sub

Dragokas · 23.09.2012, 01:00

Добавлю, что этим ключ будет записан по адресу:

Code
1
HKEY_CURRENT_USER\Software\VB and VBA Program Settings\MyProg\General\SkipIntro

Данный способ не подойдет в случае необходимости установки флага для "всех пользователей".
Альтернативой есть способ поста № 3,
или запись в ветку HKEY_LOCAL_MACHINE\Software\ или HKEY_USER\DEFAULT\Software
при наличии прав администратора на запись в эти разделы.

@dzug · 23.09.2012, 02:29

Сообщение от inv.DS

Вот на примере .INI файла.

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

Dragokas · 23.09.2012, 03:06

Только слегка поправить:

Visual Basic
1
2
writeINI App.Path & "\test.ini", "Параметр", "Показать_сообщение", "Нет"
'b = dk(App.Path & "\test.ini")

dk - это Вы пытались модифицировать дату? ... но тогда и дату создания файла тоже нужно.
Все равно Filemon засечет.

@dzug · 23.09.2012, 06:14

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

Только слегка поправить:

Visual Basic
1
2
writeINI App.Path & "\test.ini", "Параметр", "Показать_сообщение", "Нет"
'b = dk(App.Path & "\test.ini")

dk - это Вы пытались модифицировать дату? ... но тогда и дату создания файла тоже нужно.
Все равно Filemon засечет.

Да. Дату создания файла почему то не меняет. А надо бы..

dev.Free · 23.09.2012, 06:49

Не по теме:

Да вы издеваетесь, человек спросил простую задачу, вы же тут FileMon приписали, скрыть дату создания файла, может файл еще защифровать в 128 битном ключе? Нет я конечно понимаю, что у программистов может разыграться фантазия, но не настолько же ! ! ! !

@dzug · 23.09.2012, 07:20

Сообщение от inv.DS

Не по теме:

Да вы издеваетесь, человек спросил простую задачу, вы же тут FileMon приписали, скрыть дату создания файла, может файл еще защифровать в 128 битном ключе? Нет я конечно понимаю, что у программистов может разыграться фантазия, но не настолько же ! ! ! !

Извините .

Лезут по ночам в голову всякие дурные мысли. :black_eye.:

Новые блоги и статьи Все статьи Все блоги /
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .

@Sac Svipe 3 / 3 / 0 Регистрация: 02.08.2012 Сообщений: 96

	Сообщение при первом запуске программы 22.09.2012, 13:35. Показов 1727. Ответов 10 Метки нет (Все метки) Как сделать так, чтобы при первом запуске программы, вадавало любое сообщение (MsgBox), а при всех последующих - ничего не вылезало... 0

dev.Free Заблокирован
	23.09.2012, 06:49
	Не по теме: Да вы издеваетесь, человек спросил простую задачу, вы же тут FileMon приписали, скрыть дату создания файла, может файл еще защифровать в 128 битном ключе? Нет я конечно понимаю, что у программистов может разыграться фантазия, но не настолько же ! ! ! ! 1

Сообщение при первом запуске программы

Решение