کار با فایل

میخواستم بدونم چطور میتونم یک جایی در فایل رو علامت گذاری کنم طوری که وقتی به اونجا رسید بفهمم
متشکرم :biggrin:

دوست عزیز
آیا اصرار دارید درون فایلتون محل مورد نظر رو علامت بزنید؟
روشهای دیگه ای هم برای رفتن به محل خاصی از فایل وجود داره.
شما می تونین ابتدا با دستوری مانند دستور زیر فایل موردنظرتون رو باز کنین:
همانجایی رو که درون فایلتون می خواین علامت بزنین، ب

کد:

---

Open "TESTFILE" For Binary As #1

---

بعد ب کنترل ا LOF(1) (آیا به انتهای فایل رسیده ایم یا نه) یه حلقه بسازین که تا پایان فایل رو بره و محل مورد نظرتون رو پیدا کنه. حالا با تابع Loc() که مکان خواندن/نوشتن جاری رو در قالب یک عدد long برمی گردونه، مکان مورد نظر رو شناسایی کنین:

کد:

---

MyLocation = Loc(1)

---

حالا تنها کاری که باید انجام بدین اینه که این مقدار long رو یه جایی نگه دارین و موقعی که خواستید به مکان موردنظر برید، از دستور زیر استفاده کنید:

کد:

---

Seek #1, MyLocation

---

عبارت Seek مکان عملیات خواندن/نوشتن بعدی را مشخص می کند. فراموش نکنید که قبل از این دستور باید فایلتون رو با عبارت Open باز کرده باشید.

موفق باشید

مرسي از جواب ولي منظور من اين نبود شايد كم توضيح دادم
اگر من چند فايل رو پشت سر هم داخل يك فايل مرج كنم چطور ميتونم يك كاري كنم كه بعد بتونم اونها رو جدا كنم
البته فايل ها از همه نوع تصويري صوتي متني عكس و .....است
من هم فقط ميخوام اين كار رو تو يك فايل انجام بدم نه اينكه تعداد ركورد ها رو تو يك فايل ديگه ذخيره كنم و بعدا با اون اطلاعات اون فايل ها رو جدا كنم
فكر ميكنم يك كم زيادي نوشتم:biggrin:
باز هم متشكرم

sherwood جان
ببخشید که جواب سوالتون رو سوال می پرسم، ولی می شه لطفا اول جواب سوالهای زیر رو بدین:
1. هدفتون از ریختن چند فایل درون یکی چیه؟
2. فایلهایی که می خواین با هم ادغام کنین همگن هستند؟ یعنی مثلا فایل های صوتی رو با هم، تصویری رو با هم و متنی رو هم باهم می خواین سر هم کنید؟

* این کد رو هم ببینین، فکر می کنم به جوابتون می رسین:
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

موفق باشید

bithia عزيز مرسي از اينكه جواب هاي منو ميدي:
1- هدفم : دارم يه برنامه مينويسم كه با اون بتونم روي فايل ها پسورد بذارم روش كارش اينه كه همه فايل ها رو ميريزه تو يه فايل و و براي باز كردن ودر اوردن اون فايل پسورد ميخواد . البته روش كاشو از يك برنامه به اسم data backer تقليد كردم چون ميخواستم يه برنامه مثل اون بنويسم.
2- نه همگن نيستن.
با تشكر

حالا متوجه منظور شما شدم. من تا بحال چنین چیزی رو با Vb ندیدم. ولی مسلما نشد نداره. براتون دنبال راه حل می گردم و نتیجه رو اعلام می کنم.
با این ترتیب فکر نکنم اون نمونه کد گرهی از مشکلتون باز بکنه. مشکل بزرگش اینه که فقط یه تعداد احتمالا نامحدود فایل رو با هم ادغام می کنه. روش مناسبی برای برگرداندن فایلهای اولیه نداره.

دوست عزیز
تا این لحظه تونستم براتون این نمونه کدها رو پیدا کنم:
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
- این اولی جالبه: نویسنده اون ایرانیه
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
فعلا شب شما بخیر تا صبح فردا!

چی شد؟ جواب رو پیدا کردین؟

اره مشكل اساسي نامحدود بودن فايل هايي هست كه ميخوان به اون اضافه بشن
از كد هايي كه فرستادين ممنون همه روش هاي جالبي توش بود به تجربه هام اضافه شد ولي راه چاره توش پيدا نكردم :sad:
متشكرم

يكي بهم گفت ليست پيوندي شايد كارتو راه بندازه نظر شما چيه