+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم امثلة ومشاريع VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=188)
+--- الموضوع : [مثال] مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة (/showthread.php?tid=16733)
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - atefkhalf2004 - 26-05-18
السيد الفاضل
عايزين رابط 2014 يعمل علي ويندوز 7 32
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - atefkhalf2004 - 02-06-18
مرة اخري
برجاء رابط
او ارفع قاعدة 2008 تجرب بها
مفصوله غير الاولي
كل سنة وانت طيب
شهر كريم
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - atefkhalf2004 - 08-06-18
هل يصلح هذا المثال علي فيجوال 2008
وسكول 2008
جربت ولم يصلح مع تغيير ما يلزم من اسم القاعدة والجدول الداخلي
افيدونا
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - atefkhalf2004 - 08-06-18
عرفت الخطا كان في حرف
شكرا
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - atefkhalf2004 - 13-06-18
الاستاذ جميل علي
كيف
يتم النسخ كل ساعتين مثلا يوميا
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - ابراهيم ايبو - 24-06-18
الشكر والامتنان اقل مايجب ان يقال نحتاج في هذا الموقع الغالي الى هكذا امثلة جزاكم الله كل خير RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - dametucorazon - 12-07-18
جزاك الله خيرا اخي الفاضل
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - essawq - 27-08-18
كلمة شكر لا تكفي
بارك الله بك وبميزان حسناتك
اخي الكريم تمت التجربة على قاعدة بيانات بها ثلاث جداول كل شيء تماام
لكن اخي عند التفريغ يتم تفريغ جدول واحد وهو المكتوب هنا
كود :
Dim str As String = ("Delete from [woork1]")عندي جدول اخر باسم Month_Information لا يتم تفريغة حاولت اعدل واضيف اسم الجدول لكن لم افلح في ذلك
تحياتي لك
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - elgokr - 27-08-18
(27-08-18, 01:22 AM)essawq كتب :كلمة شكر لا تكفيبارك الله بك وبميزان حسناتك
اخي الكريم تمت التجربة على قاعدة بيانات بها ثلاث جداول كل شيء تمااملكن اخي عند التفريغ يتم تفريغ جدول واحد وهو المكتوب هنا
كود :
Dim str As String = ("Delete from [woork1]")عندي جدول اخر باسم Month_Information لا يتم تفريغة حاولت اعدل واضيف اسم الجدول لكن لم افلح في ذلكتحياتي لك
كل ما عليك هو تكرار كود التفريغ لباقي الجداول
وسيقوم باتمام المطلوب دون اى مشكلة
تحياتى لك
وتمنياتى لك التوفيق
RE: مثال لنسخ وإستعادة قاعدة البيانات ( تحديث) نسخ تلقائي للقاعدة حسب اليوم والساعة - essawq - 27-08-18
مشكور اخي elgokr
تم تكرار الكود بهذة الطريقة ويعمل
كود :
If MsgBox("سوف يتم تفريغ قاعدة البيانات بشكل نهائي", vbYesNo + vbQuestion, "رسالة تأكيد") = MsgBoxResult.No Then
If MsgBoxResult.Yes Then
Return
End If
End If
Me.Cursor = Cursors.WaitCursor
Dim str As String = ("Delete from [woork1]")
myconn.cmd = New SqlCommand(str, myconn.conn)
If myconn.conn.State = ConnectionState.Open Then
myconn.conn.Close()
End If
myconn.conn.Open()
myconn.cmd.ExecuteNonQuery()
myconn.conn.Close()
Me.Cursor = Cursors.Default
Me.Cursor = Cursors.WaitCursor
Dim strr As String = ("Delete from [Month_Information]")
myconn.cmd = New SqlCommand(strr, myconn.conn)
If myconn.conn.State = ConnectionState.Open Then
myconn.conn.Close()
End If
myconn.conn.Open()
myconn.cmd.ExecuteNonQuery()
myconn.conn.Close()
Me.Cursor = Cursors.Default
MessageBox.Show("تم تفريغ قاعدة البيانات بشكل نهائي ", "تم", MessageBoxButtons.OK, MessageBoxIcon.Information)هل من تعديل ام ان الامور تماام هيك
بارك الله فيك