Hello all!
I have used the following valid function in VFP5 many times to cancel an "add" on a form in VFP5, but it doesn't seem to work in VFP6!
The 'Return" function in the message box works fine, but the 'cancel'
code acts justs like the Return...
The code doesn't seem to be working right... can anyone tell me why its not canceling the add or maybe suggest another way to accomplish this?
TIA, DAN
***************************************
*-- VALID() of EMP_No field
SELECT employee
Set Order to emp_no
Seek this.Value
IF FOUND()
*-- Update these fields
With thisform
.txtEmp_name.value=employee.emp_name
Endwith
ELSE
nanswer=MESSAGEBOX("EMPLOYEE # NOT FOUND.",21,"ENTRY ERROR")
IF nanswer=4
return 0
else
keyboard '{esc} {alt c}' &&&&& MY problem seems to be here!
endif
ENDIF
Dan Gilliland
ICQ# 15695715
"Man is still the most extraordinary computer of all."
John F. Kennedy (1917-1963)