I've had a quick look to see if some combination of SET TALK and routing talk messages to a hidden Foxpro main window would help but I can't see a way of retrieving what is written there.
The only way I can think to do it would be to change to use low level functions. it would not be too bad if you used ChrTran to convert the delimiter character to Chr(13) and then aLines to copy the data to an array. then, if all fields were character you could just INSERT INTO table FROM ARRAY (lines). If data types were different you could have a general purpose convert routine that looped through the fields converting the field type
lcBuffer = fGets(lnfh)
lcBuffer = ChrTran(lcBuffer,",",Chr(13)) && Assume comma delimited
If alines(laImport,lcBuffer) = Fcount(table)
For lnX = 1 To FCOUNT(table)
Do Case
Case VarType(Eval(Field(lnX))) = "N"
laImport(lnX) = Val(laImport(lnX))
Case VarType(Eval(Field(lnX))) = "D"
laImport(lnX) = Ctod(laImport(lnX))
&& assuming you do not have strict date set on
...etc
Endcase
Insert Into table From Array laImport
Next
lnCount = lnCount + 1
... Do notification
Else
... invalid input
Endif
Not as easy as the Append but the only way I can think of. Sorry
Andrew
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only