ادغام چند فایل و خروجی در یک فایل

سلام
می خواستم بدونم چطوری میشه همه فایلهای داخل یه پوشه که پسوند txt دارند رو ادغام کرد بعلاوه یه متنی هم خودم اضافه کنم مثله payan تو مثال پایین
فرض کنید تو درایو c:\windows که فایلهای متعدد هستن فقط فایلهای txt با هم ادغام شن و خروجی رو خودم save کنم
مثلا
Matne file aval

Payan

Matne file 2

Payan

Matne file3

Payen

و تا اخر
خروجی بالا تو یه فایل txt باشه البته خودم میتونم با commondialog خروجی رو مشخص کنم فقط جای بالا مونده ممنون میشم اگه کسی کمکم کنه
البته فقط نمیتونم کاری کنم که برنامه همه ی فایلهای txt رو خودش بشناسه مسیر و اسمشونو ولی میتونم دونه دونه بیارم که خودم بشناسونم اونم که خیلی سخته دوستان اگه فایل ocx خاصی هم میخاد لطفا برام اپ کنید
ممنون

یعنی واقعا هیچ کی نمیدونه یا جملاتم واضح نبود:41::41::19::19:

سلام.
این که خیلی سادست.
شما اول باید همه فایل های تکست رو لیست کنی. بعد به ترتیب فایل ها رو بخونی متن پایانی رو اضافه کنی و بریزی تو یه متغیر.
حالا مشکلت کجاست.

نقل قول:

---

نوشته شده توسط Payman_62 [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام.
این که خیلی سادست.
شما اول باید همه فایل های تکست رو لیست کنی. بعد به ترتیب فایل ها رو بخونی متن پایانی رو اضافه کنی و بریزی تو یه متغیر.
حالا مشکلت کجاست.

---

ممنون دوست من مشکل من اینجا بود که نمیتونستم بگم چطوری بعد از خوند محتویات فایل اول بره سراغ دومی بعد خودم یه روش طولانی اما ساده کشف کردم که اول فایلهارو تو یه listbox اضافه کردم بعد گفتم فایل list index شماره ی صفر رو بخون بعد دو بعد سه و تا اخر
البته اینارو گذاشتم رو تایمر و خودش همه ی کارورو کرد بعد گفتم اگه list index یه دونه به اخر مونده تایمر غیر فعال شه همین مشکلم حل شد ممنون :11:

می تونی با دستور dir فایهارو پیدا کنی

کد:

---

dir Address\*.txt

---

و وقتی دوباره دستور dir رو خالی استفاده کنی فایلهای بعدی رو پیدا میمنه
مثلا

کد:

---

dir "d:\*.txt"

for i=1 to 5
        print dir
next i

---

این برنامه 5 فایل txtآدرسو توی فرم چاپ میکنه (البته اگه فایلهات کمتر از 5 تا باشه ارور میده)
:8: