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

Показать полную графическую версию : [решено] предупреждене об установленной программе.

CompModdd

07-11-2009, 22:19

Подскажите пожалуйста, как можно сделать чтобы при повторной установке программы скрипт писал что программа уже установлена, ну а дальше отменяет установку.
Кажись подобное действие видел в программах с диска Xtreme.WPI.

Creat0R

07-11-2009, 22:46

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

CompModdd

07-11-2009, 23:52

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

Yashied

08-11-2009, 02:01

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

CompModdd

09-11-2009, 00:53

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

CompModdd

15-11-2009, 14:24

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

FlatX007

15-11-2009, 15:00

На примере архиватора 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

15-11-2009, 19:10

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