ايران ويج

نسخه‌ی کامل: کمک در مورد کپی فایل
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
لطفا بگید چطوری یه فایلی رو از یه جا کپی کنم و یه جا دیگه پیست کنم
کد:
FileCopy  File1 , File2
فايل 1 منبع
و فايل 2  . كپي اون فايل .
البته آدرسش رو منظورم هست.
اين كار با فايل سيستم آبجكت بهتر انجام ميشه.
[code]Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long


Private Sub Form_Load()

CommonDialog1.DialogTitle = "Choose File"
CommonDialog1.CancelError = False
CommonDialog1.ShowOpen

CopyFile CommonDialog1.FileName, "C:\Sample.bmp", 0

End Sub

Sheveda عزیز حداقل لینکش رو بهش می دادی
راستی شما در زدن تاپیک از خاصیت کد هم می تونی استفاده کنی
http://www.iranvig.com/modules.php?name=...age&pid=88
اینم لینکشBiggrin دفعه ی دیگه از اون خاصیت استفاده می کنم
خیلی ممنون