我如何才能在vb程序中实现m302 RFID读写器?

时间:2018-09-25 11:05:50

标签: vb.net serial-port rfid

我打算在我的CS课程中使用RFID阅读器(特别是kkmoon m302 reader/writer)作为登录/注销的选项以及其他一些功能。我已经了解了读者的工作方式:如何结合使用十六进制;如何使用vb访问和读取关联的com端口;我希望如何使用它,但遇到一个相当麻烦的情况-因为它是读写器,所以该设备不会自动扫描卡,这与其他用作键盘的变体不同,因此我无法制作它可以“搜索”一张卡,而无需使用附带不良软件的软件。

简而言之,我在问是否有人会知道如何强制读卡器进行扫描,因为一旦我知道如何进行扫描,便可以按照自己的意愿循环使用它。

作为参考,这是我用来从串行端口中获取任何数据的代码:

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

最终模块

0 个答案:

没有答案