تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
استفسار بخصوص اخذ نسخه احتياطيه(تم الحل)مشكور اخوانى (waw والاخ asemshahen5)
#11
PHP كود :
   Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Dim fbd 
As New FolderBrowserDialog()
 
       fbd.Description "الرجاء تحديد المجلد للنسخ الاحتياطي"
 
       If fbd.ShowDialog() = DialogResult.OK Then
            System
.IO.File.Copy(Application.StartupPath "\FirstDatabase.accdb"fbd.SelectedPath "\FirstDatabase.accdb")
 
           System.IO.File.Copy(Application.StartupPath "\SecandDatabase.accdb"fbd.SelectedPath "\SecandDatabase.accdb")
 
       End If
 
   End Sub 


   

   
الرد
تم الشكر بواسطة: خالد كامل1
#12
(06-09-21, 07:24 PM)asemshahen5 كتب :
PHP كود :
   Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Dim fbd 
As New FolderBrowserDialog()
 
       fbd.Description "الرجاء تحديد المجلد للنسخ الاحتياطي"
 
       If fbd.ShowDialog() = DialogResult.OK Then
            System
.IO.File.Copy(Application.StartupPath "\FirstDatabase.accdb"fbd.SelectedPath "\FirstDatabase.accdb")
 
           System.IO.File.Copy(Application.StartupPath "\SecandDatabase.accdb"fbd.SelectedPath "\SecandDatabase.accdb")
 
       End If
 
   End Sub 

بص على طريقه كتابتى للكود وقولى حضرتك فين الغلط وعلى فكره قاعده البينات الاولى mahel والتانيه warsha

     
كود :
Dim fbd As New FolderBrowserDialog()
       fbd.Description = "الرجاء تحديد المجلد للنسخ الاحتياطي"
       If fbd.ShowDialog() = DialogResult.OK Then
           System.IO.File.Copy(Application.StartupPath + "\MAHEL.accdb", fbd.SelectedPath + "\MAHEL.accdb")
           System.IO.File.Copy(Application.StartupPath + ":warsha.accdb", fbd.SelectedPath + ":warsha.accdb")
       End If
الرد
تم الشكر بواسطة:
#13
الغلط في النقطتين : اللي قبل اسم الملف، المفروض تكون \
كود :
System.IO.File.Copy(Application.StartupPath + "\warsha.accdb", fbd.SelectedPath + "\warsha.accdb")
الرد
تم الشكر بواسطة: ابراهيم ايبو , asemshahen5
#14
(06-09-21, 09:53 PM)waw كتب : الغلط في النقطتين : اللي قبل اسم الملف، المفروض تكون \
كود :
System.IO.File.Copy(Application.StartupPath + "\warsha.accdb", fbd.SelectedPath + "\warsha.a
لا اخى العزيز ليس هذا هو الخطأ
الرد
تم الشكر بواسطة:
#15
النقطتين وجودها خطا

لكن لاحظت في مشاركتك الاولى ان قاعدة البيانات الاساسية موجودة في مجلد DATA فاذا كان كذالك فيجب اضافة اسم ذلك المجلد قبل اسم الملف
كود :
System.IO.File.Copy(Application.StartupPath + "\DATA\warsha.accdb", fbd.SelectedPath + "\warsha.accdb")
اذا ظهر خطا ضع صورته
الرد
تم الشكر بواسطة: خالد كامل1
#16
(07-09-21, 03:40 AM)waw كتب : النقطتين وجودها خطا

لكن لاحظت في مشاركتك الاولى ان قاعدة البيانات الاساسية موجودة في مجلد DATA فاذا كان كذالك فيجب اضافة اسم ذلك المجلد قبل اسم الملف
كود :
System.IO.File.Copy(Application.StartupPath + "\DATA\warsha.accdb", fbd.SelectedPath + "\warsha.accdb")
اذا ظهر خطا ضع صورته

اخى العزيز لاحظ ان عايز التعامل يكون مع قاعدتين بينات مختلفين الاسم 

الرد
تم الشكر بواسطة: waw
#17
لا تضيف اسم المجلد DATA في الجزء الثاني من السطر الا اذا كان هناك فعلا مجلد بذلك
اقصد بالجزء الثاني
كود :
fbd.SelectedPath + "\warsha.accdb"
لاحظت في مشاركتي السابقة اضفت اسم المجلد DATA في الجزء الاول فقط
الرد
تم الشكر بواسطة: خالد كامل1 , ابراهيم ايبو
#18
(07-09-21, 08:24 PM)waw كتب : لا تضيف اسم المجلد DATA في الجزء الثاني من السطر الا اذا كان هناك فعلا مجلد بذلك
اقصد بالجزء الثاني
كود :
fbd.SelectedPath + "\warsha.accdb"
لاحظت في مشاركتي السابقة اضفت اسم المجلد DATA في الجزء الاول فقط

تم الحل الف شكر ولكن اخى الكريم فى الاسترجاع ... اريد كود لاسترجاع القاعدتين بنقره زر واحده كما فى عمل اخذ النسخه الاحتياطيه والف شكر على تعبك
الرد
تم الشكر بواسطة: waw , ابراهيم ايبو
#19
عملية الاسترجاع هي نفس عمليه النسخ السابقه ولكن تبدل اماكن مسار الملفين بشرط تكون قاعدة البيانات غير متصله داخل البرنامج
اي انك عملت لها con.Close قبل الاستعاده
كود :
System.IO.File.Copy(fbd.SelectedPath + "\warsha.accdb", Application.StartupPath + "\DATA\warsha.accdb", True)
القيمه True من اجل ان يستبدل الملف ان كان موجود
الرد
تم الشكر بواسطة: ابراهيم ايبو , ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن مساعدة بخصوص كويري معين حدتت به اخطاء Alanwalker 8 734 02-10-21, 01:52 PM
آخر رد: mahmoud_f
  [سؤال] استفسار عن دالة لحساب الارقام المتشابهة نيمو 7 325 27-09-21, 09:30 PM
آخر رد: ماشي
  سؤال بخصوص ميزان الباركود momani33 0 191 23-09-21, 11:06 PM
آخر رد: momani33
  سؤال بخصوص حفظ التاريخ في قاعدة البيانات من نوع mysql 3loosh44 2 288 19-09-21, 08:47 PM
آخر رد: 3loosh44
  [VB.NET] السلام عليكم عندي استفسار بخصوص الكلاسات AhmedRamadan 3 379 18-09-21, 08:02 PM
آخر رد: العطر الرايق
  استفسار بخصوص فيجوال ستوديو 2013 AhmedRamadan 3 251 17-09-21, 09:02 PM
آخر رد: العطر الرايق
  [VB.NET] استفسار بخصوص التقارير في .net Core 5 mrfenix93 1 192 17-09-21, 08:17 PM
آخر رد: asemshahen5
  استفسار بخصوص اختصار اسم الصنف في شاشة المبيعات ahmedbezia 4 269 17-09-21, 02:53 AM
آخر رد: ahmedbezia
Exclamation استفسار بخصوص مشروع عمل ختمة قرآنية بتوزيع الصفحات (لأصحاب الصدقات الجارية) elsayedhasan 10 774 11-09-21, 07:01 PM
آخر رد: dalas
  سؤال بخصوص اداة ribbon في vb.net 2019 mrfenix93 0 223 03-09-21, 01:21 AM
آخر رد: mrfenix93

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


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