تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[ تمّ الحل ] : إيجاد أكبر قيمة بالعمود
#1
السّلام عليكم و رحمة الله و بركاته
إخواني الأكارم لو سمحتم و تكرّمتم بمساعدتي حول إيجاد أكبر قيمة بعمود المجموع و إظهارها تلقائيا بالتاكست رقم 6
ألف شكر و بارك الله فيكم و لكم مقدّمًا
إحتراماتي


الملفات المرفقة
.rar   أكبر قيمة بالعمود.rar (الحجم : 15.83 ك ب / التحميلات : 27)
الرد
تم الشكر بواسطة:
#2
(25-12-16, 02:06 PM)عبد العزيز البسكري كتب :
السّلام عليكم و رحمة الله و بركاته
إخواني الأكارم لو سمحتم و تكرّمتم بمساعدتي حول إيجاد أكبر قيمة بعمود المجموع و إظهارها تلقائيا بالتاكست رقم 6
ألف شكر و بارك الله فيكم و لكم مقدّمًا
إحتراماتي

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

كود :
Sub MaxTotal()

Dim F99 As New ADODB.Recordset

SQL = "SELECT MAX (ÇáãÌãæÚ) AS MTO FROM USERS "

'  SQL = "SELECT MAX(" & FLD1 & ") AS MTO FROM " & TP & "  "


F99.Open SQL, DB, adOpenStatic, adLockOptimistic, adCmdText
 
 If F99.RecordCount < 1 Then
 Text6.Text = "0"
F99.Close
 Exit Sub
Else
Text6.Text = F99![mto]

End If

F99.Close

End Sub
تفضل يالغالي

نصيحة :-  من الافضل جعل حقل المجموع واي حقل رقمي في قاعدة البينات رقمي وليس نصي 

تم التعديل على المثال


الملفات المرفقة
.rar   أكبر قيمة بالعمود معدل.rar (الحجم : 15.25 ك ب / التحميلات : 41)
الرد
#3
السّلام عليكم و رحمة الله و بركاته
بارك الله فيك عزيزي SENDBAD100
جزاك الله خير الجزاء يا طيّب .. تمام مئة بالمئة و لله الحمد و الشّكر
زادك الله علما و نفع بك الاسلام و المسلمين
جعلك الله في الطليعة وسدد خطاك
وأوصلك الى مبتغاك وحماك وحفظك ورعاك
وهدى الله بك وهداك
وجعلك من أحباب حبيبه المصطفى إن شاء الله
حقًّا تستحق كل خير و تستحق أكثر من الشّكر
فقط لديًّ إستفسار لو تكرّمت ..بخصوص ملاحظتك حول جعل الحقول رقمية ..عملت ذلك لكن وجدت أنّه عندما أجعل الحقول رقميّة تصبح غير قابلة للأعداد العشريّة مثلاً عندما أكتب 8.86 تظهر بالحقل 9 .
إحتراماتي
الرد
تم الشكر بواسطة: Ahmed_Mansoor , Ahmed_Mansoor
#4
الله يعطيك العافية  تسلم  على الدعوة


حول الحقل الى رقم  

ثم اذهب الى الحجم وغيره الى مزدوج كما بالصوره

والله الموفق


الملفات المرفقة صورة/صور
   
الرد
#5
السلام عليكم و رحمة الله و بركاته
تشكر يا غالي ..هل المقصود بالمزدوج مثلما يشير السّهم لو سمحت ..
إحتراماتي
الرد
تم الشكر بواسطة: Ahmed_Mansoor
#6
اعتقد نعم

جرب القيم العشرية اذا قبلها تمام
الرد
تم الشكر بواسطة: عبد العزيز البسكري , Ahmed_Mansoor
#7
عزيزي SENDBAD100
معذرة على كثرة التساؤلات لكن لاحظت أنّه عندما يكون حقل المجموع فارغ تماما يظهر خطأ :
Invalid Use Off Null
و الإشارة إلى سطر التاكست رقم 6
Text6.Text = F99![mto]
هل من الممكن تصحيح هذا الخلل لو تكرمت
إحتراماتي أخي الغالي
الرد
تم الشكر بواسطة: Ahmed_Mansoor , Ahmed_Mansoor
#8
هذا واحد من الاسباب الذي جعلني اطلب منك ان يكون الحقل رقم

يجب ان لا يترك فارغاً اجعل قيمته = 0

حول الحقل الى رقمي 

ثم اجعل القيمة الافتراضية  = 0 
انظر الصوره

عليك ايضا ان تعدل المعلومات السابقة يدوياً اي حقل المجموع فارغ اجعله = 0

وما سيتم اضافته بعد عمل القيمة الافتراضية = 0 سيكون صفر تلقائي
والله الموفق


الملفات المرفقة صورة/صور
   
الرد
تم الشكر بواسطة: عبد العزيز البسكري , Ahmed_Mansoor
#9
لاحظ أخي الكريم .. قمت بما تكرّمت بشرحه من جعل الحقل رقمي و القيمة الافتراضية 0 ..

لكن عندما أضيف أي سجل تظهر قيمة المجموع على ورقة الأكسس على شكل نجوم ..

الرد
تم الشكر بواسطة: Ahmed_Mansoor
#10
انظر   المرفقات


الملفات المرفقة
.rar   DOUSSA.rar (الحجم : 10.28 ك ب / التحميلات : 41)
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة كتابة المسار داخل قيمة في الريجيستري الرجل الرمادي 3 94 10-02-19, 08:05 PM
آخر رد: Amir_Alzubidy
  [سؤال] بحث عن شهر وسنة كل قيمة فى text 1 ,text2 بطريقةsql هناء صالح 1 154 20-10-18, 09:31 PM
آخر رد: Amir_Alzubidy
Question [vb6.0] يوجد مشكله في البحث حيث لا يظهر قيمة هذا الخيار عندي البحث الموجود في الصورة ؟؟ Microformt 5 289 20-08-18, 08:47 PM
آخر رد: elgokr
  [سؤال] [تم الحل] مشكلة برنامج حساب نسب الموظفين awidan76 29 2,814 08-08-18, 08:51 PM
آخر رد: awidan76
  [ تمّ الحل ] : إضافة الملفات أثناء تصطيب البرامج التّنفيذيّة عبد العزيز البسكري 13 1,491 18-01-18, 10:22 PM
آخر رد: الوايلي
  [ تمّ الحل ] : تصدير بيانات التاكسات إلى الوورد عبد العزيز البسكري 6 480 02-11-17, 01:50 PM
آخر رد: عبد العزيز البسكري
  [ تمّ الحل ] : إعادة عرض البيانات داخل الفليكس جريد عبد العزيز البسكري 3 449 05-10-17, 04:31 PM
آخر رد: عبد العزيز البسكري
  [ تمّ الحل ] : عدم ظهور التنبيهات فوريا و التعديل الخاطيء عبد العزيز البسكري 6 599 02-10-17, 09:19 PM
آخر رد: عبد العزيز البسكري
  إيجاد ترتيب الطالب فى الفصل الدراسى hsab 11 819 23-09-17, 04:02 PM
آخر رد: hsab
  لديا قيمة في تاكست بوكس اريد تحويلها wolf1120 2 402 14-09-17, 07:20 PM
آخر رد: wolf1120

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


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