>on shutdown iif(messagebox('Wanna Quit?', 4) = 6, ;
> _vfp.DoCmd("_vfp.Quit"), '')

Haha, that one crossed my mind right after I replyed.

>on shutdown iif(messagebox('Wanna Quit?', 4) = 6, ;
> _vfp.DoCmd("_vfp.DoCmd('_vfp.Quit')"), '')

Lol! That had not occured to us, Dude. It kindof reminds me of code I used to write like this to slow down the app (Student versions you know ;-):

wait window chr(asc('t')) + chr(asc('e')) + chr(asc('s')) + chr(asc('t'))