VB Code to copy and paste from all text file and paste into single file

Hello:

I have number (15) of .txt file in C:\Temp\SourceTxt folder
I have attached 3 such txt files as samples. (All file names will start will 1,2,3...until 15)
I need a VB Code to copy the contents of each file and past in text file call AllData.txt in C:\Temp\DestTxt folder.
I have manually created AllData.txt and attached.

Please let me know if you have any questions.
Thanks.

Riz

Hi p24:

Seems to work for me great.
I will try more and if any problem, I will let you know.
Thanks a lot.
Riz

Hi P24:

Seems to be some problem.
Let me check and will let you know.
Please watch this thread for my finding.
THanks

Hi P24:

Please try the following 3 files with your code and check the destination file.
Not all characters are copied, it misses the last digit I think.
Let me know your finding.
Thanks a lot
Riz

Hello p24:

Works as expected except please refer to attached competed Destination file.
As you can see there is blank lines which i need to get rid of.
Please help modify the code accordingly.

Let me know if you have any questions.
Thanks.
Riz

Hi p24:

Seems to work great.
Will do more testing and let you know if any issues.
However, i appreciate all the help you have provided.
Thanks
Riz

Hi p24:

I see a small problem.
I just put 1 file in the source side with 2 lines of data.
The above code will copy the data into 1 line in destination location.
If source has 2 lines then copy it in 2 lines at destination.
Please help modify the code accordingly.
Please let me know if you have any questions.
Thanks.

Riz

Hi P24:

Superb, seems to work perfectly.

Thanks a lot..
Riz