منتدى مصر التقني
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

[VB6] تعديل كواد النسخه الحتياطيه

اذهب الى الأسفل

[VB6] تعديل كواد النسخه الحتياطيه Empty [VB6] تعديل كواد النسخه الحتياطيه

مُساهمة من طرف ahmed250 السبت مارس 07, 2020 9:42 pm

ممكن تعديل الكواد التالي بحيث يتم حفظ النسخ بتاريخ وساعه وفي نفس الفولدر البرنامج وجزاكم الله خير لي ولكم
الكود:
On Error GoTo BackupError
    Dialog.FileName = ""
    Dialog.Filter = "Backup files (*.bck) |*.bck|"
    Dialog.ShowSave
        If Dialog.FileName <> "" Then
            If FileLen(App.Path & "\DataSum.MDB") > 1210000 And Mid(Dialog.FileName, 1, 1) = "A" Then
                MsgBox "áÇ íãßä äÓÎ ÞÇÚÏÉ ÇáÈíÇäÇÊ Úáì åÐÇ ÇáãÍÑß ÝÖáÇð Þã ÈÅÓÊÈÏÇáå ÈãÍÑß Ðæ ÓÚÉ ÇßÈÑ .", vbOKOnly + vbCritical, " ÎØà Ýí ÇáäÓÎ" + UserName
            Else
                FileCopy (App.Path & "\DataSum.MDB"), Dialog.FileName
              MsgBox "Êã Úãá äÓÎÉ ÇÍÊíÇØíÉ ÈäÌÇÍ", vbOKOnly + vbInformation, " ÇáäÓÎ ÇáÇÍÊíÇØí" + UserName
            End If
        End If
    Exit Sub
BackupError:
  MsgBox Err.Description, vbOKOnly + vbCritical, " Warning:End-User" + UserName
ahmed250
ahmed250
.
.

تاريخ التسجيل : 07/03/2020
المساهمات : 3
النقاط : 8
التقيم : 1
الدولة : ليبيا
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

[VB6] تعديل كواد النسخه الحتياطيه Empty رد: [VB6] تعديل كواد النسخه الحتياطيه

مُساهمة من طرف NEXT الأحد مارس 08, 2020 3:07 pm

راجع هذا المقال

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
[VB6] تعديل كواد النسخه الحتياطيه Do.php?imgf=154090993464951
NEXT
NEXT
الادارة
الادارة

تاريخ التسجيل : 18/02/2011
المساهمات : 446
النقاط : 200660
التقيم : 28
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

[VB6] تعديل كواد النسخه الحتياطيه Empty رد: [VB6] تعديل كواد النسخه الحتياطيه

مُساهمة من طرف ahmed250 الإثنين مارس 09, 2020 7:21 pm

اريد تعديل هذه الكواد بحيت يتم النسخ وحفظ في نفس الولد وحفظ النستخ بتاريخ والساعه بعدل من تحديد المسار واختيار اسم للنسخ
ahmed250
ahmed250
.
.

تاريخ التسجيل : 07/03/2020
المساهمات : 3
النقاط : 8
التقيم : 1
الدولة : ليبيا
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

ََ

مواضيع ذات صلة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى