Search results for query: *

I am sure this is a simple question... I am trying to use the MS code for a autolookup drop down on a tect box and button. I am using the following code: Private Sub Command67_Click() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[Last_Name] = " &...

The following code always comes out TRUE. If Me!Parish_Group_Arrival.Value Then DoCmd.RunSQL "UPDATE tbl_attendants SET Arrival_Verification = TRUE WHERE Parish_Group_Arrival = TRUE AND Parish_Group_ID =...

I know I have posted this before, but am having trouble getting a good answer. Here is the current code: It works great in a form, but not in a report. Dim rs As Object Set rs = CurrentDb.OpenRecordset("Select * from tbl_Attendants Where Tee_Shirt_Size = 'L'") rs.MoveLast...

I know I have posted this before, but am having trouble getting a good answer. Here is the current code: It works great in a form, but not in a report. Dim rs As Object Set rs = CurrentDb.OpenRecordset("Select * from tbl_Attendants Where Tee_Shirt_Size = 'L'") rs.MoveLast...

Here is the current code: It works great in a form, but not in a report. Dim rs As Object Set rs = CurrentDb.OpenRecordset("Select * from tbl_Attendants Where Tee_Shirt_Size = 'L'") rs.MoveLast Me.tx_L_Count = rs.RecordCount **The error is on the assignment to the text box...

The following code gives a "No Current Record" error on the MoveLast function. We have tried messing around with the SQL string. It functions well in separate parts, but not as one string. Any thoughts? strSQL = "Select * from tbl_Attendants Where Parish_Group_ID = " &...

Sorry for all the posts, but time is running out! Related Code: Set rs2 = CurrentDb.OpenRecordset("Select * from tbl_Attendants Where Arrival_Verification = TRUE AND Parish_Group_ID = " &...

I'm trying to make the following assignment. tx_L_Count = rs.RecordCount I have tried. Me.tx_L_Count = rs.RecordCount and Reports!rpt_Shirt_Distribution_by_Diocese_and_Group.tx_L_Count = rs.RecordCount and neither works. Help? Thank you! ************* M. MARNEY www.tgw.com

I need a combo box that people can select a group of reports from. I no not want to create a report for each group and then a combo linked to them. I would like the combo to automatically generate the printable report based on the selection in the box. How do I do this? ************* M...

I have between 1 and three groups to a page on a given report. I would like the header to display a total count from each grouped section. Is this a VB problem or is there a simple expression? ************* M. MARNEY www.tgw.com

Hi. Having trouble with the following command: DoCmd.RunSQL "UPDATE tbl_attendants SET Arrival_Verification = '" &Yes& "' WHERE Me.Parish_Group_Arrival = '"&Yes&"'" Receiving syntax error. Help... ************* M. MARNEY www.tgw.com

Hi. Having trouble with the following command: DoCmd.RunSQL "UPDATE tbl_attendants SET Arrival_Verification = '" &Yes& "' WHERE Me.Parish_Group_Arrival = '"&Yes&"'" Receiving syntax error. Help... ************* M. MARNEY www.tgw.com

Hi. I am having difficulty with figuring out how to do the following: I have a bound combo box (or say a check box for that matter) in a form. When I change the value of this firld in the form, I need a corresponding field in the subform to update to the same value as what was set in the form...

is it possible to define two record sets on one event For instance, I have: Set rs = CurrentDb.OpenRecordset... And need another to do another operation on. ************* M. MARNEY www.tgw.com

The follwing SQL is giving error: Set rs = CurrentDb.OpenRecordset("SELECT * FROM tbl_Attendants WHERE Parish_Group_ID = Me![Parish_Group_ID]") Error: Too few parameters. Expected 1. I can run the SQL statement alone and it works fine. Any thoughts? ************* M. MARNEY www.tgw.com

The folowing code is erroring out. Any suggestions... Private Sub Form_Current() Set rs = CurrentDb.OpenRecordset("Select * from tbl_Attendants where Parish or Group ID = " & me!Parish or Group ID & ") rs.MoveLast Me.tx_Count_Box_2 = rs.RecordCount End Sub ************* M...

Private Sub Form_Current() Set rs = CurrentDb.OpenRecordset("Select * from tbl_Attendants where Parish or Group ID = " & me!Parish or Group ID & ") rs.MoveLast Me.tx_Count_Box_2 = rs.RecordCount End Sub ************* M. MARNEY www.tgw.com

I would like for users to only be able to add new records on a subform. If I set the DataEntry or Additions controls it doesn't change anything. I'm guessing because the main form is set differently. Is there a work around?

I would like my Main form to be editable and NO data entry and my subform to be data entry only with no editing. The problem is, when I set the two form this way the subform does not act like it should. Do the main form properties supercede those of the subform?

How can I add a count of a total number of records to a form? I would like to know users inputting data to know how many total entries have been made.