منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : اواجه مشكله تكرار البيانات ف الداتا جريد فيو
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم ورحمة الله وبركاته اخوتي  اواجه مشكله تكرار البيانات ف الداتا جريد فيو فقط وقد اكتشف المشكله وهي اني لا ادخل القيم داخل ال foreign key واريد حل لهذه المشكله لاني قد تعبت كثيرا من حلها مثال لدي صياد جلب ١٠ كيلو سمك  سيتم تدخيل اسم الصياد في جدول واعطائه id خاص والكميات ف جدول اخر ولاكن اريد ان يدخل تفس id بتاع الصياد ف foreign key الي ف جدول الكميات .
ارجو سرعة المساعده وجزاكم الله خيرا
عليك بإضافة بيانات الصياد الجديد في جدول الصيادين بالاستعلام التالي
Insert Into [Hunters](Name,Phone) Values('name','phone')

ثم التحقق من نجاح الإضافة وبعدها تضيف له الكمية في جدول المحصول بالاستعلام التالي
Insert Into [Products](HunterID,Quantity) Values(12,99)
حيث 12 هي رقم الصياد في جدول الصيادين و99 هي الكمية

والكود الكامل (إضافة الصياد والتحقق وإضافة الكمية) يعتمد على نوع قاعدة البيانات ووجود مشروع مرفق مع الموضوع.
المشكله اني لا اعرف رقم ال id تعطيه outobumber
ارجو سرعة المساعده لتسليم البروجكت وجزاكم الله خيرااااااا
سرعة المساعده لتسليم البروجكت تعتمد على وجود مشروع صغير مرفق
هل يوجد حل افضل !؟
هل تريد ترسل المشروع على الخاص؟

أنتظر الرد؟
نعم ارسل لي اميلك الخاص
كنت أقصد الرسائل الخاصة،

ولكن يبدو أنه ليس لدي الوقت الكافي.
صديقي عند اضافة الصياد و انتهاء الاضافة، وفي نفس حدث الاضافة عليك باستدعاء ال id لاخر صياد قمت باضافتة 

وتستطيع فعل ذلك عن طريق هذة ال method :


PHP كود :
Private Function get_cust_ID() As Integer
    Dim cmd 
As OleDbCommand = New OleDbCommand("SELECT TOP 1 [ID] FROM you_table ORDER BY ID DESC"_con.con)
 
   Dim reader As OleDbDataReader cmd.ExecuteReader()
 
   Dim ID As Integer 0
    reader
.Read()

 
   If reader.HasRows Is True Then
        ID 
= (Convert.ToInt32(reader(0)))
 
   End If

 
   reader.Close()
 
   Return ID
End 
Function 
الصفحات : 1 2