Access 2010 - Yes/No box in a command button - Basic Question

[Parker]

Hello,

I have a command button set up to "Print" a file. I want to ask a user "Do you want to continue printing this file?" with a Yes and No feature. Obviously if the user clicks Yes, I would like it to proceed to print. If the user clicks No I would like it to cancel the print command.



Currently I have just been using macros... In the On Click feature there is a macro built in to automatically go to the printer. I would liek this message to pop up before it goes to print:


Thank you All!

[ItsMe]

You can add a message box to a macro. I am not sure how you would allow the message box to stop the printing though. I use VBA. You can print a report using VBA. Here is a snippit I sometimes use when I am creating many msgboxes in a form's module. It is not perfect in that it is not all on one line but, I like it for convenience of manipulating it for any situation.

                    Dim Msg, Style, Title, Response
                    Msg = " There was a problem scanning.  " & vbCrLf
                    Msg = Msg + " Do you want to try again?  " & vbCrLf
                    Msg = Msg + " Click No to save the white  " & vbCrLf
                    Msg = Msg + " background as part of the file.  "
                    Style = vbYesNo + vbInformation + vbDefaultButton1    ' Define buttons.
                    Title = "Bad Copy"    ' Define title.
                    Response = MsgBox(Msg, Style, Title)
                    
                        Select Case Response
                        
                        Case vbYes     ' User chose Yes.
                        Call DIB_Free(lngHdib)
                        Call TWAIN_CloseSource
                        Call TWAIN_EndMultipageFile
                        GoTo Scan_Now
                        
                        
                        Case vbNo
                        MsgBox "Your image will be saved now. "
                        GoTo Process_Now
                        
                        End Select

[burrina]

Here is an example;

If MsgBox("Would you like to Print this record?", vbYesNo, "Print Confirmation") = vbYes Then
If MsgBox("Are you SURE you want to Print this record?" & vbCrLf & _
"Okay,here we go.", vbYesNo, "2nd Print Confirmation") = vbYes Then
DoCmd.RunCommand acCmdPrint
End If
End If

HTH

[ranman256]

If you are using purely MACROS...you can do this...