Как определить первый запуск приложения/Как разрешить удаление файла в папке приложения

Question

У меня есть старое приложение VB6, которое я распространяю с помощью PDW. Мне нужно определить после установки, если это первый запуск приложения. Каков самый простой способ сделать это?

В настоящее время я устанавливаю фиктивный текстовый файл и использую его существование как свидетельство первого запуска. Если firstrun.txt находится в каталоге приложения, я открываю подпрограмму, которая создает некоторые каталоги и копирует некоторые файлы, а затем удаляет файл txt. В следующий раз он пропустит подпрограмму, потому что firstrun.txt не существует. Работает идеально, пока пользователи не получат код ошибки 70, потому что у них нет соответствующего разрешения на удаление файла.

Это код, я использую, чтобы удалить текстовый файл:

mobjFSO.DeleteFile App.Path & "\firstrun.txt 

Кто-нибудь есть лучший путь? Или может кто-нибудь сказать мне, как разрешить программе удалять файл независимо от permisson?

Заранее благодарен!

Answer 1

Пробуйте противоположный подход. Если файл не существует, предположим, что это первый запуск. После первого запуска сделайте свое дело, напишите файл, но напишите его в пользовательскую область, такую ​​как C: \ Users \ myuser \ AppData в Windows. Это было бы более подходящим местом для хранения данных такого типа, и вы не будете испытывать одинаковые проблемы с разрешениями.