Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Filling a Memo
Message
From
08/08/2000 15:18:14
 
 
To
08/08/2000 15:06:02
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00402429
Message ID:
00402439
Views:
8
Hi Rodney,

Try this

LOCAL firstline, cntr1
STORE 0 TO cntr1
STORE "" TO firstline

SELECT products
GO TOP && If you want to start at the top

firstline = "Invoice Created "
firstline = firstline + " " + DMY(DATE()) + " " + TIME()
FOR cntr1 = 1 TO RECCOUNT('products')
firstline = firstline + CHR(13) + products.prod_id + " " + products.details + " was added on " + DMY(Date()) + " " + Time()
ENDFOR

THISFORM.edit1.VALUE = firstline

HTH
MIke
Previous
Reply
Map
View

Click here to load this message in the networking platform