تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] اكواد الاضافه والحذف
#1
السلام عليكم
اذا ممكن احد يساعدني اريد الكود الخاص بالاضافه والحذف والتعديل والمحدد في v.b في حاله الربط باداه Adodc
الرد }}}
تم الشكر بواسطة:
#2
ياريت لو احد يجاوبني لان محتاجه الاجابه ضروري جداا
الرد }}}
تم الشكر بواسطة:
#3
(03-10-14, 01:34 PM)هدى كتب : ياريت لو احد يجاوبني لان محتاجه الاجابه ضروري جداا
السلام عليكم 
كود الإضافة هو :
On Error Resume Next

Adodc1.Recordset.AddNew

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

Text5.Text = ""



وكود الحدف هو :
On Error Resume Next

Dim p As String





p = MsgBox(" هل تريد حدف هذا السجل ? ", vbYesNo, " suppression")

If p = vbYes Then

Adodc1.Recordset.Delete

Else

Cancel = 1

 End If



Adodc1.Recordset.MoveNext

If Adodc1.Recordset.EOF Then

Adodc1.Recordset.MoveFirst

End If

Adodc1.Recordset.MoveFirst

  Text1.Text = Adodc1.Recordset!Name

    Text2.Text = Adodc1.Recordset!secondname

    Text3.Text = Adodc1.Recordset!telephone

    Text4.Text = Adodc1.Recordset!Adresse

    Text5.Text = Adodc1.Recordset!comment
الرد }}}
تم الشكر بواسطة:
#4
شكرا جزيلا
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال اكواد emanhas 1 1,423 14-01-18, 04:02 PM
آخر رد: Amir_Alzubidy
Question [سؤال] اريد اكواد حل المعادلات من جميع الدرجات لو سمحتو طارق++ 9 15,810 07-04-17, 01:06 PM
آخر رد: الخير طهوري
  [سؤال] كتابة اكواد رياضية asto 1 1,717 17-06-16, 03:43 PM
آخر رد: KamelArab
  [vb6.0] طلب اكواد mustafamusaway 2 2,255 29-09-15, 12:48 PM
آخر رد: mustafamusaway
  [سؤال] سؤال بخصوص ربط قاعده البيانات على الاضافه مصطفى مجيد 1 1,966 08-06-15, 08:32 PM
آخر رد: KamelArab
  [VB.NET] اكواد البحث والتعديل والمحدد هدى 45 13,506 01-11-14, 10:39 PM
آخر رد: sgbd
  مشكلة في عملية البحث والحذف المبرمج الطموح 3 2,453 12-03-14, 12:00 AM
آخر رد: المبرمج الطموح
  [سؤال] اكواد البحث في هذا المثال princeofislam 10 5,661 02-02-14, 11:29 PM
آخر رد: princeofislam

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


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