تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لنسخ الملفات
#1
كاتب الموضوع : Boutemine Oualid

السلام عليكم و رحمة الله و بركاته


كود :
Public Sub CopyFile(ByVal source As String, ByVal destination As String, Optional ecrase As Boolean = False)
If (Dir(Source) <> "") Then
If (Dir(Destination) = "") Or Ecrase Then Call FileCopy(Source, Destination)
Else
Call MsgBox("file not found", vbExclamation & vbOKOnly)
End If
End Sub
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  أكواد التعامل مع الملفات RaggiTech 0 642 17-10-12, 02:44 PM
آخر رد: RaggiTech
  لنسخ خلفية سطح المكتب إلى برنامجك RaggiTech 0 286 17-10-12, 01:02 AM
آخر رد: RaggiTech
  طريقة للبحث عن الملفات RaggiTech 0 317 17-10-12, 12:46 AM
آخر رد: RaggiTech
  حذف الملفات إلى سلة المحذوفات RaggiTech 0 342 17-10-12, 12:43 AM
آخر رد: RaggiTech
  تفعيل و تعطيل إظهار الملفات المخفية Hidden Files المبرمج الطموح vb6 0 821 06-10-12, 12:37 PM
آخر رد: المبرمج الطموح vb6
  كود تسجيل الملفات برمجياً(((فيجوال بيسك 6)))) سانسيفا 1 762 21-09-12, 07:36 AM
آخر رد: Ahmad Jawad

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم