Just in case you don't have the latest FoxPro version:
USE Table1 ALIAS contact IN 0
USE Table2 ALIAS project IN 0
SELECT contact
INDEX ON accountno TAG accountno && Just in case the index does not exist
SET ORDER TO TAG accountno
SELECT project
SET RELATION TO accountno INTO contact
REPLACE projname WITH contact.contact FOR !EOF('contact')
Main Topics
Browse All Topics





by: JF0Posted on 2009-04-20 at 14:51:38ID: 24189104
Use table1 alias contact
Use table2 alias project
Update project from contact set project.projname = contact.contact where contact.accountno = project.accountno