vb读卡片中的信息，并写入数据库

Question

我现在在做《基于rfid的考勤管理系统》用vb坐的上层软件。现在点击Form1中的开始监控按钮，需要读出卡中的数据，数据库ID，表名daka。有name，sex，department,ID,dakatime。如果正确就把读出的数据写入数据库并且在Form1的DBGrid中显示出来，如果不正确重新读卡。
我正在坐毕业设计，急需，希望高手可以把代码写下，不胜感谢。

Answer 1

RFID能提供的就是用户的ID，就跟你IC一样，只要你读取到这个ID，所生成的纪录都是在建立在这个ID上。至于怎么读取RFID，厂家一般会提供示例，照着做就可以了。添加一个MSComm控件，MSComm1.CommPort =COM1， MSComm1.PortOpen = True
Private Sub MSComm1_OnComm()
Dim sRFID       As Variant
    TEXT1.TEXT = Mid(Trim(MSComm1.input), X, Y)  '需要看厂家提供的说明书
End Sub