If Not Used('trans1') USE trans1.dbf Alias trans1 Again In 0 Shared Endif SELECT trans1 USE trans1 COUNT FOR trans1.fexerno=thisform.text4.value TO thisform.text2.value WITH thisform.combo1 thisform.text4.value=.list(.listindex,2) thisform.text5.value=.list(.listindex,1) ENDWITH>Hi,