You can use group by: select favorite from t group by favorite order by count(*) desc fetch first 1 row only; This is ANSI-standard sequence. Different databases have different ways of expressing the fetch first clause. In MS Access, this would be: select top (1) favorite from t group by favorite order by count(*) desc, … Read more
The code below is messy and un-commented, but I’m glad it was able to get you in the right direction, so you were able to figure out the solution! Downloadable MDB on JumpShare here. Option Compare Database: Option Explicit ‘I had a theory which I implemented and later commented out in order to handle “two-direction … Read more
Use the correct formatting of a string expression for a date value: string Query = “Select Count(*) FROM SALES WHERE [DATE] = #” + DateTime.Today.ToString(“yyyy”https://stackoverflow.com/”MM”https://stackoverflow.com/”dd”) +”#”; Or, simpler, use the function of Access: string Query = “Select Count(*) FROM SALES WHERE [DATE] = Date()”; 0 solved How to count the number of rows in a … Read more
Give a try; Procedure TFNewCarAct.BtnSaveClick(Sender: TObject); begin adoQueryCCA.Close(); adoQueryCCA.SQL.Clear; adoQueryCCA.SQL.Add(‘INSERT INTO tblcaractivity ([CCarID],[Date],[Millage],[SerRcd],[EOType],[EOQunt],[AirFil],[GOil])’); adoQueryCCA.SQL.Add(‘VALUES(:CCarID,:Date,:Millage,:SerRcd,:EOType,:EOQunt,:AirFil,:GOil)’); adoQueryCCA.Parameters.ParamByName(‘CCarID’).Value:= Integer(ComboBox2.Items.Objects[ComboBox2.ItemIndex]); adoQueryCCA.Parameters.ParamByName(‘Date’).Value:= Edit6.Text; adoQueryCCA.Parameters.ParamByName(‘Millage’).Value:= Edit1.Text; adoQueryCCA.Parameters.ParamByName(‘SerRcd’).Value:= memo1.Text; adoQueryCCA.Parameters.ParamByName(‘EOType’).Value:= Edit2.Text; adoQueryCCA.Parameters.ParamByName(‘EOQunt’).Value:= Edit3.Text; adoQueryCCA.Parameters.ParamByName(‘AirFil’).Value:= Edit4.Text; adoQueryCCA.Parameters.ParamByName(‘GOil’).Value:= Edit5.Text; adoQueryCCA.ExecSQL; ShowMessage(‘Done’); end; procedure TFNewCarAct.FromShow(Sender: TObject); begin ADOQueryCT.Open; while Not ADOQueryCT.Eof do begin ComboBox1.Items.Add(ADOQueryCT.FieldByName(‘Name’).AsString); ADOQueryCT.Next; end; ADOQueryCT.Close; if ComboBox1.Items.Count > 0 then ComboBox1.ItemIndex := 0; … Read more
Here’s another alternative (old VB6/VBA – not VB.Net syntax). KEY SUGGESTION: the “_” characters are “continuation lines”. I honestly don’t think you want them in most of the places you’re using them. IMHO… Option Explicit Private Declare Function timeGetTime Lib “winmm.dll” () As Long Private startTime, endTime As Long Private Function elapsedTime(t1, t2 As Long) … Read more
No code needed – as @Nathan_Sav said a – a quick search will find what you’re after (I find “reference main form from subform” gives the best page at the top – http://access.mvps.org/access/forms/frm0031.htm ) SELECT * FROM Employees WHERE [First Name]=Forms![Form1]![txtFirstName] AND [Last Name]=Forms![Form1]![txtLastName] txtFirstName & txtLastName are the names I gave to the text … Read more
You can’t use Count as it will do just that – count the number of records for each Name ignoring the value of tap. But you check for the values of tap and sum these matches. However, while SQL Server returns 1 for a match, Access returns -1, thus – for a universal solution – … Read more
Hide Controls in MS Access Based on Value Field solved Hide Controls in MS Access Based on Value Field