Want an "Alert Message"before the operation

[ssq]

Hi, I wrote a RunSQL Macros to drop a table and used that on a button.
How should i add an "Alert" to it i.e; i should get an "Alert Message" as soon as i click that button.

[Denburt]

You should get a prompt automatically anytime you drop a table. What does the SQl statement look like and how did you create this "Macro"?

[JConsulting]

Hi, I wrote a RunSQL Macros to drop a table and used that on a button.
How should i add an "Alert" to it i.e; i should get an "Alert Message" as soon as i click that button.

IF you have button code, add this.

 
If MsgBox("You're about to delete a table, are you sure?", vbYesNo) = vbNo Then exit sub
else
'run your macro here
end if
 

[ssq]

Macro: Action - RunSQL
Statement - drop table 'table name'
(or)
Action - DeleteObject
Object Type - Table
Object Name - Select the Table
But JConsulting, how should i call that Macro in the Code, button is not coded i am calling this macro in button properties 'On Click'

[Denburt]

But JConsulting, how should i call that Macro in the Code, button is not coded i am calling this macro in button properties 'On Click'

Change the onclick event to [Event Procedure] then click the button to the right of that field. You can run everything from code as per JConsulting's suggestion.

Private Sub Command1_Click()
If MsgBox("You're about to delete a table, are you sure?", vbYesNo) = vbNo Then
 exit sub
else
docmd.RunMacro("YourMacroName")
end if

You could actually convert that macro into code as well. Let's see I haven't used that tool in so long...

Macro Conversion