چجوری یک فایل رو در مسیر جاری به فلاپی منتقل کنیم
خرید لپ تاپ استوک
ماهان سرور
آکوستیک ، فوم شانه تخم مرغی ، پنل صداگیر ، یونولیت
دستگاه جوجه کشی حرفه ای
فروش آنلاین لباس کودک
خرید فالوور ایرانی
خرید فالوور اینستاگرام
خرید ممبر تلگرام
[ + افزودن آگهی متنی جدید ]
کپی فایل به فلاپی
چجوری یک فایل رو در مسیر جاری به فلاپی منتقل کنیم
هنوز منتظرم
مسیر جاری رو با 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 نباشه.
یادم رفت بگم تابع filecopy از fso هم راحت تره !!!کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
حله دیگه مشکلت چیه ؟؟
درایو A در همه سیستمها درایو flopy هست البته یه مورد میمونه اونم اینکه ممکنه سیستمی درایو flopy نداشته باشه و با انجام دستور کپی در flopy سیستم خطا بده و مطلوب نیست واسه رفع این مشکل هم راحت ترین راه اینه که از رویداد های onerror goto lable استفاده کنی و راه اصولی ترش هم اینه که اول چک کنی همچین درایوی وجود داره یا نه ؟ بعد اقدام به کپی کنی.gif "N Aggressive (45)")
میشه بگی این کار رو واسه چی میخوای انجام بدی ؟
برای کپی از فایلهای خودم البته منظور من بیشتر کپی روی فلش مموری بود
چرا از dialog استفاده نمیکنی ؟
دوست عزیز شما چقدر باسوادی !!!درایو A در همه سیستمها درایو flopy هست البته یه مورد میمونه اونم اینکه ممکنه سیستمی درایو flopy نداشته باشه و با انجام دستور کپی در flopy سیستم خطا بده و مطلوب نیست واسه رفع این مشکل هم راحت ترین راه اینه که از رویداد های onerror goto lable استفاده کنی و راه اصولی ترش هم اینه که اول چک کنی همچین درایوی وجود داره یا نه ؟ بعد اقدام به کپی کنی
میشه بگی این کار رو واسه چی میخوای انجام بدی ؟
flopy = floppy
onerror goto lable = on error resume label
البته می دونم تند تند تایپ می کردی فقط جهت شوخی بود ناراحت نشی
هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)
قوانين ايجاد تاپيک در انجمن
جواب بصورت نقل قول
نوشته شده توسط majj
.gif "N Aggressive (4)")