منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم اسئلة vb6.0 المتعلقة بقواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=72)
+--- الموضوع : كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ (/showthread.php?tid=9238)

كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - softmail8 - 11-06-13

لساده الكرام

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



كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق بحث عند عدم موجود التاريخ يظهر الى المستخدم رساله ان التاريخ غير موجود ؟؟



نامل من الله ثم منكم المساعدة العاجله والله يحفظكم ويرعاكم


ملفات مرفقة

كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - @@أبورائد@@ - 11-06-13


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




إن شاء الله سهلت لك المهمة (للأسف لا يعمل لدي VB6 بسبب ويندوز 7)


PHP كود :
Dim sql As String
    sql = " SELECT [Account_Number], [Operation], Format([date],'yyyy / mm / dd') AS [yb1], [Statement], [Deposit], [Clouds]" & _
          "   FROM [sam2]                       " & _
          "  WHERE [Account_Number] = 3         " & _
          "    AND [Date] Between #3/1/1434#    " & _
          "                   And #3/1/1434#    "


    Set rs = db.OpenRecordset(sql, 2) 





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

كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - softmail8 - 11-06-13

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

ملاحظه هامه

والله يحفظكم ويرعاكم

كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - @@أبورائد@@ - 11-06-13


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





تستطيع عمل الشرط كالتالي....

PHP كود :
If rs.RecordCount = 0 Then
        MsgBox "لا توجد بيانات."
        Exit Sub
    End If 





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

كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - softmail8 - 11-06-13

استاذي العزيز : ابو رائد
السلام عليكم ورحمة وبركاته
انا اريد ان يظهر رساله لمستخدم في حالة عدم وجود التاريخ في الاستعلام فقط ؟؟
هذا الكود لم ينجح
If rs.RecordCount = 0 Then
MsgBox "لا توجد بيانات."
Exit Sub
End If
والله يحفظكم ويرعاكم

كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - softmail8 - 11-06-13

هذ الكود نجح في مع الجدول فقط
إقتباس :If rs.RecordCount = 0 Then
MsgBox "áÇ ÊæÌÏ ÈíÇäÇÊ."

End If


كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - @@أبورائد@@ - 11-06-13


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





الاستعلام السابق كان مبني على الاستعلام الموجود في قاعدة البيانات

لكن بناء على طلبك بالبحث عن تاريخ واحد(وليس بين تاريخين) جرب التالي

PHP كود :
Dim sql As String 
    sql = " SELECT [Account_Number], [Operation], Format([date],'yyyy / mm / dd') AS [yb1], [Statement], [Deposit], [Clouds]" & _ 
          "   FROM [sam2]                 " & _ 
          "  WHERE [Date] = #3/1/1434#    " 


    Set rs = db.OpenRecordset(sql)  

    If rs.RecordCount = 0 Then
        MsgBox "لا توجد بيانات."
        Exit Sub
    End If 





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

كيف ابحث عن تاريخ معين موجود في الاستعلام المجود بقاعدة البيانات الخاصه برنامجي المرفق؟؟ - softmail8 - 11-06-13

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