تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اين المشكلة في هذا الكود لاظهار نتيجة سنة محددة
#1
لقد جربت جملة الاستعلام دون وجود dtpicker1 اي بدون الاستعلام عن السنة واشتغل معايه زي الفل انما عند وضع الاستعلام بالسنة لا يعمل ارجو من لديه الخبرة معرفة اين الخطأ plzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz

Sub DocVication()
    conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\HRDatabase.mdb"
    conn.CursorLocation = adUseClient
    conn.Open
    Dim sql As String
 
    sql = " SELECT SUM(DocRecommand) AS TotalVication, COUNT(DocRecommand) AS CountDoc FROM DocTable WHERE [FileNumber] = '" + FrmP.Text3.Text + "' and YEAR[DocEnter] = #" & Year(DTPicker2.Value) & "#"
 
 
    comm.ActiveConnection = conn
    comm.CommandText = sql
    comm.CommandType = adCmdText
    rst.CursorType = adOpenStatic
    rst.CursorLocation = adUseClient
    rst.LockType = adLockOptimistic
    rst.Open comm
  
          If rst.Fields("TotalVication") <> vbNull Then
            Text7.Text = rst.Fields("TotalVication")
            Text6.Text = rst.Fields("CountDoc")
        Else
            Text7.Text = 0
            Text6.Text = 0
            
    End If
        conn.Close
الرد }}}
تم الشكر بواسطة:
#2
أهلا أخي الكريم ، قم بإزالة علامتي الـ # الموجوده في جملة الإستعلام وجرب .
الرد }}}
تم الشكر بواسطة:
#3
أزلت علامة # ومازال يوجد رسالة الخطأ
syntax error (missing operator) in query expression '[FileNumber] = '334' and YEAR[DocYear] =2015'.
الرد }}}
تم الشكر بواسطة:
#4
يا جماعة الخير
ايه الخطأ في الكود اللي فوق .... ياريت حد يفيدني
الرد }}}
تم الشكر بواسطة:
#5
(23-11-15, 05:52 PM)k_medhat كتب : يا جماعة الخير
ايه الخطأ في الكود اللي فوق .... ياريت حد يفيدني

ارفق المشروع لكي يتم التعديل عليه
الرد }}}
تم الشكر بواسطة:
#6
المفروض اخى واضع علامة الاقواس علشان تفرق بين الكلام يعنى مثلا حط قوس على السنة و التكست بتعها جرب و قولى
قال تعالى : يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ
الرد }}}
تم الشكر بواسطة:
#7

.rar   1.rar (الحجم : 2.95 م ب / التحميلات : 31) تم ارفاق الملف ارجو الاطلاع عليه والتعديل والأهم معرفتي بالتعديل وكمان غيري يعرفه عشان نستفاد مش نعدل وخلاص
الرد }}}
تم الشكر بواسطة:
#8
السلام عليكم

تم التعديل والمشكلة كانت في الاقواس

يعطيك العافية


الملفات المرفقة
.rar   1.rar (الحجم : 24.9 ك ب / التحميلات : 46)
(( يَا أَيَّتُهَا النَّفْسُ الْمُطْمَئِنَّةُ ارْجِعِي إِلَى رَبِّكِ رَاضِيَةً مَرْضِيَّةً فَادْخُلِي فِي عِبَادِي وَادْخُلِي جَنَّتِي ))

الرد }}}
تم الشكر بواسطة: k_medhat
#9
شكرا جزيلا لك ...
وحتى تكون فائدة للجميع الصح هو ان يكون كود البحث عن السنة أو الشهر أو اليوم في حقول التاريخ أن يوضع بقوس بهذا الشكل
Year([fileds])
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اختصار الكود حسب المثال المرفق abde6726 2 282 29-10-23, 11:00 AM
آخر رد: abde6726
  اختصار الكود حسب المثال المرفق abde6726 0 220 28-10-23, 05:01 PM
آخر رد: abde6726
Question [vb6.0] عندي مشكلة في هذا الكود حيث انه لا يقبل الا رقم فقط اريد ان يقبل الارقام والاحرف ؟ Microformt 1 269 25-10-23, 04:10 PM
آخر رد: Amir_Alzubidy
Lightbulb [سؤال] إظهار قيمة خلية محددة عند النقر على صف معين في DataGrid1 أبو خالد الشكري 4 326 13-09-23, 09:52 PM
آخر رد: أبو خالد الشكري
  تعديل على كود استدعاء بيانات محددة من ثلاث جداول مصمم هاوي 11 5,198 14-09-22, 11:49 PM
آخر رد: رضوان الجماعي
  نسخ بيانات محددة من جدول إلى آخر مصمم هاوي 14 3,563 30-08-22, 11:53 PM
آخر رد: 2003amin
  كيف نحل هذه المشكلة مع التايمر؟ Alhootti1 11 1,444 27-06-22, 02:19 AM
آخر رد: Ahmed_Mansoor
Question كيف يمكن تطوير هذا الكود نامل المساعدة ؟؟ Microformt 1 913 22-11-21, 07:51 PM
آخر رد: اسلام الكبابى
Question [vb6.0] هل يمكن تغير نوع خط Label من خلال الكود وكيف ذلك ؟؟ Microformt 2 1,051 10-10-21, 08:58 AM
آخر رد: Microformt
  [سؤال] مساعدة في عمل هذا الكود العبادي 2 11 2,962 09-09-21, 01:29 AM
آخر رد: اسلام الكبابى

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


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