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

مجرد كود اذا قمت بالغط على كلمة حفظ 

يحفظ العميل ومشتريات العميل ويقوم بالربط بينهم بال ID

عجزت والله عشان اربطهم عندي مشكلة دائما مع الربط

ترجو المساعدة العاجلة وجزاكم الله الف خير

مرفق النموذج


الملفات المرفقة صورة/صور
       

.rar   Test.rar (الحجم : 318.7 ك ب / التحميلات : 8)
الرد }}}
تم الشكر بواسطة:
#2
هل من مجيب ؟؟؟؟؟
الرد }}}
تم الشكر بواسطة:
#3
(22-02-20, 09:28 PM)mohamedgadain61 كتب : اريد حفظ محتوى من عدة اصناف داخل داتا جيرد مع اسم العميل ورقم المعرف الخاص بالعميل 

مجرد كود اذا قمت بالغط على كلمة حفظ 

يحفظ العميل ومشتريات العميل ويقوم بالربط بينهم بال ID

عجزت والله عشان اربطهم عندي مشكلة دائما مع الربط

ترجو المساعدة العاجلة وجزاكم الله الف خير

مرفق النموذج

لربط حقلين يجب أن يكونو من نفس نوع البيانات

يعني اذا كان في الجدول الاول نوع الحقل رقم يجب ان يكون في الجدول الثاني نوع الحقل رقم ايضا
الرد }}}
تم الشكر بواسطة:
#4
اعلم ذلك اخي الفاضل ولاكن لا اعرف كيف اقوم بعملية حفظ الجدولين بنفس الوقت مجرد الضغط على كلمة حفظ
مرفق النموذج للمساعدة وشكرا
الرد }}}
تم الشكر بواسطة:
#5
(23-02-20, 12:45 AM)mohamedgadain61 كتب : اعلم ذلك اخي الفاضل ولاكن لا اعرف كيف اقوم بعملية حفظ الجدولين بنفس الوقت مجرد الضغط على كلمة حفظ
مرفق النموذج للمساعدة وشكرا

لا يوجد حفظ جدولين في نفس الوقت في كل قواعد البيانات، لابد من حفظ كل جدول على حده،

يعني تقوم بحفظ الجدول الاول وبعد الانتهاء منه تقوم بحفظ الثاني وهكذا لو كان هناك جدول ثالث ورابع الى اخره.
الرد }}}
تم الشكر بواسطة: عبد العزيز البسكري
#6
تمام ارجو توضح ذلك بالمثال اخي الفاضل
الرد }}}
تم الشكر بواسطة:
#7
(23-02-20, 01:39 AM)mohamedgadain61 كتب : تمام ارجو توضح ذلك بالمثال اخي الفاضل

مشروعك غير مفهوم
ولا يوجد فيه سوى فورم واحد

بهذا الشكل سيعمل على تسجيل العميل كجديد في كل مره

ايضا لا ادري كيف ستعرض بيانات عميل محدد، فلا يوجد في المشروع فورم لاختيار العميل

اذا كنت تريد تسجيل فواتير للعملاء فتحتاج مشروع آخر غير هذا، ويوجد في المنتدى مشاريع فواتير ابحث عنها

لا تعتمد على هذا الكود
قبل ان تجرب هذا الكود عليك في جدول Customer1 بتغيير نوع بيانات الحقل ID_Customer الى رقم
كود :
Imports System.Data.OleDb
Imports System.IO

Public Class Form1

   Public Cn As New OleDbConnection("provider=microsoft.Ace.oledb.12.0;data source=  " & Application.StartupPath & "\TestDB.accdb")



   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       Me.Customer1TableAdapter.Fill(Me.TestDBDataSet.Customer1)
       Me.CustomerTableAdapter.Fill(Me.TestDBDataSet.Customer)

   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       If Cn.State Then Cn.Close()
       Cn.Open()

       Dim Cmdd As New OleDbCommand("Insert into Customer(Customer_Name,Phone,total)values(@Customer_Name,@phone,@total)", Cn)
       Cmdd.Parameters.AddWithValue("@Customer_Name", Customer_NameTextBox.Text)
       Cmdd.Parameters.AddWithValue("@Phone", PhoneTextBox.Text)
       Cmdd.Parameters.AddWithValue("@total", TotalTextBox.Text)

       If Cmdd.ExecuteNonQuery >= 1 Then
           Cmdd.CommandText = "SELECT @@IDENTITY"
           Dim id_customer = Cmdd.ExecuteScalar

           Dim Cmdd2 As New OleDbCommand("Insert into Customer1(ID_Customer,proudect,price,items,total)values(@ID_Customer,@proudect,@price,@items,@total)", Cn)
           For Each r As DataGridViewRow In Customer1DataGridView.Rows
               If r.IsNewRow Then Exit For
               Cmdd2.Parameters.Clear()
               Cmdd2.Parameters.AddWithValue("@ID_Customer", id_customer)
               Cmdd2.Parameters.AddWithValue("@proudect", r.Cells(2).Value.ToString)
               Cmdd2.Parameters.AddWithValue("@price", r.Cells(3).Value.ToString)
               Cmdd2.Parameters.AddWithValue("@items", r.Cells(4).Value.ToString)
               Cmdd2.Parameters.AddWithValue("@total", r.Cells(5).Value.ToString)
               Cmdd2.ExecuteNonQuery()
           Next
       End If

       Cn.Close()

       'اريد كود حفظ بيانات داخل الداتا جيرد فيور + الربط بين الجدولين برقم المعرف من الجدول الأول وشكرا


       MsgBox("تم الحفظ")
   End Sub


End Class
الرد }}}
تم الشكر بواسطة: asemshahen5 , عمور2016 , عمور2016


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] السلام عليكم ممكن مساعدة اخوان احتاج يكون تسجيل الدخول textbox1 + textbox2 Coder_iraqii 4 400 18-12-23, 06:46 PM
آخر رد: Kamil
  [سؤال] اخوان الاعزاء ارجو مساعدتى في حل عرض بيانات في تقرير كريستال ريبورت nazarakrawi 8 3,907 21-08-23, 11:11 PM
آخر رد: mohamed Matrix
  [سؤال] دمج جدولين في داتا جريد فيو alhuraibi 0 353 04-08-23, 12:08 AM
آخر رد: alhuraibi
  [VB.NET] ارجو المساعده مرفق سورس كود البرنامج فى المطلوب المساعده فيه hanyeltnen 2 611 04-02-23, 01:30 AM
آخر رد: aljzazy
  [VB.NET] كيفية تحويل الوحدات في نموذج فاتورة Abo maria 1 651 17-01-23, 06:33 PM
آخر رد: Taha Okla
  الربط بين جدولين فى سيكوال سيرفر حماده ممدوح البحيرى 2 485 28-12-22, 04:22 PM
آخر رد: حماده ممدوح البحيرى
  استدعاء سجل محدد من نموذج آخر مسلم_١ 5 1,449 29-09-22, 06:35 PM
آخر رد: Jlol
  تعريب عناصر جدول في الريتش بوكس _ مرفق _( كود _ مثال _صورة ) zinom 5 1,679 28-11-21, 09:52 PM
آخر رد: zinom
  فتح نموذج عند اختيار سجل محدد من نموذج اخر Arfat007 7 1,742 28-11-21, 06:49 PM
آخر رد: Arfat007
  معرفة الوقت الاضغر بين وقتين وقت الدخول وقت الخروج- مرفق مثال new_programer 6 1,615 25-11-21, 04:16 AM
آخر رد: new_programer

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


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