اريد التعديل على هذا الكود للبحث بين تاريخين بالهجري في حقل datas

من طرف keyaqar4 الأحد مايو 15, 2016 11:07 am

[ltr]Text14.Text = x[/ltr]
[ltr]Dim db As DAO.Database[/ltr]
[ltr]Dim Rs1 As DAO.Recordset[/ltr]
[ltr]Set db = DBEngine.OpenDatabase(App.Path & "\data.mdb", False, False)[/ltr]
[ltr]Calendar = vbCalHijri[/ltr]
[ltr]Set Rs1 = Cn.OpenRecordset("Select * From tablqs where datas ", 2)[/ltr]
[ltr]If Rs1.EOF Then[/ltr]
[ltr]MsgBox "لايوجد ما تبحث عنه"[/ltr]
[ltr]Rs1.Close[/ltr]
[ltr]Exit Sub[/ltr]

[ltr]Else[/ltr]

من طرف السنى الأحد مايو 15, 2016 4:40 pm

يمكنك الاطلاع على هذا المقال

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

من طرف keyaqar4 الثلاثاء مايو 17, 2016 1:51 am

لقد وجدنا الحل بشكل جذري وها هو للفائده ونشكر السنى على مشاركته الطيبه لنا جزاه الله خيرا وبارك فيه

Calendar = vbCalHijri
Dim d1, d2 As String
d1 = Format(Text3.Text, "yyyy/MM/dd")
d2 = Format(Text4.Text, "yyyy/MM/dd")

Set Rs1 = Cn.OpenRecordset("select * from gbddprint where q7 Between '" + d1 + "' AND '" + d2 + "' ", 2)

نرجو غلق الموضوع

من طرف **أحمد مناع** الثلاثاء مايو 17, 2016 8:20 am

شكرا جزيلا الاخ الكريم وجزاكم الله خيرا

1	#الحديثة
2	#الدورات
3	#موقع_لي_نور_الإلكتروني
4	#java
5	#datagridview
6	#عقارات
7	#استثمار
8	#الامارات
9	#الشارقة
10	#سكن

اريد التعديل على هذا الكود للبحث بين تاريخين بالهجري في حقل datas

اريد التعديل على هذا الكود للبحث بين تاريخين بالهجري في حقل datas

رد: اريد التعديل على هذا الكود للبحث بين تاريخين بالهجري في حقل datas

رد: اريد التعديل على هذا الكود للبحث بين تاريخين بالهجري في حقل datas

رد: اريد التعديل على هذا الكود للبحث بين تاريخين بالهجري في حقل datas

مواضيع ذات صلة