You could do one of several things:

1.
Select tmp
Locate
Scan


>Firstly ,here is the source code :
>
>---------------
>thisform.list2.CLEAR
>
>SELECT wname,wday FROM workday WHERE wday = date() ;
>AND NOT wname="blank" INTO CURSOR tmp
>
>SELECT tmp
>FOR i = 1 to RECCOUNT()
>GO i
>thisform.list2.ADDITEM (tmp.wname)
>endfor
>
>RELEASE tmp
>---------------
>The problem is I can prove that there is no record in tmp ,but when I run the program ,it added 3 item into list2 ! HOW COME ?! It make me crazy .
>Do you have any idea about that ?