Search results for query: *

Mucho gracias amgigo. Trabaja muy bien! (thanks, it works) ************* M. MARNEY www.tgw.com

Vic, I am currently running the code you suggest. It still does nto work properly. I used the debug to check the numbers and conditions are being met, but the update is not happening under the right conditions. Also, there is a difference in the update strings. Notice: Arrival_Verification =...

Did not work. Syntax error - Missing Operand! One thing that might be causing problems: My actual code reads: =DCount("[Tee_Shirt_Size]", "tbl_Attendants", "[Tee_Shirt_Size] = 'L'" AND [Parish_Group_ID] = " & [Parish_Group_ID]) How does it know that I want...

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] = " &...

See, that's the problem. It never evaluates to false! Is it the After_Update event that is the problem? I tried the on_click, but that did not work either. (The triple property is false.) ************* M. MARNEY www.tgw.com

I am running this code on the after_update event of the check box which is named Parish_Group_Arrival and is bound to the same name. ************* M. MARNEY www.tgw.com

Paul, That did not work. I have tried TRUE as well here is the code... If Me!Parish_Group_Arrival = -1 Then DoCmd.RunSQL "String Here (Works)" Else DoCmd.RunSQL "String Here (Works)" End If Ideas? ************* M. MARNEY www.tgw.com

Randy, Ok, re-read your post and say the answer to my last. Sorry. The code you provided was invalid. I assumed the double-quote after L' was misplaced. Still having trouble though... =DCount("[Tee_Shirt_Size]","tbl_Attendants","[Tee_Shirt_Size] = 'L' AND...

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 =...

Randy, It is of LONG type. How should it be different? Thanks! ************* M. MARNEY www.tgw.com

Tried what i had above, but got error. I think I am probably referencing the Current_Group_ID wrong. Any thoughts? ************* M. MARNEY www.tgw.com

Randy, Thank you for the code. I need to add another field to the where clause though. Basically... "[Tee_Shirt_Size] = 'L' AND [Group_ID] = '&[Current_Group_ID]'" Will this work? ************* M. MARNEY www.tgw.com

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...

Nothing, just display it! ************* M. MARNEY www.tgw.com

Hope I can clarify. This code in on a Report (On Open). tx_L_Count is what is being acted upon (as the code indicates) and is Unbound. That's about all I know to say. The Recordset for the actual report is different than the one being defined in this code, but I thought since it worked in a form...

nevermind... Figured out the syntax... :-) ************* M. MARNEY www.tgw.com

The ID field is a LONG (longint) I have: Dim Group_Select As Long Group_Select = Me.cbx_Group_ID_Selector Debug.Print Group_Select DoCmd.OpenReport "rpt_Shirt_Distribution_by_Group", acViewPreview, , "Parish_Group_ID = '" & Group_Select & "'" BUT, I think the...

No, same error... ************* M. MARNEY www.tgw.com

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...