Search results

Hello, You can test the values of your controls with IF before to copy as : Private Sub btnCopytoNewRecord_Click() Dim Salutation As String Dim First_Name As String Dim Surname As String 'Copy fields to variables Salutation = Me.Salutation First_Name = Me.First_Name Surname =...

Hello, You can use the following query to get your result : SELECT (SELECT Count(DatePurchased) FROM Table1 as T2 WHERE T2.DatePurchased<T1.DatePurchased AND T2.Name=T1.Name AND T2.Drinks=T1.Drinks)+1 AS Count, * FROM Table1 AS T1 ORDER BY T1.Name, T1.DatePurchased;Good continuation

Hello, You can use Nz function as : SELECT qryWarranty.MonthOf, nz(qryWarranty.AcceptedWarranties,0)as WarrantiesAccepted FROM qryWarranty;Good continuation.

Hello, Why didn't you use the same SQL syntaxe UPDATE in your right code to EDIT as : Private Sub cmdEdit_Click() 'check whether there exists data in list If Not (Me.TableSub.Form.Recordset.EOF And Me.TableSub.Form.Recordset.BOF) Then 'Get data to text box control 'otherwise (Tag of txtID...