Scanner - Dataevent does not fire in MS Access 2002

Hi,

I have a Metrologic scanner (MS7120). In VB 6 I can scan products and when I scan them the "_dataevent" fires so I can read the barcode and deal with it.

My application is in Ms Access 2002 but I cannot get the "_dataevent" to fire when the scanner reeads a barcode.

Anyone can help on this?

Thanks a lot

Code I use (Working in VB6 but not in access 2002) :

Private Sub OPOSScanner5_DataEvent(ByVal Status As Long) ' Fill in the retrieved data lblScanData.Caption = OPOSScanner5.ScanData lblScanDataLabel.Caption = OPOSScanner5.ScanDataLabel ' Allow another data event to enter OPOSScanner5.DataEventEnabled = True End Sub