View Full Version : کپی کردن فایل
shirin00
پنج شنبه 26 شهریور 1383, 12:56 عصر
برای کپی کردن فایل در vb از چه دستوری باید استفاده کرد؟
Ali_mx
پنج شنبه 26 شهریور 1383, 16:26 عصر
من خیلی وقته که دیگه با وی بی 6 کار نمی کنم ولی تا اونجایی که یادم میاد با
دستور
Copyfile
البته راه دیگه ای هم هست ولی اگه فقط میخواهید یک یا چند تا فایل رو کپی کنید
این راحت ترین راهه
اگه خواستید به خودم پی ام بدید تا اون یکی راه رو هم بهتون توضیح بدم
8-)
sunboy
جمعه 27 شهریور 1383, 18:01 عصر
از run time script هم می تونی استفاده کنی
mr_esmaily
جمعه 27 شهریور 1383, 18:23 عصر
سلام
اگه بگردی این موضوع قبلا کامل مطرح شده.
shirin00
یک شنبه 29 شهریور 1383, 09:44 صبح
تو موضوعات قبلی جستجو کردم ولی چیزی پیدا نکردم اگر ممکنه همین جا جواب بدهید
با تشکر
(سیدشریفی)
یک شنبه 29 شهریور 1383, 11:44 صبح
FileCopy source, destination
مثال:
FileCopy "A:\Test.txt" , "C:\Test.txt"
:)
vbprogramer
یک شنبه 29 شهریور 1383, 12:02 عصر
Private Sub Command1_Click()
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:\ali.exe", "d:\ali.exe", "True" '.CreateTextFile("c:\testfile.txt", True)
MyFile.WriteLine ("This is a test.")
MyFile.Close
End Sub
:mrgreen: :wink:
Ali_mx
یک شنبه 29 شهریور 1383, 14:26 عصر
:o
یادم رفته بود
FileCopy نه Copyfile
این درسته
:oops: :oops: :oops: :wink:
یک چیز دیگه
آقای vbprogrammer احساس نمیکنید که کدتون همچین یه جوراییه
:roll:
:!:
Doctor Sinohe
یک شنبه 29 شهریور 1383, 14:35 عصر
Private Sub Command1_Click()
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFile "c:\ali.exe", "d:\ali.exe", "True" '.CreateTextFile("c:\testfile.txt", True)
MyFile.WriteLine ("This is a test.")
MyFile.Close
End Sub
:mrgreen: :wink:
البته باید این نکته رو باید در نظر داشت که File System object را به لیست توابع کتابخانه ای اضافه کرد تا از دستور بالا بتوان استفاده نمود
mr_esmaily
یک شنبه 29 شهریور 1383, 14:43 عصر
سلام
فکر کنم کمی دیر شد
http://www.barnamenevis.org/forum/viewtopic.php?p=17274&highlight=#17274
دیدی خوب نگشتی!
:P
shirin00
سه شنبه 31 شهریور 1383, 15:30 عصر
از همگی دوستان ممنون هستم.
از برنامه نوشته شده استفاده کردم و جواب گرفتم.
راستی mr_esmaily حق با شما بود. چون عجله داشتم دقت نکردم.
موفق باشید.
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.