~SNIP

I think your
Append From Dbf('temp') for thisform.text1.value>0

is suspect. The FOR clause looks weird.




>hi,
>thank you,but when i click mysave command it is save the old data and new data,i mean nothing delete,and i need just new data when i query again.
>

>select 1
>use mstr
>delete for BILLNO=THISFORM.TEXT1.VALUE  .AND. DATEIN=THISFORM.TEXT2.VALUE
>
>  Append From Dbf('temp') for thisform.text1.value>0
>  replace w1 with thisform.text14.value
>  replace w2 with thisform.text16.value
>  With thisform.grid1
>   .recordsource = ''
>   Select temp
>   DELETE ALL
>   .recordsource = 'temp'
>   thisform.text1.SetFocus
>   thisform.refresh
>  endwith
>  ******************
>  With thisform.grid1
>   .recordsource = ''
>   Select temp
>  * Zap
>   .recordsource = 'grid1'
>   thisform.text1.SetFocus
>   thisform.refresh
>  endwith
>  **********************
>
>  ********************************************
>  thisform.text1.value=0
>  thisform.text2.value=ctod("  /  /  ")
>  thisform.text3.value=space(10)
>  thisform.text4.value=space(10)
>  thisform.text5.value=space(10)
>  thisform.text6.value=0
>  thisform.text7.value=0
>  thisform.text8.value=0
>  thisform.text10.value=0
>

>thanks.
>best regards
>m.qasem