asked on
Simple Point Of Sales Logic
The idea here is that the scanner will be pointing to txtProductstsScan control, then once the scan is done then the BARCODE text must be transferred to Description control in the subform which is set to show in column (2) , if this is archived then the whole line will automatically completed.
For example capturing the text below by scanner will result into three lines created in the subform
6009803227328
6009803227329
6009803227337
Must result into three lines created
Dim rst As Object
Set rst = [Form_sfrmInvoicedetails Subform].RecordsetClone
With rst
.AddNew
.Fields("Description") = CStr(Me.txtProductstsScan)
.Update
End With
Me.txtProductstsScan = ""
rst.Close
Set rst = Nothing
[Form_sfrmInvoicedetails Subform].Requery
DoCmd.GoToRecord , , acNewRec