25-10-19, 06:31 PM
الصفحات : 1 2
25-10-19, 07:08 PM
السلام عليكم
هل هذا هو المطلوب
تضيفة للكود التالي
هل هذا هو المطلوب
PHP كود :
Me.Text22.Text = rs3.RecordCount
تضيفة للكود التالي
PHP كود :
Private Sub Command16_Click()
Dim rs3 As Recordset
Set rs3 = db.OpenRecordset("SELECT Sum(Crdnum)AS SumCrdnum From tbl1 Where Crdnum=" & Val(Text22))
Me.Text22.Text = rs3.RecordCount
rs3.Close
Set rs3 = Nothing
End Sub
25-10-19, 07:15 PM
الله عليك استاذي الفاضل sendbad100 نعم هذا هو المطلوب تماما
جزاك الله خيرا وبارك الله فيك وجعل الله جل وعلا اعمالك في ميزان حسناتك يارب يارب
استاذي الفاضل هناك خطا في الكود لان عند تطبيق الكود على قوائم عدد ثلاثة يعطيني فقط رقم 1 والمفروض يعطيني عدد القوائم 3
وهذا البرنامج في المرفقات بعد وضع الكود فيه
جزاك الله خيرا وبارك الله فيك وجعل الله جل وعلا اعمالك في ميزان حسناتك يارب يارب
استاذي الفاضل هناك خطا في الكود لان عند تطبيق الكود على قوائم عدد ثلاثة يعطيني فقط رقم 1 والمفروض يعطيني عدد القوائم 3
وهذا البرنامج في المرفقات بعد وضع الكود فيه
25-10-19, 08:56 PM
اساتذتي الافاضل
بالنسبة الى عدد القوائم هو اظهار اعلى رقم موجود في الحقل وفي برنامجي هذا اعلى رقم هو 3 في حقل رقم الهوية
اذن كيف الطريقة الى ذلك وما هو الكود او الدالة التي تظهر اعلى رقم موجود في حقل رقم الهوية الذي اعتبرته عدد القوائم
بالنسبة الى عدد القوائم هو اظهار اعلى رقم موجود في الحقل وفي برنامجي هذا اعلى رقم هو 3 في حقل رقم الهوية
اذن كيف الطريقة الى ذلك وما هو الكود او الدالة التي تظهر اعلى رقم موجود في حقل رقم الهوية الذي اعتبرته عدد القوائم
25-10-19, 09:08 PM
السلام عليكم
PHP كود :
Max (اسم الحقل)
PHP كود :
Max ( رقم_الهوية)
PHP كود :
SELECT Max([Crdnum]) AS عدد_القوائم FROM tbl1
25-10-19, 10:12 PM
استاذي الفاضل جزاك الله خيرا لم تنجح معي كل المحاولات كل الاكواد كتبتها ولم تنجح الطريقة
عندي في قاعدة بيانات في حقل Crdnum الذي اسمه رقم الهوية 3 قوائم كيف اعرض اعلى رقم في مربع النص التابع الى زر امر عدد القوائم
وهذا الكود الاخير الذي كتبته لي ادخلته في زر الامر ولم تنجح الطريقة يظهر رقم 1 والمفروض ان يظهر رقم 3 لانه اعلى رقم مع وافر التحايا
عندي في قاعدة بيانات في حقل Crdnum الذي اسمه رقم الهوية 3 قوائم كيف اعرض اعلى رقم في مربع النص التابع الى زر امر عدد القوائم
وهذا الكود الاخير الذي كتبته لي ادخلته في زر الامر ولم تنجح الطريقة يظهر رقم 1 والمفروض ان يظهر رقم 3 لانه اعلى رقم مع وافر التحايا
25-10-19, 11:00 PM
SELECT Count(Crdnum)AS CountCrdnum From tbl1
25-10-19, 11:25 PM
استاذي الفاضل والله تعبتك معي كثيرا لكن لم تفلح كل المحاولات
اذا امكن التعديل على المرفق الذي ارفقته سابقا احتمال لم اعرف كيف او اين اضع الكود وشكرا لك مرة ثانية لجهودك ومساعدتك لي مع وافر التحايا
اذا امكن التعديل على المرفق الذي ارفقته سابقا احتمال لم اعرف كيف او اين اضع الكود وشكرا لك مرة ثانية لجهودك ومساعدتك لي مع وافر التحايا
26-10-19, 12:37 AM
اساتذتي الافاضل هل يوجد حل او التعديل على البرنامج المرفق
26-10-19, 12:44 AM
PHP كود :
Private Sub Command16_Click()
Dim rs3 As Recordset
Set rs3 = db.OpenRecordset("SELECT Count(Crdnum)AS CountCrdnum From tbl1 ") ''Where Crdnum="" & Val(Text22.Text))
Me.Text22.Text = rs3!CountCrdnum
rs3.Close
Set rs3 = Nothing
End Sub
هذا الكود مبدئيا الا اذا كان هناك معيار معين للبحث .
مثل :
PHP كود :
Private Sub Command16_Click()
Dim rs3 As Recordset
Set rs3 = db.OpenRecordset("SELECT Count(Crdnum)AS CountCrdnum From tbl1 Where Crdnum=" & Val(Text20.Text))
Me.Text22.Text = rs3!CountCrdnum
rs3.Close
Set rs3 = Nothing
End Sub
الصفحات : 1 2