01 vfp error handle | Error handling in VFP9 | display error runtime in ...

Error Handling in Visual Foxpro VFP9

First.prg Code:

ON ERROR Do MsgDisp with ERROR(),MESSAGE()

CLEAR

USE FirstRec

MsgDisp.prg Code:

PARAMETERS ErrNo, Msg

MESSAGEBOX("Error No."+STR(ErrNo)+CHR(13)+CHR(13)+Msg,0+16,"Manoj Kalla Training")