تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
البحث بين تاريخين بشرط
#1
السلام عليكم 

اريد التعديل على هذا الكود بحيث يتم البحث بين تاريخين 

كود :
Adodc1.RecordSource = "select * from payes1 order by count desc"
Adodc1.CommandType = adCmdText
Adodc1.Refresh
الرد }}}}
تم الشكر بواسطة: awidan76
#2
كود :
x=(text1.text)
y=(text2.text)
if z>=x and z<=y
then
print ok

val(text.text)
الرد }}}}
تم الشكر بواسطة: awidan76
#3
(22-10-15, 01:48 PM)فاضل الحمود كتب : السلام عليكم 

اريد التعديل على هذا الكود بحيث يتم البحث بين تاريخين 

كود :
Adodc1.RecordSource = "select * from payes1 order by count desc"
Adodc1.CommandType = adCmdText
Adodc1.Refresh

وعليكم السلام ورحمة الله وبركاته
PHP كود :
Adodc1.RecordSource "select * from payes1 where FieldData between #" Text1.text "# and #" text2.text "#  order by count desc"
Adodc1.CommandType adCmdText
Adodc1
.Refresh 
Fieldate = حقل التاريخ
غيره حسب اللي عندك
إن شاء الله يضبط معك
بالتوفيق
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor , Microformt , awidan76
#4
كود :
Private Sub Command1_Click()

z = Len(Text1.Text)
For i = 1 To z
s(i) = Text1.Text
Print s(i)
Next i
For i = 1 To z
Print s(i)
Next i
z1 = Len(Text2.Text)
For i = 1 To z1
a(i) = Text2.Text
Print a(i)
Next i
For i = 1 To z1
Print a(i)
Next i


End Sub

Private Sub Command2_Click()

If s(4) >= a(4) Then
Print "ok"
Else: Print "not ok"
End If

End Sub

Private Sub Text1_Change()

z = Len(Text1.Text)
For i = 1 To z
s(i) = Text1.Text
Next i

End Sub

Private Sub Text2_Change()

z1 = Len(Text2.Text)
For i = 1 To z1
a(i) = Text2.Text
Next i

End Sub
الرد }}}}
تم الشكر بواسطة: awidan76
#5
اخي ابو عمر جزاك الله خير لقد ضبط معي الكود

اخي احمد مشكور على الكود المهم
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor , awidan76


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار عن البحث في عدة حقول واربعه كمبوبكس alfakeehy 8 235 05-02-17, 07:39 PM
آخر رد: alfakeehy
Question [vb6.0] كيف انشي استعلام يظهر عدد نتايج البحث؟؟ Microformt 1 77 29-01-17, 09:33 PM
آخر رد: السيد الغالي
  [سؤال] النسخ واللصق لخليه فى اكسل بشرط تغير تاريخ اليوم norhan 4 135 26-01-17, 01:51 AM
آخر رد: norhan
  [vb6.0] البحث في أكثر من جدول أيمن الفخراني 3 138 22-01-17, 03:03 PM
آخر رد: أيمن الفخراني
Question [vb6.0] اين المشكلة في برنامجي المرفق لا يظهر في البحث سوى سجل واحد؟؟ Microformt 7 196 16-01-17, 10:51 PM
آخر رد: عبدالله الصافي
Question [vb6.0] كيف يتم برمجة خيارت البحث (بدقة) في برنامجي المرفق ؟؟ Microformt 2 191 14-01-17, 05:57 PM
آخر رد: Microformt
  [كود] طلب تعديل على كود البحث بأي حرف في حقلين الطايش 7 240 24-12-16, 01:29 AM
آخر رد: الطايش
  البحث عن صورة kafrnabl 0 110 07-12-16, 10:06 AM
آخر رد: kafrnabl
  [سؤال] اضافة combo لمجموعة البحث وعمل بحث بين تاريخين كنونو 6 335 26-11-16, 09:12 PM
آخر رد: Amir_alzubidy
  البحث المتقدم في قاعدة بيانات اكسس haniblack 4 292 31-10-16, 10:00 PM
آخر رد: moamen said

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


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