ورود

نسخه کامل مشاهده نسخه کامل : سوال چطوری میشه یه پوشه رو با محتویاتش رو با وی بی کپی کرد


ENH
13-12-2006, 23:00
با سلام خدمت دوستان

میخواستم یکی راهنماییم کنه که چه جوری میتونم یه فایل رو با وی بی کپی کنم به یه درایو دیگه

شاید این سوال تکراری به نظر بیاد اما من پست ها رو خوندم وفقط مطلب در مورد کپی کردن فایل پیدا کردم نه پوشه


ممنون می شم اگه راهنمایی کنید












------------------------
Payman_62
14-12-2006, 00:57
سلام.
این جام که باز گفتی فایل نه پوشه.
ریفرنس scripting runtime رو اضافه کن. بعد از کد زیر استفاده کن.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
Mahsa Hatefi
17-01-2007, 01:15
سلام دوست گرام

فرض كنيد ميخوام فونتي يا فايلي ويا پوشه اي رو از روي سي دي كه برنامه ام هست روي يكي از فولدرهاي ويندوز مثلا Fonts كپي كنم چه تغييري در نحوه آدرس دهي بايد بدهم . متاسفانه صفر كيلومترم ، ساده لطف بفرماييد
Romina2006
17-01-2007, 01:30
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
OmId68
17-01-2007, 18:55
اقا romina من وقتی میخواهم از این کد استفاده کنم از قسمتScripting ایراد میگیره من قبلاً هم یک برنامه داشتم که از او ایراد می گرفت مشکل از کجاست
Romina2006
17-01-2007, 21:32
اقا romina من وقتی میخواهم از این کد استفاده کنم از قسمتScripting ایراد میگیره من قبلاً هم یک برنامه داشتم که از او ایراد می گرفت مشکل از کجاست

باید از منوی Project و زیر منوی References گزینه Microsoft Scripting Runtime رو انتخاب کنی
Mahsa Hatefi
19-01-2007, 23:00
دوست گرامي Romina ي عزيز

دستورالعمل كلي رو مي دونم . منظور من نحوه نوشتن آدرس مبدا و مقصد بود : يعني وقتي نمي دونم ويندوز سيستم مقصد روي كدوم درايو نصب است چگونه آدرس را بنويسم كه پوشه هاي ويندوز لحاظ شود
Romina2006
19-01-2007, 23:33
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
Mahsa Hatefi
21-01-2007, 00:21
از اينكه گيج ترم كرديد تشكر مي كنم
Private Sub Command1_Click()
Dim fsoCopy As New Scripting.FileSystemObject
fsoCopy.CopyFolder Source, Destination
End Sub

منظورم اين بود كه Destination در اين فورمول با چه string ي جايگزين شود تا در سيستم مقصد يكي از پوشه هاي ويندوز منظور شود مثلا system32/.. يا fonts/.. كه از پوشه هاي ويندوزند

بازم متشكرم
Romina2006
21-01-2007, 13:39
دوست عزیز

شما اول باید بدونی که ویندوز مقصد روی چه پارتیشنی نصب شده است.برای اینکار باید از کد زیر استفاده کنی :


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

در کد بالا متغییر Buffer مسیر نصب ویندوز رو بهت میده و بعدش می تونی مسیر مقصد موردنظرت را جایگزین کنی مثلا :


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
Mahsa Hatefi
21-01-2007, 21:33
دوست عزيز
واقعا تشكر مي كنم لطف كرديد حالا امتحانش مي كنم