> if LEN(ALLTRIM(thisform.text10.value)) > =3 > > For x=1 to getwordcoun(thisform.text10.value) > > lcName = getwordnum(thisform.text10.value,m.x) > > if m.x=1 >SELECT F4,F1,name4,name3,name2,name1 from x2; > where name4=lcName ; > ORDER by name4; > into cursor crsMyCursor readwrite > >else > >endif >endif >>thanks