Search results

Lost focus the same thing. I only have one field to update and when they are done updated I want them to hit the enter key and close the form they are in print the two reports and open the main form. how else can I do this?

I also tried it as a macro and I get an error also Macro Name: closeupdateformmacro condition: True Action Name: CLose Arguments: Form, updateform. prmpt says action failed

They are two very short reports and I did step through made sure the printer was all done and took about 5 sec between each step. Still no go I even tried to close the form before the reports started printing still nothing even if I take out all the other line of code still get the error it has...

I get a Run-Time Error 2585 "this action can't be carried out while processing a form or report event. and when I debug it selects then docmd.close code I even tried opening the other form first then closing the last form but still doesn't work.

Private Sub Score_Exit(Cancel As Integer) UPDATESCOREPRINT = CardNumber2.Value DoCmd.OpenReport "customerreceiptreprint", acViewNormal, , "[CardNumber2] = '" & UPDATESCOREPRINT & "'", , acHidden DoCmd.OpenReport "receiptreprint", acViewNormal, , "[CardNumber2] = '" & UPDATESCOREPRINT & "'", ...

sorry I want to close the form that I am in once I am done editing the data 1. finish editing data 2. print the two reports 3. close the form I am in 2 and 3 could be flipped. this doesn't work either DoCmd.Close acForm, "UpdateRecordForm", acSavePrompt

Why do I get an Error on the DoCmd.Close Private Sub Score_Exit(Cancel As Integer) UPDATESCOREPRINT = CardNumber2.Value DoCmd.OpenReport "customerreceiptreprint", acViewNormal, , "[CardNumber2] = '" & UPDATESCOREPRINT & "'", , acHidden DoCmd.OpenReport "receiptreprint", acViewNormal, ...

This is how I got it to work but I still get an error on the DoCmd.Close why is this. Private Sub Score_Exit(Cancel As Integer) UPDATESCOREPRINT = CardNumber2.Value DoCmd.OpenReport "customerreceiptreprint", acViewNormal, , "[CardNumber2] = '" & UPDATESCOREPRINT & "'", , acHidden...

I do i get this to filter only the one record I want? Private Sub Score_Exit(Cancel As Integer) UPDATESCOREPRINT = CardNumber2.Value DoCmd.OpenReport "customerreceiptreprint", acViewNormal, CardNumber2 = UPDATESCOREPRINT, , acHidden DoCmd.OpenReport "receiptreprint", acViewNormal, CardNumber2...

Thanks I had another error also but got them both fixed thanks for the help

Text56.Value = DCount("[startplaying]", "tournamentlogtable", "[startplaying] = true" And "[endplaying]= false") Ok Startplaying and Endplaying are check boxes I want to return a number of active people playing in the tournement what am I doing wrong here?

Thanks got this to work.

I have a prize pool and need the prizes to change with the place. so if in first place the text box need to show $500 I tried using this code =iif([text14]=1,500,0) text14 is a field that I am doing a running sum I will expand on the on the IIF statement for more prize just want this to work...

I didn't get it to go away completely but I did get it to go away faster buy changing some printer settings.

I want the Box that pops up that says it is now printing page 1 of ..... to go away. I don't want to see this box. I would like to continue doing other things as the reports are printing is there a way to do this?

Thanks this worked

If DLookup("[startplaying]", "tournamentlogtable", "[cardnumber] = '" & CardNumberGlobal & "'" & " and " & "[tournamentdate] = Date) = True Then Ok now who would like get this code to work. I have everying working until I wanted to only return records with todays date. do I need to creat...

Where = "cardnumber = " & CardNumberGlobal DoCmd.OpenForm "scoreform", acNormal, , Where, acFormAdd, acWindowNormal When I do a Debug Print for where I get cardnumber = 1111111 The card number is a string because it might have a letter in it don't i need it to be cardnumber =...

If DCount("[cardnumber]", "cardnametable", "[CardNumber] = '" & CardNumberGlobal & "'") = 0 Then Got it to work it was a string

If DCount("[firstname]", "[cardnametable]", "[CardNumber]'" = CardNumberGlobal) = 0 Then DoCmd.OpenForm "Newcardform", acNormal, , , acFormAdd, acWindowNormal Ok this is what I have and it is not working "firstname" not sure what this first expr is for "Cardnametable" is the table I want to...