Nothing
result <- dialog$run()
if (result == GtkResponseType["accept"])
do_application_specific_something()
else do_nothing_since_dialog_was_cancelled()
dialog$destroy()
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.