Программирование RFID с VB.NET |Часть II - PullRequest
0 голосов
/ 02 декабря 2011

Это сообщение относится к сообщению до этого: Программирование RFID с VB.NET

Спасибо за ответ. Марк, я уже изменил их на целое число (потому что оно не соответствует, когда порт так долго, но dc_init как целое), я решил изменить все с помощью Integer. И это работает.

Теперь у меня другая проблема. После работы dc_init (после того, как я изменил тип данных на целое), у меня возникла проблема при вызове функции dc_cards.

Для получения дополнительной информации о функции dc_init я также включаю файл руководства (из стартового пакета RFID)

Вот то, что вам нужно увидеть: Скачать

Извините, я не могу объяснить более подробно об этой проблеме, потому что я не могу опубликовать изображения и только 2 ссылки, которые я могу включить. Может быть, это поможет, загрузив эти вещи выше. Он включает в себя мой проект в VB.NET и пример программы VB6 (она работает и не содержит ошибок), файл dcrf32.dll (скопируйте их в system32 драйвер для RFID).

Я делаю это в VB.NET в соответствии с примером программы VB6 (из начального пакета), но это довольно сложно с момента перехода с VB6 на VB.NET.

Мне действительно странно с этим кодом, я никогда его не изучаю и не знаю, что делать. Может быть, Марк мог бы помочь мне в моей ситуации. Большое спасибо.

1 Ответ

0 голосов
/ 02 декабря 2011

Декларация для функции dc_card должна быть:

Declare Auto Function dc_card Lib "dcrf32.dll" (ByVal icdev As Integer, ByVal mode as Short, snr As Integer) As Short

Вы должны передать icdev, полученный из функции dc_init, и режим 0, ваша информация будет в переменной snr, а статус будет в st.

st = dc_card(ByVal icdev, cardmode, snr)

в вашем объявлении:

Dim snr, tagtype as Integer
Dim cardmode as Short

...
...