Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Escapeing from an add record function
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Escapeing from an add record function
Miscellaneous
Thread ID:
00164482
Message ID:
00164482
Views:
62
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)
Next
Reply
Map
View

Click here to load this message in the networking platform