Возвращает ID ключа защиты по индексу из списка доступных ключей.
Visual Basic:
Function GetKeyID(index As Long) As Long
index - индекс ключа в списке ключей
В случае успеха метод возвращает ID ключа, в противном случае метод вернет -1
Sub GetLicInfo 'Создаем объект ZLicInfo Set Info = CreateObject("ZuluLib.ZLicInfo") 'Читаем список ключей и получаем их количество count = Info.ReadKeyList 'Получаем ID первого ключа из списка IF count > 0 THEN MsgBox Info.GetKeyID(0) END IF End Sub