Что нового

Подскажите какую привязку выбрать?

StarEdik

Новичок
Сообщения
365
Репутация
4
madmasles
Большое вам спасибо.Скачаль,обновил,Тоже самое
Код:
C:\Program Files\AutoIt3\Include\WinAPIEx.au3(841,33) : ERROR: $__WINVER previously declared as a 'Const'
Global Const $__WINVER = __Ver()
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Program Files\AutoIt3\Include\WinAPIEx.au3(31709,13) : ERROR: __Ver() already defined.
Func __Ver()
~~~~~~~~~~~~^
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
StarEdik [?]
Скачиваете архив по ссылке выше, распаковываете его, в нем 7 файлов и папка. Все три файла *.au3 копируете в папку Диск:\Program Files\AutoIt3\Include. Все.
 
Автор
B

Black_Night

Новичок
Сообщения
67
Репутация
1
А мне помоч можете что и где писать и что означает консольрайт?
Объясните плиз..
 

Medic84

Омега
Команда форума
Администратор
Сообщения
1,590
Репутация
341
Black_Night

Предупреждение За нарушение общих правил (пункт В.8):
Так как эта конференция называется "Русское сообщество AutoIt", язык общения на ней - Русский. Названия фирм или программных продуктов, аббревиатуры и т.д. должны быть написаны так, как они пишутся в оригинале, например не следует писать УСБ вместо USB. На форуме крайне не рекомендуется намеренно искажать русский язык и использовать "сетевой жаргон" на подобии "Аффтар выпей йадау!".


С уважением, ваш Администратор.





Если вы про
Код:
ConsoleWrite()

То нажмите на него...
 
Автор
B

Black_Night

Новичок
Сообщения
67
Репутация
1
Медик, извиняюсь прост я в этом можно сказать не понимаю.. только начинаю обучение..
Мне бы желательно готовый исход показа ключей (не через DriveGetSerial), а через _WinAPI_UniqueHardwareID
И сама привязка..
Вот можете переделать под _WinAPI_UniqueHardwareID прошу
Это показ ключа в компоненте edit
Код:
$Edit2 = GUICtrlCreateEdit("", 80, 120, 105, 17, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN), 0)
$s_Serial = DriveGetSerial(StringLeft(@ScriptDir, 2))
GUICtrlSetData(-1, $s_Serial)


а это функция привязки
Код:
Func _ValidateSerial()
    Local $s_Serial, $a_Control, $s_TextFromSite

    $s_TextFromSite = InetRead('http://updchsd3d.16mb.com/updater/Setting.ini')
    If @error Then Return SetError(-1)
    $s_TextFromSite = BinaryToString($s_TextFromSite)
    $s_Serial = DriveGetSerial(StringLeft(@ScriptDir, 2))
    If @error Then Return SetError(1)
    $a_Control = _IniString_ReadSection($s_TextFromSite, 'Options')
    If @error Then Return SetError(1)
    For $i = 1 To $a_Control[0][0]
        If $a_Control[$i][1] == $s_Serial Then Return SetError(0, 0, 1)
    Next
    Return SetError(0, 0, 0)
EndFunc   ;==>_ValidateSerial

Прошу помощи!
 
Автор
B

Black_Night

Новичок
Сообщения
67
Репутация
1
Законый АП
ПыСЫ: Убиватор, привязка через DriveGetSerial чуть ли не самая провальная, т.к. она привязывает не к венику, а к тому веника и её можно перевести на другой комп сделав образ..
 

Yashied

Модератор
Команда форума
Глобальный модератор
Сообщения
5,379
Репутация
2,724
Предупреждение За нарушение общих правил (пункт В.8):
Так как эта конференция называется "Русское сообщество AutoIt", язык общения на ней - Русский. Названия фирм или программных продуктов, аббревиатуры и т.д. должны быть написаны так, как они пишутся в оригинале, например не следует писать УСБ вместо USB. На форуме крайне не рекомендуется намеренно искажать русский язык и использовать "сетевой жаргон" на подобии "Аффтар выпей йадау!".
 
Верх