Lets try this again with the code. It didn't wrap the fist time.
Code:
Dim strAnswer As String 'Change This
strAnswer = MsgBox("Are you sure you want to add/update these parts?", vbQuestion + vbYesNoCancel, "Confirm")
Select Case intAnswer
Case vbYes 'Run the query
CurrentDb.Execute "Q_AppendPNECNfromRelationMaster"
Case vbNo 'Close the form and exit
Docmd.Close acForm,"F_PartAdds"
Exit Sub
Case vbCancel 'Exit sub but keep form open
Exit Sub
End Select
Originally Posted by
Rick West
It should work exactly like your web page msgbox, when I push that I want to log out I get a 2-button msgbox asking if I want to log out "Yes" or "Cancel".
If I choose Cancel it returns me to the page just behind the msg box.