HV VB6 VK API

OCX Для работы с API Вконтакте
Предназначен для пользователей Visual Basic 6)

Подключить vkApi.ocx.
Добавляем на форму:
1 TextBox
1 CommandButton
1 Listbox
1 vkApi


Пример вызова api:

Private Sub Command1_Click()
List1.Clear
vkApi1.VKSend "audio.search", "count=50&q=" & Text1.Text
End Sub

Пример приема данных api:

Private Sub vkApi1_VKGETData(sData As String, sMethod As String)
List1.AddItem vkApi1.GetVal(sData, "artist") & " - " & vkApi1.GetVal(sData, "title")
End Sub

Скачать Visual Basic 6 можно по ссылке ниже:
https://cloud.mail.ru/public/4d49f40001c2%2Fvb6.exe

Пишите Ваши предложения мне на мейл:
hvsoft.ru@gmail.com
Или ВКонтакте:
https://vk.com/hvsoft


С уважением:
Hovo