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

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

Аватара для FlatX007

Ветеран


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

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


Всё просто :

Код: Выделить весь код
#include <file.au3>

Global $sIniFileName = @ScriptDir & "\trial.ini"

;~ IniWrite($sIniFileName, "Run", "#", 5); Записываем в INI файл колличество отпущеных запусков

If Not FileExists($sIniFileName) Then _FileCreate ($sIniFileName)
$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
Это сообщение посчитали полезным следующие участники:

Отправлено: 17:36, 27-11-2009 | #6