الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مساعدة في استخراج الرقم الأقل

مغلقمُجاب
بدأه ahmad_as10 في 23 نوفمبر 2013 · 15 رد · 757 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته 

 

في الملف المرفق يوجد نموذج يحوي : خانة رقم بمفتاح اساسي واسفله ثلاثة اسعار مع اسم البائع ، الذي اريده استعلام يستخرج اقل سعر مع اسم البائع على كافة السجلات ؟ 

 

ولكم مني جزيل الشكر  .

help.zip

#2

هل هذا هو المطلوب؟

 

help.zip

#3
أبو لميس كتب:

هل هذا هو المطلوب؟

شكرا لك عزيزي ، المطلوب استخراج الرقم الاقل من كل سجل ، مثلا البائع خالد يجب ان يظهر مرتين في الاستعلام لانه يحمل السعر الاقل في كل سجل ، اتمنى وضحت الصوره 

#4

السلام عليكم

اعتقد اخي هذا ما تطلب

وتقبل فائق الاحترام والتقدير

help.zip

#5

اخي / جرب المرفق

help.rar

#6
s s m كتب:

السلام عليكم

اعتقد اخي هذا ما تطلب

وتقبل فائق الاحترام والتقدير

عليكم السلام اخي : الذي اريده كل رقم من الخانه (no) يظهر منه عند الاستعلام فقط بائع واحد وهو الاقل سعراً ، ولك شكري 

#7
أبو شادي كتب:

اخي / جرب المرفق

عليكم السلام اخي : الذي اريده كل رقم من الخانه (no) يظهر منه عند الاستعلام فقط بائع واحد وهو الاقل سعراً ، ولك شكري 

#8

تفضل اخي :)

 

نعمل الاستعلام هكذا:

post-273849-0-79493700-1385238151_thumb.

 

ونتيجته هكذا:

post-273849-0-93881000-1385238167.jpg

 

والعملية تكمن هنا:

 Public Function Lowest_Cost(icost, icost2, icost3)
 
    c = icost
    If icost2 < c Then
        c = icost2
    End If
    
    If icost3 < c Then
        c = icost3
    End If
    
    Lowest_Cost = c
    
 End Function
 
 Public Function Lowest_Name(icost, iseller, icost2, iseller2, icost3, iseller3)
 
    c = icost
    n = iseller
    If icost2 < c Then
        c = icost2
        n = iseller2
    End If
    
    If icost3 < c Then
        c = icost3
        n = iseller3
    End If
    
    Lowest_Name = n
    
 End Function

جعفر

103.help.mdb.zip

#9
jjafferr كتب:

تفضل اخي :)

 

نعمل الاستعلام هكذا:

attachicon.gif103.Clipboard01.jpg

 

ونتيجته هكذا:

attachicon.gif103.Clipboard02.jpg

 

والعملية تكمن هنا:

 Public Function Lowest_Cost(icost, icost2, icost3)
 
    c = icost
    If icost2 < c Then
        c = icost2
    End If
    
    If icost3 < c Then
        c = icost3
    End If
    
    Lowest_Cost = c
    
 End Function
 
 Public Function Lowest_Name(icost, iseller, icost2, iseller2, icost3, iseller3)
 
    c = icost
    n = iseller
    If icost2 < c Then
        c = icost2
        n = iseller2
    End If
    
    If icost3 < c Then
        c = icost3
        n = iseller3
    End If
    
    Lowest_Name = n
    
 End Function

جعفر

رزقك الله الجنه وجعل التوفيق دوماً ملازماً لك ، شكرا هذا هو المطلوب 

#10

هلا والله ، حياك الله :)

 

جعفر

#11 أفضل إجابة

حل اخر بدون كود حتى يكون لديك خيارات اكثر

 

استخدم هذا الاستعلام

SELECT s1.[no], IIf([cost]<[cost2],IIf([cost3]<[cost],[seller3],[seller]),IIf([cost3]<[cost2],[seller3],[seller2])) AS Lseller, IIf([cost]<[cost2],IIf([cost3]<[cost],[cost3],[cost]),IIf([cost3]<[cost2],[cost3],[cost2])) AS Lcost
FROM s1;

مدونتى:-

احترف الأكسس مع أبو يوسف

متغيب حاليا لانشغالى الشديد

#12
Abo_Yossof كتب:

حل اخر بدون كود حتى يكون لديك خيارات اكثر

استخدم هذا الاستعلام

SELECT s1.[no], IIf([cost]<[cost2],IIf([cost3]<[cost],[seller3],[seller]),IIf([cost3]<[cost2],[seller3],[seller2])) AS Lseller, IIf([cost]<[cost2],IIf([cost3]<[cost],[cost3],[cost]),IIf([cost3]<[cost2],[cost3],[cost2])) AS Lcost
FROM s1;

الله يوفقك يارب

#13

معلمنا / ابو يوسف         حياك الله       نبي نظمئن علي صحتك اولا لعلك تكون بخير

 

الاخوة الافاضل : هل يمكن ان اعرف كيف نستخدم استعلام الاستاد / ابو يوسف المكتوب اعلاه  وفي اي مكان نضعه .          بصراحة لم اعرف استعمله

 

من يعرف يفيدنا بالاجابة

#14

تفضل اخي ابوشادي ، هذه الخطوات :)

 

اعمل استعلام فاضي ، ثم اضغط بالفارة اليمين واختار:

post-273849-0-04342200-1385318257_thumb.

 

 

في النافذة الجديدة ،

1. الصق كود ابويوسف ،

2. شغل الاستعلام

post-273849-0-81924600-1385318273_thumb.

 

 

وهذه النتيجة :

post-273849-0-06744200-1385318290.jpg

 

جعفر

1
#15

الاخ الفاضل / جعفر

 

والله يااخ جعفر من مدة وانا ملاحظ نشاطك وتقديم المساعدات للجميع

ربنا يصلح حالك ويجزاك على ما تقدمه

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

لك كل التحية والتقدير

 

نسيت ان اقول لكي من +1

تم تعديل هذه المشاركة بواسطة أبو شادي في 24 نوفمبر 2013 في 22:02

#16

حياك الله طويل العمر :)

 

انا وين في المساعدة ، واللي سبقوني وين ، وبالذات اختنا الفاضلة الدكتورة أم عهود الله يحفظها ان شاء الله ، فهي القدوة ، وماني ملحّق على أفضالها :)

واللي مخلني اواصل ، الطيبين امثالك ، وكلامكم اللي زي العسل   :tbblush:

 

جعفر

هذا الموضوع مغلق.

مواضيع مشابهة