مشاهده نسخه کامل
: کپی فایل به فلاپی
چجوری یک فایل رو در مسیر جاری به فلاپی منتقل کنیم
bad_boy_2007
21-05-2007, 20:10
چجوری یک فایل رو در مسیر جاری به فلاپی منتقل کنیم
مسیر جاری رو با APP.PATH به دست میاری و مسیر FLOPY هم که \:A هست
الان مشکلت این بود که چطور مسیر ها رو بدست بیاری یا اینکه چطور عمل کپی رو انجام بدی ؟
واسه عمل کپی هم از FSO (FILE SYSTEM OBJECT) استفاده کن
اگه میشه یک مثال بزنید
البته تو سایت برنامه نویس متن زیر رو3 نفر مختلف گفتن شما هم نظرتون رو بگین
با تابع GetLogicalDriveStrings نام درايوهاي موجود و با تابع GetDriveType فلاپي درايو رو پيدا كن بعد با تابع FileCopy كپي كن اون جا !
مسير جاري هم App.Path
البته فلاپي درايو من \:A هستش !
براي بقيه هم با همين نامه ؟
به قول دوستمون اسم فلاپی درایو در همه سیستمها (A) هست شما به سادگی می تونید با دستور FileCopy فایل مورد نظرتون رو داخل فلاپی کپی کنید.
کد:
FileCopy App.Path & "\DATA.dll", "A:\DATA.dll"
البته بهتره همونجوری که آقا سیاوش گفتن اول مشخصات و نام درایو فلاپی گرفته بشه،شاید نام درایو A نباشه.
bad_boy_2007
22-05-2007, 09:17
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
یادم رفت بگم تابع filecopy از fso هم راحت تره !!!
حله دیگه مشکلت چیه ؟؟
bad_boy_2007
22-05-2007, 09:21
درایو A در همه سیستمها درایو flopy هست البته یه مورد میمونه اونم اینکه ممکنه سیستمی درایو flopy نداشته باشه و با انجام دستور کپی در flopy سیستم خطا بده و مطلوب نیست واسه رفع این مشکل هم راحت ترین راه اینه که از رویداد های onerror goto lable استفاده کنی و راه اصولی ترش هم اینه که اول چک کنی همچین درایوی وجود داره یا نه ؟ بعد اقدام به کپی کنی :46:
میشه بگی این کار رو واسه چی میخوای انجام بدی ؟
برای کپی از فایلهای خودم البته منظور من بیشتر کپی روی فلش مموری بود
bad_boy_2007
23-05-2007, 19:59
چرا از dialog استفاده نمیکنی ؟
Mohsen6558
24-05-2007, 10:36
درایو A در همه سیستمها درایو flopy هست البته یه مورد میمونه اونم اینکه ممکنه سیستمی درایو flopy نداشته باشه و با انجام دستور کپی در flopy سیستم خطا بده و مطلوب نیست واسه رفع این مشکل هم راحت ترین راه اینه که از رویداد های onerror goto lable استفاده کنی و راه اصولی ترش هم اینه که اول چک کنی همچین درایوی وجود داره یا نه ؟ بعد اقدام به کپی کنی :46:
میشه بگی این کار رو واسه چی میخوای انجام بدی ؟
دوست عزیز شما چقدر باسوادی !!!
flopy = floppy
onerror goto lable = on error resume label
البته می دونم تند تند تایپ می کردی فقط جهت شوخی بود ناراحت نشی
bad_boy_2007
24-05-2007, 15:21
:31: :31: :31: :31:
چرا از dialog استفاده نمیکنی ؟
استفاده از این روش مسر نصب برنامه رو میخواهد که اگه کاربر دیگری اونو ندونه با مشکل مواجه میشه
vBulletin , Copyright ©2000-2025, Jelsoft Enterprises Ltd.