手中找不到这么大的TXT文件，不妨把你的文件传过来试一试。
Mail:sywzs@163.com

好像是“如何将txt逐段加入到备注中？”的问题没讨论完，就被结贴了。

假如你的文本文件是“TT.txt”,用下面的程序应该是没问题的。用你的大文件试一试吧。
STORE FOPEN("TT.txt") TO nFileHandle
STORE FSEEK(nFileHandle, 0, 2) TO nEnd
STORE FSEEK(nFileHandle, 0) TO nTop
CREATE CURSOR LS(TXT M)
cStr = ""
FOR I=0 TO nEnd
    Str0=FGETS(nFileHandle, nEnd)
    IF LEN(Str0) = 0
        APPEND BLANK
        REPLACE TXT WITH cStr
        cStr = ""
    ELSE
        cStr = cStr + Str0 + CHR(13)
    ENDIF
    I = FSEEK(nFileHandle, 0, 1)
NEXT
IF LEN(cStr)>0
    APPEND BLANK
    REPLACE TXT WITH cStr
ENDIF
= FCLOSE(nFileHandle)

哇，好大的文件，竟然有1000个段落，文件共有多少字节？有没有16,777,184字节（约16M）？如果没有，那并不难办。假设文件是 “temp.txt”，表是"tb.dbf"，其中备注字段是"xxx"。

cData=FILETOSTR("temp.txt")

nParagraphs=ALINES(aParagraphs,cData,5)
nP=1
FOR nI=2 TO 4001
    REPLACE tb.xxx with aParagraphs(nP) RECORD nI
    nP=IIF(nP<nParagraphs, nP+1, 1)
ENDFOR

试试看。