Bluetooth и Visual Basic

[BasiС]

Уважаемые коллеги!

Сшил я своего франкенштейна для работы с блютуз, РЕШИЛ НАЧАТЬ С ПОИСКА УСТРОЙСТВ. Неделю гуглил, портировал коды с дельфи и с С и т.д.
На настоящий момент, сокет открывается, при переходе к WSALookupServiceBegin IDE вылетает
Возможно я что-то не так объявил?

Кто-нибудь может помочь?

full code:

Код: Выделить всё

Актальный проект приаттачен ниже

[JohnK]

Попробуй посмотреть код последней ошибки, что не нравиться...

[BasiС]

в том то и дело, что IDE вылетает и WSAGetLastError не катит =(

[Twister]

Попробуй в объявлении WSALookupServiceBegin изменить первый параметр на ByVal Long и сразу передавать указатель на структуру.

Кстати, мог бы ты поделиться линками на сорцы и статьи, которые ты использовал по теме?

[BasiС]

Попробуй в объявлении WSALookupServiceBegin изменить первый параметр на ByVal Long и сразу передавать указатель на структуру.

При изменении первого параметра на ByVal сразу при запуске выводится ошибка:


я так понимаю, что значение не может быть возвращено. поэтому ругается.

Можно подробнее про передачу указателя на структуру сразу - как это можно сделать?

Кстати, мог бы ты поделиться линками на сорцы и статьи, которые ты использовал по теме?

Не проблема может помогут:

http://www.rsdn.ru/forum/message/987714.flat.aspx#987714
http://bbs.vbstreets.ru/viewtopic.php?t=28560
http://www.experts-exchange.com/Programming/Languages/Visual_Basic/Q_21499292.html
http://www.realcoding.net/article/rubric/Delphi/bluetooth?ShmID=e8aaa345a4631c12e5d3bc8c2df11027
http://www.foromsn.com/index2.php?Ver=Mensaje&Id=303785&WebOrigen=1&VerEtiqueta=32

ну и google с MSDN-ом немного рулят. (совсем чуть чуть)


На всякий случай приаттачу свой проект, т.к. представленный выше код - не полный:

[JohnK]

Проблема в WSAQuerySet 100%!
Нужно проверить все поля на правильный тип данных, не мешало бы найти файл bthsdpdef.h

[BasiС]

Есть небольшие подвижки. (помогли товарищи с соседнего форума)
Дописал продолжение кода. Сообщение о поиске уже появляется, а вот название найденного BT устройства в структуру не возвращает
Ругается что "Буфер для хранения QUERYSET недостаточен."

Нужно проверить все поля на правильный тип данных, не мешало бы найти файл bthsdpdef.h

Интересно, чем этот файл может мне помочь?

[JohnK]

Интересно, чем этот файл может мне помочь?

Он содержит точное описание всех вышеперечисленных структур

[BasiС]

Интересно, чем этот файл может мне помочь?

Он содержит точное описание всех вышеперечисленных структур

Спасибо, буду смотреть!