hi all,

about this code under ,

it works, but when i try to get 1120 record from 14 area,i get 1019 records ,but i have morethan 3900 records at my table,any idea.

USE home1 excl
zap
SELECT 0
USE newamar66 EXCL
INDEX ON VAL(char18) TO hh

set order to "hh"

lnTotalCopied = 0

FOR i = 1 TO s  && assume 20 values for flag
   lnTotalNeedingCopy = (thisform.text1.Value * i) - lnTotalCopied
   SEEK i
   COPY TO temp2 NEXT (lnTotalNeedingCopy) WHILE VAL(char18) = i
   lnTotalCopied = lnTotalCopied + _Tally
   SELECT home1
   APPEND FROM temp2
   SELECT newamar66
NEXT
thisform.text1.SetFocus

CLOSE ALL
use home1 excl
BROWSE

thanks.
m.qasem