if seek(thisform.txtSearch.value,'myTable','bCode') Populate other textboxes with values from the table txtOtherField.value = myTable.OtherField endif>Naomi
>Index on bcode to mcode >>
>Use bcode order mcode >>
> >clea > close all > set talk off > set safety off > set date brit > set cent on > close database > open database branch > use bcode > lnCode=0 > > > STORE 0 TO gnCount > @10,10 say "Code:" get lnCode > read > > sele a > go top > index on code to mcode > seek lnCode > if found() > *?code > ?alfacode > ?bname > else > wait"sorry" > endif >clear > @14,10 get alfacode > @16,10 get bname > >>So, please help me.