Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to design it in Class?
Message
From
25/05/2001 11:36:31
Alexandre Palma
Harms Software, Inc.
Alverca, Portugal
 
 
To
25/05/2001 11:13:41
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00511522
Message ID:
00511572
Views:
17
Ok John where gos a sample

this code will be put in a method of a object in the click of a button etc..
it only works if you are using tables belonging to a vfp database

LOCAL llret, locustomer, loaccount
locustomer = CREATEOBJECT(«your customer object»)
loaccount = CREATEOBJECT(«your account object»)

BEGIN TRANSACTION

llret = locustomer.Add(custID, custname)
llret = llret AND loaccount.Add(custid)

IF llret
END TRANSACTION
ELSE
ROOLBACK
ENDIF
Alexandre Palma
Senior Application Architect
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform