>hi all, >i want to insert to mynewtable total of records randomly >as >thisform.text1.value=778 >my code under copy this records but not randomly >any idea. >
>USE moh11
>COPYTO newmoh111 NEXT (thisform.text1.value)
>
>thanks. >m.qasem
USE moh11
total = ALLTRIM(thisform.text1.text)
RAND(-1)
INDEXONRAND() TOSYS(2023)+'\RANDOM'COPYTO \SELECTIONNEXT &totalSETINDEXTOERASESYS(2023)+'\RANDOM'