hi,
thank you ,
best regards.
>Well, pass it the date() as parameter and it should work.
>
>>hi,
>>i try ,but i get error message function argument value type,or count is invalid at line3
>>
>>FUNCTION Append31
>> lpara tdD
>> local ldD, lnM
>> ldD = tdD-DAY( tdD ) + 1
>> lnM = month( tdD )
>> do while month( ldD ) = lnM
>> append blank
>> ldD = ldD + 1
>> enddo
>> return
>>
>>
>>
>>>Try the grid's refresh().
>>>
>>>>hi,
>>>>thank you,
>>>> i must but this code under event keypress at thisform.text2.value
>>>>as if !found()
>>>>thisform.Append31
>>>>how i can see those records after append at mygrid via myform
>>>>
>>>>thanks.
>>>>m.qasem
>>>>>>hi all,
>>>>>>i need help, to append records at my table, via myform and i can see all records as empty records, without date field.
>>>>>> as
>>>>>>locate for machaine1=thisform.text1.value and month+year=thisform.text2.value
>>>>>>if !found()
>>>>>>append 31 records&&if the month is 30 days append 30 records ,if month=2(february) append 28 or 29, and if day is friday replace day1 with friday
>>>>>>else
>>>>>>=messagebox("found")
>>>>>>endif.
>>>>>>m.qasem
>>>>>
>>>>>Something like this?
>>FUNCTION Append31
>>>>> lpara tdD
>>>>> local ldD, lnM
>>>>> ldD = tdD-DAY( tdD ) + 1
>>>>> lnM = month( tdD )
>>>>> do while month( ldD ) = lnM
>>>>> append blank
>>>>> ldD = ldD + 1
>>>>> enddo
>>>>> return