تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اريد كود نفس هذا الكود للاكسس
#1
هذا كود استعلام من اوراكل اريد مثالة بأكسس
كود :
dim code as String="3"
Select A.Class_No,Class_Name,Seat_Count From Classes A,(Select Class_No  From Aviatrix_Seats where Type_No= code) B
 where Active=0 and A.Class_No=B.Class_No (+)
Order By A.Class_No
يعمل الاستعلام على جلب البيانات في الجز الأول وهو جدول Classes بشكل مستقل عن الثاني
اما في الجزء الثاني يتم جلب البيانات من جدول  Aviatrix_Seats بشرط رقم النوع  Type_No
لكن في حالة عدم تحقق الشرط Type_No وعدم وجود بيانات للاستعلام الفرعي تظل البيانات موجودة في الاستعلام الاساسي من جدول Classes
مع الملاحظة ما معنا هذه العلامة في اوراكل (+) و هل لها مثيل في اكسس
الرد }}
تم الشكر بواسطة: سعود , سعود
#2
بشكل عام (+) تعني ربط join
ويمكن اختصار هذا الاستعلام هكذا
كود :
Select A.Class_No,Class_Name,Seat_Count
From Classes A,Aviatrix_Seats B
where Active=0 and A.Class_No=B.Class_No (+)
Order By A.Class_No

ضعي قاعدة بيانات الاكسس
وصورة من ناتج استعلام اواكل
لاضع التعديل الصحيح بعد تطابق النتاج
عند تجربته على قاعدة بيانات الاكسس

هذه محاولة بدون تجربه
كود :
Select A.Class_No,Class_Name,Seat_Count
From Classes A Left Join Aviatrix_Seats B On A.Class_No=B.Class_No
where Active=0
Order By A.Class_No
الرد }}
تم الشكر بواسطة: سعود , غدير الصليحي
#3
(28-11-21, 12:08 PM)E100 كتب : بشكل عام (+) تعني ربط join
ويمكن اختصار هذا الاستعلام هكذا
كود :
Select A.Class_No,Class_Name,Seat_Count
From Classes A,Aviatrix_Seats B
where Active=0 and A.Class_No=B.Class_No (+)
Order By A.Class_No

ضعي قاعدة بيانات الاكسس
وصورة من ناتج استعلام اواكل
لاضع التعديل الصحيح بعد تطابق النتاج
عند تجربته على قاعدة بيانات الاكسس

هذه محاولة بدون تجربه
كود :
Select A.Class_No,Class_Name,Seat_Count
From Classes A Left Join Aviatrix_Seats B On A.Class_No=B.Class_No
where Active=0
Order By A.Class_No

[صورة مرفقة: C:\Users\BASSAM\Desktop\بدون عنوان.PNG]

(28-11-21, 12:08 PM)E100 كتب : بشكل عام (+) تعني ربط join
ويمكن اختصار هذا الاستعلام هكذا
كود :
Select A.Class_No,Class_Name,Seat_Count
From Classes A,Aviatrix_Seats B
where Active=0 and A.Class_No=B.Class_No (+)
Order By A.Class_No

ضعي قاعدة بيانات الاكسس
وصورة من ناتج استعلام اواكل
لاضع التعديل الصحيح بعد تطابق النتاج
عند تجربته على قاعدة بيانات الاكسس

هذه محاولة بدون تجربه
كود :
Select A.Class_No,Class_Name,Seat_Count
From Classes A Left Join Aviatrix_Seats B On A.Class_No=B.Class_No
where Active=0
Order By A.Class_No

هذا الصور من الاكسس يعني مو هي نتائج استعلامات  بس بنفس الشكل تضهر في الاوراكل
لانة مو مثبت عندي الاوراكل الان بس عند زميلتي جربتة تضهر نفس كذا

تضهر اسماء الكلاسات و ارقام الكلاسات Class_No و Class_Name
لكن عدد المقاعد في الكلاسات Seat_Count تكون بشرط رقم نوع الكلاس Type_No
اذا مثلا ارسلت قيمة فارغة تضهر لي اسماء الكلاسات و ارقامها لكن تضهر لي عدد المقاعد فارغة
و اذا ادخلت قيمة صحيحة لنوع الكلاسا Type_No تضهر لي نتائج لكل من  Class_No و Class_Name و Seat_Count 
الملف مرفق بالصور 
سؤال اخر خارج الموضوع 
كيف اعمل لص لصور في المنتدء 
جربت ما عرفت من اضافة صورة

هذا المرفق للصور

هذا المرفق

شوف جرب هذ الاستعلام على القاعدة
وانت بتعرف ماذا اريد
كود :
SELECT A.Class_No, A.Class_Name, Aviatrix_Seats.Seat_Count AS Seat_Count

FROM Classes AS A , (Select Class_No,Seat_Count From Aviatrix_Seats  where Type_No='1' )  
WHERE A.Class_No= [Aviatrix_Seats].[Class_No] AND A.[Active]=False
ORDER BY A.Class_No;
 
و عند تعديل القيمة لنوع الكلاس

كود :
SELECT A.Class_No, A.Class_Name, Aviatrix_Seats.Seat_Count AS Seat_Count

FROM Classes AS A , (Select Class_No,Seat_Count From Aviatrix_Seats  where Type_No=' ' )  
WHERE A.Class_No= [Aviatrix_Seats].[Class_No] AND A.[Active]=False
ORDER BY A.Class_No;

هذا هو التعديل او الفرق عند ارسال قيمة فارقة اريدة ان يعرض لي اسماء الكلاسات و ارقامها لكن عدد المقاعد تضهر لي الخلية فارغة فقط
يعني الاستعلام الفرعي فقط الذي يتأثر اما الجزء الاول من الاستعلام لا يتغير و لا يتأثر


الملفات المرفقة
.rar   مع القاعدة.rar (الحجم : 308.13 ك ب / التحميلات : 5)
الرد }}
تم الشكر بواسطة:
#4
لم اجد قاعدة البيانات في الملف المرفق

من خلال الصور لا يتبغي وجود العمود Class_Name في الجدول Aviatrix_Seats لانه موجود في الجدول Classes

عذرا في مشاركتي السابقة نسيت اضافة Type_No=code وهذا هو التعديل

سيعمل هذا التعديل في حال حذف العمود Class_Name من الجدول Aviatrix_Seats والا اضيفي .A قبل اسمه في الاستعلام
كود :
Select A.Class_No,Class_Name,Seat_Count
From Classes A Left Join Aviatrix_Seats B On (A.Class_No=B.Class_No And Type_No= code)
where Active=0
Order By A.Class_No

يبدو انك غيرت المرفقات

عموما

هل تريد النتيجة المطلوبة هكذا
كود :
Class_No    Class_Name    Seat_Count
3            C            30

أم هكذا مع code=3 (وهي النتيجة المتوقعة من استعلام الاوراكل الاول بسبب (+) )
كود :
Class_No    Class_Name    Seat_Count
1            A    
2            B    
3            C            30
4            D

اطلبي من زميلتك تصوير شاشة ننتجة استعلام اوراكل وارفقيها
الرد }}
تم الشكر بواسطة: غدير الصليحي
#5
نعم غيرت المرفقات 
في المرفق الاخير فية القاعدة
الكود  فية احتمالين
الاحتمال الاول
عندما يكون Type_No =1 له قيمة حقيقية في الجداول و تكون الشروط صحيح
كود :
Class_No    Class_Name    Seat_Count
3            C            30
الحالة الثانية
عندما يكون Type_No =" " له قيمة فارعة

كود :
Class_No    Class_Name    Seat_Count
             C            30
يكون بهذا الشكل

اعتقد انه المطلووووووووب اخي E100
جاري التجريب
الرد }}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الكود لا يستدعى الارقام الا الاقل من 10 حماده ممدوح البحيرى 5 161 , 06:53 PM
آخر رد: مين
  [سؤال] لسلام عليكم ورحمه الله وبركاته ازاي افعل خاصيه امكانيه التعديل علي الكود أثناء تشغيل حسن الجلب 1 153 06-08-22, 07:39 PM
آخر رد: asmarsou
Lightbulb [VB.NET] ممكن عمل هذا الكود رمضان محمد 17 753 13-07-22, 10:32 PM
آخر رد: سعود
  مشكلة في تنفبذ الكود mohamedassim 8 383 07-07-22, 12:26 AM
آخر رد: أبو خالد الشكري
  [VB.NET] رجاء اريد كود فيجوال بحث عن ملف في كمبيوتر داخل فورم jam3h 5 897 06-07-22, 12:02 AM
آخر رد: jam3h
  خطأ في تنفيذ الكود mohamedassim 5 279 01-07-22, 08:57 PM
آخر رد: سعود
  [VB.NET] اريد كود يحسب من 1 الى 100 في تاكستبوكس bilgacim 4 359 14-06-22, 07:32 PM
آخر رد: أبو خالد الشكري
  ممكن طريقة لتحويل هذا الكود ابو روضة 9 609 10-06-22, 02:21 AM
آخر رد: ابو روضة
  [VB.NET] محتاج تعديل على الكود هدا AMAZ1972AMAZ 3 421 06-06-22, 06:31 PM
آخر رد: AMAZ1972AMAZ
  اريد فهم الخطأ الحالى فى صلاحيات المستخدمين لدى حماده ممدوح البحيرى 9 644 16-05-22, 12:56 PM
آخر رد: سعود

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


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