Я намерен использовать RFID-ридер (в частности, kkmoon m302 reader / writer ) в моей курсовой работе CS, чтобы выступать в качестве опции для входа / выхода и некоторых других функций.У меня есть представление о том, как работает читатель: как использовать гекс в сочетании с ним;как получить доступ и прочитать связанный com-порт с помощью vb;как я хочу его использовать, но я сталкиваюсь с довольно проблемным обстоятельством - поскольку это устройство чтения / записи, устройство не сканирует карты автоматически, в отличие от других вариантов, которые действуют как клавиатура, поэтому у меня нет способа сделатьон «ищет» карту, не используя плохо собранное программное обеспечение, которое идет в комплекте.
Короче, я спрашиваю, может ли кто-нибудь знать, как заставить сканер карт сканировать, как только я знаю, какя могу зациклить его и использовать по своему усмотрению.
Для справки, вот код, который я использовал для извлечения любых данных из последовательного порта в его нынешнем виде:
Module Module1
Sub Main()
Console.WriteLine(ReceiveSerialData())
Console.ReadLine()
End Sub
Function ReceiveSerialData() As String
' Receive strings from a serial port.
Dim returnStr As String = ""
Dim com1 As IO.Ports.SerialPort = Nothing
Try
com1 = My.Computer.Ports.OpenSerialPort("COM1")
com1.ReadTimeout = 10000
Do
Dim Incoming As String = com1.ReadLine()
If Incoming Is Nothing Then
Exit Do
Else
returnStr &= Incoming & vbCrLf
End If
Loop
Catch ex As TimeoutException
returnStr = ("Error: Serial Port read timed out.")
Finally
If com1 IsNot Nothing Then com1.Close()
End Try
Return returnStr
End Function
Конечный модуль