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



هذا الخطأ يحدث عند استرجاع كمية اخرى ثانية للبيع ، في الحالة الاولى تتم العملية عادي لكن المشكلة عندما اضيف فاتورة استرجاع اخرى للبيع















الكود : 





كود :
Public Sub Insert_Re_Sale_Tbl(ByVal R_Sale_ID As Int32, ByVal R_Sale_Date As Date, ByVal Cus_ID As Int32, ByVal Item_Count As Int32, ByVal FinalTotal As Double, ByVal SalesMan As String)
       Dim Cmd As New SqlCommand
       With Cmd
           .Connection = Con
           .CommandType = CommandType.Text
           .CommandText = "Insert Into Re_Sale_Tbl ( R_Sale_ID,R_Sale_Date,Cus_ID,Item_Count,FinalTotal,SalesMan)values(@R_Sale_ID,@R_Sale_Date,@Cus_ID,@Item_Count,@FinalTotal,@SalesMan)"
           .Parameters.Clear()
           .Parameters.AddWithValue("@R_Sale_ID", SqlDbType.Int).Value = R_Sale_ID
           .Parameters.AddWithValue("@R_Sale_Date", SqlDbType.Date).Value = R_Sale_Date
           .Parameters.AddWithValue("@Cus_ID", SqlDbType.Int).Value = Cus_ID
           .Parameters.AddWithValue("@Item_Count", SqlDbType.Int).Value = Item_Count
           .Parameters.AddWithValue("@FinalTotal", SqlDbType.Decimal).Value = FinalTotal
           .Parameters.AddWithValue("@SalesMan", SqlDbType.varchar).Value = SalesMan
       End With
       If Con.State = 1 Then Con.Close()
       Con.Open()
       Cmd.ExecuteNonQuery()
       Con.Close()
       MsgBox("تم إضافة السجل بنجاح", MsgBoxStyle.Information, "حفظ")
       Cmd = Nothing
   End Sub
------------------------
منكم أتعلم
------------------------

الرد }}}
تم الشكر بواسطة:
#2
حقل المفتاح الاساسي اسمة ايه؟

عامل حقل ترقيم تلقائي وبتديلة قيمة وده سبب الخطأ
الرد }}}
#3
(01-10-20, 05:50 PM)abdou كتب : حقل المفتاح الاساسي اسمة ايه؟

عامل حقل ترقيم تلقائي وبتديلة قيمة وده سبب الخطأ

تم حل المشكل بارك الله فيك
------------------------
منكم أتعلم
------------------------

الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تغيير على كود الحفظ محمد خيري 6 171 أمس, 04:20 PM
آخر رد: محمد خيري
  [VB.NET] مساعدة في تقرير mrfenix93 1 41 24-03-24, 10:29 PM
آخر رد: mrfenix93
  مساعدة jalaltech 1 96 07-03-24, 07:38 PM
آخر رد: قناص المدينة
  [VB.NET] مساعدة فى كود فاتورة اللكترونية asdfar1977 2 194 02-03-24, 02:00 AM
آخر رد: asdfar1977
  مساعدة فى كود فاتورة الكترونية asdfar1977 0 80 29-02-24, 07:14 PM
آخر رد: asdfar1977
  مساعدة jalaltech 0 133 17-02-24, 02:15 AM
آخر رد: jalaltech
  طلب مساعدة AHMED213 3 324 06-02-24, 09:39 PM
آخر رد: AHMED213
  [VB.NET] مشكلة عند الحفظ Abdellatif 6 377 31-01-24, 02:47 AM
آخر رد: Abdellah
  [VB.NET] طلب مساعدة AHMED213 0 221 31-01-24, 12:56 AM
آخر رد: AHMED213
  طلب مساعدة بخصوص كود الطباعة paveldida 2 461 19-01-24, 12:00 AM
آخر رد: العتيق

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


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