[решено] предупреждене об установленной программе.

Creat0R · Конфигурация компьютера

А подробнее? Программа устанавливается посредством AutoIt скрипта?
Можно проверять в реестре, или если путь установки постоянно один и тот же, тогда по пути и exe'шнику в нём.

CompModdd · Отправлено: **23:52, 07-11-2009** | #3

Вот нашол этот диск Extreme.WPI 1.0
Допустим если установить из него foxit reader первый раз он устанавливается.
Если второй раз его запустить на установку то он пишет программа уже установленна, и через 3-4 сек окно закрывается и на этом все.
Вот просто интересно как в этом Extreme.WPI 1.0 это реализованно ???

Yashied · Отправлено: **02:01, 08-11-2009** | #4

Способ нужно выбрать самому. В принципе, Creat0R уже ответил на этот вопрос. Лично я записываю путь к установленной программе в реестр, а затем проверяю наличие файлов по этому пути. Если записи в реестре нет или нет необходимых файлов по этому пути, то программа не установлена. Твоя программа скорее всего делает тоже самое, поэкспериментируй с этим.

CompModdd · Отправлено: **00:53, 09-11-2009** | #5

Чтож буду эксперементировать, просто интересно как в тех программах это реализованно.

CompModdd · Отправлено: **14:24, 15-11-2009** | #6

Ещё вопрос ???
Какими способами упределить установленна программа или нет это я понял ( можно с помощью команд FileExists это чтоб найти файлы илиже посмотреть запись в реестре)
Но что до меня не доходит, это как сделать это автоматом. Тойсть если скрипт что такой папки нет то запускает установку программы а если он видит нужные ему файлы/папку то просто прекращает работу скрипта и выдает сообщение типа программа уже установленна.

FlatX007 · Отправлено: **15:00, 15-11-2009** | #7

На примере архиватора 7 - Zip

Код:

Switch FileExists(@ProgramFilesDir & "\7-Zip\7zFM.exe")
    Case 1
        MsgBox(0, Default, "Архиватор 7-Zip установлен, программа будет закрыта!")
        Exit
    Case 0
        $iMsgBox = MsgBox(292, Default, "Архиватор 7-Zip НЕ установлен, нажмите ДА для продолжения установки")
            Select
                Case $iMsgBox = 6 ;Yes
                    If FileExists(@ScriptDir & "\7z465.exe") Then RunWait(@ScriptDir & "\7z465.exe", @ScriptDir)
                Case $iMsgBox = 7 ;No
                    Exit
            EndSelect
EndSwitch

CompModdd · Отправлено: **19:10, 15-11-2009** | #8

FlatX007, спасибо щас буду пробовать/экспериментировать.