تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال عن عمل نسخة احتياطية لجزء من قاعدة البيانات
#1
لدي كود يعمل نسخة احتياطية لقاعدة البيانات وهو يعمل جيدا
اريد التعديل على الكود بحيث يعمل نسخة احتياطية فقط لجدول معين
كود :
 Try
           If txt1char.Text = "C" Then
               MessageBox.Show("حاول مجدداً C:\ لا يمكن حفظ النسخة الاحتياطية على الجذر  ",
"", MessageBoxButtons.OK, MessageBoxIcon.Information)
               Exit Sub
           End If
         
           Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;Initial Catalog=DB_ACC;Integrated Security=True")

           Dim datab As String
           datab = "DB_ACC"

           'datab = My.Settings.DataBase
           If txt_path.Text = "" Then
               MessageBox.Show(" يجب اختيار المسار اولا", "تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Information)
               Return

           End If

           Dim Filename As String = txt_path.Text + "\ " + datab + " " + DateTime.Now.ToShortDateString()
.Replace("/", "-") + " - " + DateTime.Now.ToLongTimeString().Replace(":", "-") & ".bak"
           If con.State = ConnectionState.Open Then
               con.Close()
           End If
           con.Open()
           Dim querey As String = "backup database " & datab & " to disk='" & Filename & "'with init,stats=10"

           cmd = New SqlCommand(querey, con)
           cmd.ExecuteNonQuery()
           con.Close()
           MessageBox.Show(" تمت عملية النسخ بنجاح", "تاكيد", MessageBoxButtons.OK, MessageBoxIcon.Information)
       Catch ex As Exception
           MessageBox.Show(ex.ToString, "تنبيه")
       End Try
سورس كود برنامج محاسبة ومبيعات احترافي ومتكامل- قم بالاطلاع على البرنامج 
 مجاناااااا
واتساب 00963951283515
الرد
تم الشكر بواسطة:
#2
هل الامر صعب لهذه الدرجة

هل من مساعدة
سورس كود برنامج محاسبة ومبيعات احترافي ومتكامل- قم بالاطلاع على البرنامج 
 مجاناااااا
واتساب 00963951283515
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن كيفية اخراج فاتوره البيع كامله للاستعلام فقط حسين ادريس 4 178 , 07:35 PM
آخر رد: علاء الكبابي
  سؤال حول تهنيج داتا جريد فيو خالد20 0 30 , 05:49 PM
آخر رد: خالد20
  سؤال عن تصنيع الاصناف alfaiz678 3 152 20-01-22, 04:45 PM
آخر رد: Taha Okla
  [سؤال] ممكن شرح او رابط افضل طرق عرض البيانات في الداتاجريد و التعامل معها غدير الصليحي 2 430 19-01-22, 01:46 AM
آخر رد: رضوان الجماعي
  سؤال عن where محمود صالح 3 130 18-01-22, 04:48 AM
آخر رد: محمود صالح
  سؤال في المصفوفات اليوم السابع 1 98 15-01-22, 10:50 PM
آخر رد: محمود صالح
  تعديل صورة مكان صورة محفوظة في قاعدة البيانات mustafa mohamed 1 142 13-01-22, 11:24 PM
آخر رد: ابراهيم ايبو
  سؤال عن فتح فورم ابو انس 2 130 11-01-22, 11:46 PM
آخر رد: ابو انس
Lightbulb [VB.NET] سؤال على الماشي أبو خالد الشكري 4 173 11-01-22, 12:58 PM
آخر رد: أبو خالد الشكري
  السلام عليكم عندي سؤال فالمنهج الدراسي AhmedRamadan 5 263 11-01-22, 01:55 AM
آخر رد: ابراهيم ايبو

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


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