VbYesNo If yes then run update query

[hullstorage]

Hi all,

Brain a bit rusty.

I have a form with command button and want to dipslay message

Are you sure you want to update the following records

then if user selects yes this will run the update query then if no
then simply cancel the event

thanks

simon

 

[lcook1974]

If msgbox("Are you sure you want to update the following records?",vbOkCancel) = vbOk Then
DoCmd.RunSQL "Your code here"
Else
Cancel = true

End if

Try that!! (or some form there of)

 

[SOS]

If msgbox("Are you sure you want to update the following records?",vbOkCancel) = vbOk Then
DoCmd.RunSQL "Your code here"
Else
Cancel = true

End if

Try that!! (or some form there of)

Actually, if you want yes/no then

If MsgBox("Are you sure you want to update the following records?", vbYesNo, "Update?") = vbYes Then
   CurrrentDb.Execute "SQL String Here"
End If

No need for Cancel = True in this case.