Article ID: 136901
Article Last Modified on 2/15/2000
ccur_alias=ALIAS() && Capture the form's table name, if any
SELECT myorder && The table recording the order
APPEND BLANK
=MESSAGEBOX(PROGRAM()) && Optional for visual effect
REPLACE event WITH PROGRAM()
SELECT (ccur_alias) && Returns to the form's table name
To speed up this process, type the code once, copy it, and then paste it
into each event procedure.
Additional query words: VFoxWin debugging fire
Keywords: KB136901