>>>Dear Sir,
>>>
>>>When I run your codes it shows following error message
>>>
>>>Invalid path or file name
>>>
>>>Please help again
>>
>FOR p_count = 1 TO 12
> sMonth= LTRIM(STR(p_count))
> SELECT * FROM weights WHERE MONTH(date1) = &sMonth INTO TABLE "d:\ahsan"+m.sMonth
>NEXT
>CLOSE ALL
>
>May be quickly is:
>

>>FOR p_count = 1 TO 12
>>    sMonth= "d:\ahsan"+LTRIM(STR(p_count))
>>    SELECT * FROM weights WHERE MONTH(date1) = p_count INTO TABLE (m.smonth)
>>NEXT
>>CLOSE ALL
>

Yes for a short table, but the difference is of some ms,
for a large table, the macro put a literal integer, and this is faster.
On any case, sure you have to put a

... MONTH(date1) = m.p_count ...