hi,
i try to send to your email i get message
Your message did not reach some or all of the intended recipients.


The following recipient(s) could not be reached:

AugusteRenoir@Gmail.com on 7/16/2006 3:59 PM
The recipient could not be processed because it would violate the security policy in force

m.qasem

>UPDATED
>
>You have a space after the cursor name. How about doing:
>
>

>SELE crsDist
>SELE MyTable
>APPEND FROM crsDist
>

>
>Do you get the error on the SELE crsDist line, or just the APPEND line?
>
>If you do, then can you email the form files to me at AugusteRenoir@Gmail.com so I can take a look?
>
>>hi,
>>i try as
>>Append from dbf('crsDist '), error message
>>Alias is not found
>>thanks
>>
>>
>>>What is THIS for this code? Also, isn't your cursor name crsDist instead of grdDistribution? That's what you should be referencing in your append code.
>>>
>>>>hi,
>>>>this is the code at my form
>>>> command button---> click event
>>>>

>>>>      Create Cursor crsDist (From d, To d, Amount Y,txtName C(19),txtPrincipal Y)
>>>>          For ix=0 To .txtMonths.Value
>>>>        ldCurrent = Gomonth(.txtStart.Value,m.ix)
>>>>        ldFrom = Iif(m.ix = 0, m.ldCurrent, ;
>>>>          Date( Year(m.ldCurrent), Month(m.ldCurrent), 1))
>>>>        ldTo = Iif(m.ix = .txtMonths.Value, m.ldCurrent,;
>>>>          Gomonth(m.ldCurrent,1)-Day(Gomonth(m.ldCurrent,1)))
>>>>        Do Case
>>>>          Case m.ix = 0
>>>>            lnAmount = m.lnPayment * ((Day(m.ldTo)-Day(m.ldCurrent))/30)
>>>>          Case m.ix = .txtMonths.Value
>>>>            lnAmount = m.lnPayment * ((Day(m.ldCurrent)-1)/30)
>>>>          Otherwise
>>>>            lnAmount = m.lnPayment
>>>>
>>>>        ENDCASE
>>>>        M.ASD=THISFORM.TXTNAME.VALUE
>>>>       M.txtPrincipal=THISFORM.txtPrincipal.VALUE
>>>>        Insert Into crsDist (From,To,Amount,txtNAME,txtPrincipal) ;
>>>>          values ;
>>>>          ( m.ldFrom, m.ldTo,m.lnAmount,M.ASD,M.txtPrincipal)
>>>>      Endfor
>>>>      Locate
>>>>      .grdDistribution.RecordSource = 'crsDist'
>>>>      .grdDistribution.Visible = .T.
>>>>
>>>>

>>>>thanks
>>>>
>>>>>Ok, then that is your problem. It is not open, or at least it is not available where this code is run. How is grdDistribution created? Where is it created? Is this a form? Classes? The more detail information you can give - code examples - the better.
>>>>>
>>>>>>hi,
>>>>>>
>>>>>>thank you for replay,
>>>>>>i got error message
>>>>>>'grdDistribution.dbf' dose not exist
>>>>>>
>>>>>>thanks.
>>>>>>
>>>>>>
>>>>>>
>>>>>>>Does this not work? What is happening? Errors or just no data?
>>>>>>>
>>>>>>>

>>>>>>>use mytable in 0
>>>>>>>SELE MyTable
>>>>>>>locate for ....
>>>>>>>if !found()
>>>>>>>   Append from grdDistribution
>>>>>>>endif
>>>>>>>

>>>>>>>
>>>>>>>
>>>>>>>>hi all,
>>>>>>>>
>>>>>>>>i need to append from cursor to my table as..
>>>>>>>>Create Cursor crsDist.........
>>>>>>>>.
>>>>>>>>.
>>>>>>>>Locate
>>>>>>>> .grdDistribution.RecordSource = 'crsDist'
>>>>>>>>
>>>>>>>>i try as under....not work
>>>>>>>>

>>>>>>>>use mytable in 0
>>>>>>>>locate for ....
>>>>>>>> if !found()
>>>>>>>>*Append from dbf('grdDistribution') && rong
>>>>>>>>*Append from DBF(grdDistribution.RecordSource = 'crsDist')&&rong
>>>>>>>>*append from cursor ('crsDist')&&rong
>>>>>>>>*append from  (crsDist.cursor)&&rong
>>>>>>>>else
>>>>>>>>.
>>>>>>>>.
>>>>>>>> endif
>>>>>>>>

>>>>>>>>thanks.