منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] تصدير بيانات الى قاعدة البيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] تصدير بيانات الى قاعدة البيانات (/showthread.php?tid=19680)



تصدير بيانات الى قاعدة البيانات - ahmed99 - 17-03-17

السلام عليكم ورحمة الل وبركاته
اريد ان اقوم بترحيل مجموعة من المشتريات عبر الداتا جريد او الليست فيو  وعند الضغط على زر حفظ يتم حفظ البيانات واجراء التعديلات في الجداول التي تحتوي على تلك الاصناف وزيادة الكمية
       وارجو ان احظى بالحل من قبلكم   وتقبلو خالص الشكر


RE: تصدير بيانات الى قاعدة البيانات - ahmed99 - 17-03-17

رجو شرح كيفية ترحيل فاتورة الشراء الى قاعدة البيانات من الداتاجريد مع تعديل كميات المنتجات في جدول المنتجات وفي حالة وجود منتجات جديدة في الفاتورة يتم اضافتها مسبقا
 وارجو تصحيح الكود التالي
لان العميلة تتم ولكن عند الضغط مرة اخرى يضهر خطاء في الكود التالي
Dim nu, con, s, o As Integer

        ds.Clear()

        Dim pro, kn As String

       

            For i = 0 To DataGridView1.RowCount - 1

                nu = DataGridView1.Rows(i).Cells(0).Value

                pro = DataGridView1.Rows(i).Cells(3).Value

                Cmd.Parameters.Add(New OleDbParameter("nu", OleDbType.Integer)).Value = 

                Conn.Open()

                Cmd.ExecuteNonQuery()

                sqls = "update  product set product = produc, kind = knd, cont = con where num = " & nu

                Cmd = New OleDbCommand(sqls, Conn)

                cm = New OleDbCommandBuilder(Da)

                Da.Fill(ds, "product")

                kn = DataGridView1.Rows(i).Cells(4).Value

                con = DataGridView1.Rows(i).Cells(5).Value

                Cmd.Parameters.Add(New OleDbParameter("produc", OleDbType.VarChar)).Value = pro

                Cmd.Parameters.Add(New OleDbParameter("knd", OleDbType.VarChar)).Value = kn

                Cmd.Parameters.Add(New OleDbParameter("con", OleDbType.Integer)).Value = con

                Conn.Close()

            Next


RE: تصدير بيانات الى قاعدة البيانات - abdualla - 17-03-17

أخي أحمد، أين المشروع لنعدل عليه


RE: تصدير بيانات الى قاعدة البيانات - سعود - 17-03-17

آمل ان تجد مطلوبك هنا


RE: تصدير بيانات الى قاعدة البيانات - ahmed99 - 17-03-17

(17-03-17, 05:30 PM)abdualla كتب : أخي أحمد، أين المشروع لنعدل عليه

تسلم انا راح احاول ارفع المثال

(17-03-17, 06:33 PM)سعود كتب : آمل ان تجد مطلوبك هنا

شكرا لك 
انا راح اشوف واقوالك

اخواني هذا و المثال ارجو التعديل وتقديم النصائح اللازمة


RE: تصدير بيانات الى قاعدة البيانات - abdualla - 17-03-17

ما فهمت مشروعك وخصوصا ما فيه غير جدول واحد

ما فهمته


RE: تصدير بيانات الى قاعدة البيانات - ahmed99 - 18-03-17

(17-03-17, 07:42 PM)abdualla كتب : ما فهمت مشروعك وخصوصا ما فيه غير جدول واحد

ما فهمته

ساقوم بارفاق اخر موضح 
وتقبل تحياتي

بفضل من الله حصلت على بعض المعلومات واستطعت ان احصل على بعض المعلومات ولكن يتبقى لدي مشكلة في البرنامج هذا المرفق موضح فيه كل شي
والمشكلة في ان عندما تكون الداتا جريد تحتوي على بعض الاسطر واقوم بعمل حفظ ستنتقل البيانات الى القاعة ويتم التعديل فيها ولكن عند حذف بعض الاسطر وادخال اخرى اقوم بالضغط على زر حفظ فتظهر مشكلة
ارجو ان تفيدوني اخوتي
واتمنى لكل من يستفيد من المثال هذا ان ينتفع به وينفع غيره ولا يبخب لغيره بمعلومه
وتقبلو خالص تحياتي


RE: تصدير بيانات الى قاعدة البيانات - sendbad100 - 18-03-17

السلام عليكم 
اخي الكريم 
او لا تحتاج الى تصميم  صحيح لقاعدة البيانات حيث تحتاج الى اكثر من جدول 

انظر الموضوع التالي  

http://vb4arb.com/vb/showthread.php?tid=12961


ولتالي ايضا 

http://vb4arb.com/vb/showthread.php?tid=12312&highlight=%D9%81%D8%A7%D8%AA%D9%88%D8%B1%D8%A9


والتالي 

http://vb4arb.com/vb/showthread.php?tid=11936&highlight=%D9%81%D8%A7%D8%AA%D9%88%D8%B1%D8%A9


وحاول ايضا الاطلاع على مشاريع جاهزة   
كي تستفيد منها عملياً

والله الموفق