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

كود :
Private Sub insert()

       ConnectDb()
       '========================================
       ds = New DataSet
       da = New SqlDataAdapter("SELECT * FROM income", con)
       da.Fill(ds, "income")
       cmd = New SqlCommand("INSERT INTO income (income_id, Suppiler_id_income, date_of_income) VALUES ( @income_id, @Suppiler_id_income, @date_of_income)", con)
       With cmd.Parameters
           .AddWithValue("@income_id", txtofnumorder.Text).DbType = DbType.Int32
           .AddWithValue("@Suppiler_id_income", cmbSuppliers.SelectedValue).DbType = DbType.Int32
           .AddWithValue("@date_of_income", dateoforder.Value).DbType = DbType.Date
       End With
       cmd.ExecuteNonQuery()
       '========================================================
       ds.Clear()
       ds = New DataSet
       da = New SqlDataAdapter("SELECT * FROM IncomeDetail", con)
       da.Fill(ds, "IncomeDetail")
       Dim i As Integer
       Try
           For i = 0 To DataGridView1.RowCount - 1
               Dim itemo As Integer = CInt(DataGridView1.Rows(i).Cells(0).Value)
               Dim Quantity1 As Integer = CInt(DataGridView1.Rows(i).Cells(1).Value)
               '=============================================================

               cmd = New SqlCommand("INSERT INTO IncomeDetail (income_id_det, Product_ID_income, Quantity) VALUES ( @income_id_det, @Product_ID, @Quantity)", con)
               With cmd.Parameters
                   .AddWithValue("@income_id_det", txtofnumorder.Text).DbType = DbType.Int32
                   .AddWithValue("@Product_ID", itemo).DbType = DbType.Int32
                   .AddWithValue("@Quantity", Quantity1).DbType = DbType.Int32
               End With
               cmd.ExecuteNonQuery()
               '===============================================
               cmd = New SqlCommand("UPDATE Product Set Quanty = Quanty+" & Quantity1 & " WHERE Product_ID = '" & itemo & "'", con)
               cmd.ExecuteNonQuery()
           Next
           MessageBox.Show("تم الحفظ بنجاح", AppError, MessageBoxButtons.OK, MessageBoxIcon.Information)
           DisconnectDb()
           FillData()

       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try

   End Sub

المشكلة الاولي رسالة لا اعرف سببها وهذا نصها  




اما المشكلة الثانية اني من المفترض عند الضغط علي زر حفظ يتم تفريغ الداتا جريد كيف يتم تفريغها 


وجزاكم الله خيرا
الرد
تم الشكر بواسطة:
#2
دة حل المشكله الثانية
DataGridView1.Rows.Clear()
DataGridView1.DataSource = Nothing
الرد
تم الشكر بواسطة:
#3
السلام عليكم

المشكلة الأولى فأنت تحفظ في جدول لديه عمود مرتبط وهو العمود ProductID .

ضع المشروع لإيجاد الكود المناسب للمشكلتين.
الرد
تم الشكر بواسطة:
#4
جزاكم الله الف خير بالنسبة لمشكلة تفريغ الداتا جريد استخدمت هذا الكود ونجح الحمد لله
كود :
       Me.DataGridView1.Rows.Clear()

بالنسبة للرسالة حتي الان لم اجد حل لها وقمت بارفاق المشروع


الملفات المرفقة
.zip   WindowsApplication1.zip (الحجم : 81.63 ك ب / التحميلات : 36)
الرد
تم الشكر بواسطة:
#5
انتي تتعاملي مع اصدار اعلى من اللي عندي،
لهذا اعملي سكريبت من قاعدة البيانات وارفقيه هنا
هذه الطريقة ان لم تكوني تعرفيها


لا أدري هل أنتظرك الآن أم أذهب.
الرد
تم الشكر بواسطة:
#6
تفضل هذه قاعدة البيانات


الملفات المرفقة
.zip   skript.zip (الحجم : 2.12 ك ب / التحميلات : 33)
الرد
تم الشكر بواسطة:
#7
جاري النظر،
ونظرا لتشعب المشروع وكثرة الجداول والعلاقات بينهم فسيحتاج للتركيز ولكن الأن الوقت متأخر،
وسأضع الحل في وقت لاحق إن شاء الله.

كنت أتمنى لو أن السكريبت يحتوي بعض البيانات للتجربة،
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة الفورم فى الخلف new_programer 0 3 منذ 52 دقيقة مضت
آخر رد: new_programer
  مشكلة صغير ب geckofx 60 الطابعة sva 2 29 أمس, 05:31 PM
آخر رد: sva
  مشكلة عند الضغط على زر التخزين nooralcown 1 20 أمس, 03:10 PM
آخر رد: elgokr
  مشكلة فى وضع كود جلب معلومات قاعدة البينات Mohamed Magdy 6 103 09-12-18, 08:14 AM
آخر رد: asemshahen5
  مشكلة ال common items غير ظاهر new_programer 6 113 08-12-18, 03:48 AM
آخر رد: asemshahen5
  مشكلة الشراء باسعار مختلفه نبيل كونكت 8 815 07-12-18, 07:13 AM
آخر رد: atef_020
  مشكلة مع كريستال ريبورت kaiser_noori 0 38 06-12-18, 12:52 PM
آخر رد: kaiser_noori
  مشكلة فى نصوص متغيره ابو روضة 0 42 06-12-18, 09:33 AM
آخر رد: ابو روضة
  الاخوة الذين يواجهون مشكلة الحفظ في قاعدة بيانات اكسسس abo ragab 0 104 04-12-18, 11:52 PM
آخر رد: abo ragab
  مشكلة نسخ ولصق في داتا كريد فيو kaiser_noori 5 105 26-11-18, 11:25 PM
آخر رد: HASAN6.0

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


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