25-11-18, 12:43 AM
السلام عليكم
ما هى المشكلة الخاصة بهذة الرسالة
ما هى المشكلة الخاصة بهذة الرسالة
25-11-18, 01:09 AM
راجع الحقول جيّدا بقاعدة البيانات أخي الكريم .. لا أفهم الأنجليزية جيدا .. فهمت فقط عبارتيْ Duplicate و field .. و على هذا يبدو لديك أسماء حقول مكرّرة .. أو ما شابه
25-11-18, 01:21 AM
كما قال لك الاخ عبد العزيز ، ان تقوم بتكرار ال primary key
25-11-18, 03:21 AM
ممكن ايضاح اكتر
25-11-18, 03:26 AM
هل يمكنك وضع كود الاضافة هنا لاشرح لك
25-11-18, 04:14 AM
(25-11-18, 03:26 AM)Rabeea Qbaha كتب : [ -> ]هل يمكنك وضع كود الاضافة هنا لاشرح لك
كود :
Public Sub insert_Sales(ByVal CustomerID As Integer, ByVal Discound As Double, ByVal ItemID As Integer, ByVal ItemPrice As Double, ByVal ItemTotal As Double, ByVal Qyt As Double, ByVal SaleBillNo As Integer, ByVal SaleDate As Date, ByVal UserID As Integer)
Dim cmd As New OleDbCommand("insert into Sales( CustomerID,Discound,ItemID,ItemPrice,ItemTotal,Qyt,SaleBillNo,SaleDate,SaleNo,UserID) values (@CustomerID,@Discound,@ItemID,@ItemPrice,@ItemTotal,@Qyt,@SaleBillNo,@SaleDate,@SaleNo,@UserID)", con)
cmd.Parameters.Add("SaleNo", OleDbType.Integer).Value = Max_SaleNo_From_Sales() + 1
cmd.Parameters.Add("CustomerID", OleDbType.Integer).Value = CustomerID
cmd.Parameters.Add("Discound", OleDbType.Double).Value = Discound
cmd.Parameters.Add("ItemID", OleDbType.Integer).Value = ItemID
cmd.Parameters.Add("ItemPrice", OleDbType.Double).Value = ItemPrice
cmd.Parameters.Add("ItemTotal", OleDbType.Double).Value = ItemTotal
cmd.Parameters.Add("Qyt", OleDbType.Double).Value = Qyt
cmd.Parameters.Add("SaleBillNo", OleDbType.Integer).Value = SaleBillNo
cmd.Parameters.Add("SaleDate", OleDbType.Date).Value = SaleDate
cmd.Parameters.Add("UserID", OleDbType.Integer).Value = UserID
con.Open()
cmd.ExecuteNonQuery()
con.Close()
cmd = Nothing
End Sub25-11-18, 02:26 PM
انت تقوم بتكرير احد هذه الاعمدة SaleNo | CustomerID | ItemID |SaleBillNo | UserID
او انك تقوم بتكرارها في نفس جدول sales وتكون لا تقبل التكرار او انك تربطها بعلاقه 1 الى 1 وتقوم بتكرارها في الجدول الاصلي
تاكد من الاتي
ضع msgbox قبل الاضافه بالقيم SaleNo | CustomerID | ItemID |SaleBillNo | UserID وتاكد من انه لا توجد قيمة مسبقه في الجدول في قاعدة البيانات مسجلة
نصيحة اخرى :
اذا كنت تستخدم جدول واحد فقط لكل هذه القيم قم بتقسيمها على عده جداول ة اربط الجداول في علاقة بالجدول الاساسي
و اذا اردت اضهارها جميعا قم بعمل veiw في قاعدة البيانات هكذا ارتب و لن تقوم بتكرار البيانات
او انك تقوم بتكرارها في نفس جدول sales وتكون لا تقبل التكرار او انك تربطها بعلاقه 1 الى 1 وتقوم بتكرارها في الجدول الاصلي
تاكد من الاتي
ضع msgbox قبل الاضافه بالقيم SaleNo | CustomerID | ItemID |SaleBillNo | UserID وتاكد من انه لا توجد قيمة مسبقه في الجدول في قاعدة البيانات مسجلة
نصيحة اخرى :
اذا كنت تستخدم جدول واحد فقط لكل هذه القيم قم بتقسيمها على عده جداول ة اربط الجداول في علاقة بالجدول الاساسي
و اذا اردت اضهارها جميعا قم بعمل veiw في قاعدة البيانات هكذا ارتب و لن تقوم بتكرار البيانات