Search results

The demo db works ok but the same concept when I transfer it to the actual POS I'm getting an on the calculator code even after changing the external sub to public. Here are the changes I did make Public Sub txtProductCode_AfterUpdate() Dim lngProdID As Long If Not (IsNull(mID)) Then...

Many thanks arnelgp exactly that is what I was looking for

This scenario is based on a POS touch screen where you cannot see any keyboard for data entry, now in MS Access we built a Keyboard unbound form to assist in capturing data. The reason why we did it that way is that there are some situations when the scanner fails to scan the barcode, and so the...

This is excellent job and well done arnelgp it was not easy to think in those lines I'm sure it will help others well

Under what circumstances does the original code not work? Sometimes it starts with 0 ,1,2,3 etc instead of starting from 1,2,3 etc if it finds that there is no record in the subform it will start from 0,1,2,3 etc instead of 1,2,3,4 etc, but I thought the reason we are putting NZ is to ensure...

Hi all, The code below is coming from the solution previously given, fair enough that was excellent, but last night when I was now doing an extensive testing, I discovered that the VBA Code below sometimes will start numbering rows in the subform from 0,1,2,3 ,4 etc instead of always starting...

The truth here is to index your queries and ensure that every table involved has a primary key and properly indexed, what is delaying your query is the sorting part. I had that same problem with the query below it used to take something like five minutes before indexing now it's taking 1.5...

Many thanks sir, I think you are a genius, this exactly what I was battling with for many days Private Sub Form_BeforeInsert(Cancel As Integer) Dim rst As DAO.Recordset Dim LastSequenceNumber As Long Set rst = Me.RecordsetClone If rst.RecordCount = 0 Then LastSequenceNumber = 0...

Sorry I'm using MS Access in this case not MYSQL

Is the ID field of tblLineDetails really a text datatype? The ID is a foreign key and Me.txtInvoiceID does not exist anywhere strCriteria = "InvoiceID = " & Me.txtInvoiceID & " AND ID <= " & Me.txtCotrolID

Hi Yesterday I came to learn that the access database does not have a row line numbering system, for example if an invoice has ten rows, how can we also number those rows from one to ten. I tried the small database below I cannot get write. See if you can figure it out. EG 1 2 3 4 I want...

Thank you so much, that is exactly what I was looking for, many thanks also go to other respondents

Instead of the users lookup for the correct product code/barcode from the subform I want the users to simply scan the barcode from the parent form from the control called productcode and once that is done then the after update event fires and update the subform. Option Compare Database Option...

If you have Adobe Professional (not Adobe Reader!) you can use this code by Christos Samaras, just change line 8 to match your pdf folder (keep the \*pdf part). Option Explicit Option Private Module Sub ExportAllPDFs() Dim StrFile As String StrFile = Dir("C:\PdfFolder\*pdf")...

We dumped MS SQL Server for MYSQL as relational database due to speed we have been using this MYSQL databases with MS Access as front end and has proved to be reliable and our users like the speed compared to MS SQL Server which makes the speed horrible even if you do what is so called tunning...

Thank you so much it has worked very well

See the error down

I'm trying to work on this VBA which helps to send invoices to customers silently without opening outlook, but on the .Edit I'm getting an error message what could be the reason for that and how to fix it. However, this is not my code I got it on the internet, Im simply trying to see if it can...

If think upgrading to 2019 or 365 offices will be ok