تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كمبو بوكس داخل الداتا جريد
#1
الاخوة الافاضل
عندى داتا جريد ياخد البيانات من جدولين
رقم العميل   اسم العميل     كمبوبوكس ( جملة - تجزئة )
عند  حفظ تغيير نوع العميل من جملة او تجزئة يعطى رسالة خطأ
الرد }}}}
تم الشكر بواسطة:
#2
ارسل مثال بسيط ليتم الرد عليك بشكل اسرع
الرد }}}}
تم الشكر بواسطة:
#3
يرجى التوضيح
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم و رحمة الله 
ارفقت ملف فيه نموذج بسيط


الملفات المرفقة
.rar   comboindata.rar (الحجم : 193.46 ك ب / التحميلات : 50)
الرد }}}}
تم الشكر بواسطة:
#5
السلام عليكم

تفضل التعديل في المرفقات


الملفات المرفقة
.rar   ‏‏comboboxindata - 2.rar (الحجم : 38.4 ك ب / التحميلات : 61)
الرد }}}}
تم الشكر بواسطة: أبووسم , sendbad100
#6
Rainbow 
(22-02-17, 12:16 AM)مساعدة كتب : السلام عليكم

تفضل التعديل في المرفقات

كل الشكر للزملاء و الاخوة الذين ساعدونى
زادهم الله علما و عملا به
الرد }}}}
تم الشكر بواسطة:
#7
(22-02-17, 12:16 AM)مساعدة كتب : السلام عليكم

تفضل التعديل في المرفقات
بعد اذنكم
كنت عايز احل المشكلة بالكود
لو امكن


(22-02-17, 12:16 AM)مساعدة كتب : السلام عليكم

تفضل التعديل في المرفقات
بعد اذنكم
كنت عايز احل المشكلة بالكود
لو امكن
الرد }}}}
تم الشكر بواسطة:
#8
تفضل التعديل بالكود
كود :
Imports System.Data.OleDb
Public Class Form1
    Dim con As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=customers.accdb")
    Dim da As New OleDbDataAdapter
    Dim dt As New DataTable


    Dim dttype As New DataTable

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim datype As New OleDbDataAdapter("select * from cust_type", con)
        datype.Fill(dttype)
        Column3.DataSource = dttype
        Column3.DisplayMember = "custype_name"
        Column3.ValueMember = "custype_id"

        '**********************************************

        da = New OleDbDataAdapter("SELECT customers.cust_id, customers.cust_name, cust_type.custype_name FROM cust_type INNER JOIN customers ON cust_type.[custype_id] = customers.[custype_id] order by customers.cust_id;", con)
        dt = New DataTable
        da.Fill(dt)
        For i = 0 To dt.Rows.Count - 1
            DataGridView1.Rows.Add()
            DataGridView1.Rows(i).Cells(0).Value = dt(i)(0)
            DataGridView1.Rows(i).Cells(1).Value = dt(i)(1)
            DataGridView1.Rows(i).Cells(2).Value = dt(i)(2)

        Next



    End Sub

  

    Private Sub DataGridView1_DataError(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewDataErrorEventArgs) Handles DataGridView1.DataError
        On Error Resume Next
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'كود الحفظ

        Dim cmd As New OleDbCommand(String.Empty, con)

        con.Open()
        For Each r As DataGridViewRow In DataGridView1.Rows
            If r.IsNewRow Then Exit For
            If IsNumeric(r.Cells(2).Value) Then

                cmd.CommandText = "update customers set cust_name=@cust_name,custype_id=@custype_id where cust_id=@cust_id"
                With cmd.Parameters
                    .Clear()
                    .AddWithValue("@cust_name", r.Cells(1).Value)
                    .AddWithValue("@custype_id", r.Cells(2).Value)
                    .AddWithValue("@cust_id", r.Cells(0).Value)

                End With
                cmd.ExecuteNonQuery()

            End If
        Next
        con.Close()


    End Sub

  
End Class
الرد }}}}
تم الشكر بواسطة: فارس احمد السيد
#9
نشكركم على المساعدة
جعله الله فى ميزان حساناتكم
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ضم اعمدة للداتا جريد فيو محمد اسماعيل 13 115 أمس, 09:35 PM
آخر رد: محمد اسماعيل
  [سؤال] انشاء تقرير مباشر من داتا جريد فيو العنابي 1 40 أمس, 02:32 PM
آخر رد: khodor1985
  [VB.NET] اسناد التاريخ الي الداتا تيم من الداتا جريد محمد اسماعيل 8 75 19-01-18, 09:42 PM
آخر رد: محمد اسماعيل
  كيف يمكن العرض من قاعده البيانت الى الداتا جريد يوجد صورة مراد بورجي 1 48 19-01-18, 01:21 PM
آخر رد: محمود صالح
Photo مشكلة عند عرض البيانات داخل داتا قرايد فيو nooralcown 1 33 19-01-18, 09:23 AM
آخر رد: محمود صالح
  [VB.NET] تقسيم وتوزيع متغير علي لاينات بتيكست بوكس محمد اسماعيل 2 47 17-01-18, 01:46 AM
آخر رد: محمد اسماعيل
  [ تمّ الحل ] : إضافة أداة التشيك بوكس عبد العزيز البسكري 4 56 16-01-18, 07:56 PM
آخر رد: عبد العزيز البسكري
  ارسال الداتا جريد فيو بالايميل السيد الجوهري 9 211 13-01-18, 10:04 PM
آخر رد: hglogtd
  تعبئة داتا جريد من جدولين مرتبطين ؟ Abdelazez.Ahmad 0 55 11-01-18, 08:35 PM
آخر رد: Abdelazez.Ahmad
  تخزين مباشر بالداتا جريد alma_fandi 4 251 11-01-18, 04:13 PM
آخر رد: عبدالله الدوسري

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


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