Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


конечно не уменьшает , убери строчку IniWrite($sIniFileName, "Run", "#", 5) (при каждом запуске в INI записывается значение 5 [т.е. осталось 4 запуска]).
Да я это нетак написал - запутал.

1 скрипт(по сути запускается один раз - создаёт "триальный" INI файл с числом запусков):
Код: Выделить весь код
Global $sIniFileName = @ScriptDir & "\trial.ini"
IniWrite($sIniFileName, "Run", "#", 5); Записываем в INI файл колличество отпущеных запусков
2 скрипт(сама программа ...):
Код: Выделить весь код
Global $sIniFileName = @ScriptDir & "\trial.ini"

$sReadData = IniRead($sIniFileName, "Run", "#", 0)

Switch $sReadData
    Case 0
        MsgBox(16,"","Вы исчерпали колличесво запусков!")
        Exit
    Case 1 To 5
        MsgBox(64,"","У вас осталось - " & $sReadData - 1 & " запусков")
        IniWrite($sIniFileName, "Run", "#", $sReadData - 1)
EndSwitch

Отправлено: 06:20, 28-11-2009 | #8