SET EXCLUSIVE OFF SET DELETED ON Select users.userno, users.username ; from "U:\Questpdm\Data\Users" ; ORDER BY users.username ; into array arrUsers if ( _Tally > 0 ) for ix = 1 to alen(arrUsers,1) If File("U:\QuestPDM\Profile\User"+ltrim(str(arrUsers[ix,1]))+"\insystem.dbf") lnFID = Fopen("U:\QuestPDM\Profile\User"+ltrim(str(arrUsers[ix,1]))+"\insystem.dbf", 12) If lnFID = -1 MessageBox("User "+trim(arrUsers[ix,2])+" is in system") Else Fclose(lnFID) MessageBox("User "+trim(arrUsers[ix,2])+" is not in system") ENDIF ENDIF ENDFOR ENDIFBasically I want to replace the Messageboxes with commands to either if they are in the system to be shown in a listbox or if they are not in the system then do not show in the listbox.