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

dt.Clear()
Dim cmd As New OleDbCommand("select * from tbl1 WHERE b4 = #" & DateTimePicker1.Value & "#order by ID", con)
con.Open()
dt.Load(cmd.ExecuteReader)
DataGridView1.DataSource = dt
con.Close()
datg()

1437/12/12
الرد }}}
تم الشكر بواسطة:
#4
مادام خزنته على انه نصي لا تستخدم علامة الشباك # في الاستعلام

PHP كود :
Public Class Form1
    Dim str 
As String "provider=microsoft.ace.oledb.12.0;data source=db.accdb"
 
   Dim con As New OleDb.OleDbConnection(str)
 
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Dim dt 
As String t.Value.ToShortDateString
        dt 
dt.ToString
        Dim sql 
As String "select tn,td from tb where td='" dt "'"
 
       Dim ta As New DataTable
        Dim da 
As New OleDb.OleDbDataAdapter(sqlcon)
 
       da.Fill(ta)
 
       d.DataSource ta
    End Sub
End 
Class 

هذا لو تم تخزين تاريخ ميلادي كنص
الرد }}}
تم الشكر بواسطة:
#5
لم تتضح الفكره
الرد }}}
تم الشكر بواسطة:
#6
(27-05-16, 08:55 PM)علي كعبي كتب : لم تتضح الفكره
انت تخزن تاريخ هجري كنص وانا جربته على تاريخ ميلادي كنص .
انت عليك تستخدم دالة موجودة باحدى امثلتك تحول الميلادي الى هجري وتستعلم.
الرد }}}
تم الشكر بواسطة:
#7
حولة الحقل الى تاريخ وخزانت القيم بتاريخ الهجري ولكن عند البحث يظهر هذا الخطاء ولايبحث في جميع التوريخ بل يبحث في تاريخ اليوم فقط


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#8
اخي الكريم لاتحول الحقل ...
شوف جربت دالة وجدتها بالنت

PHP كود :
Imports System.Globalization

Public Class Form1
    Dim str 
As String "provider=microsoft.ace.oledb.12.0;data source=db.accdb"
 
   Dim con As New OleDb.OleDbConnection(str)
 
   Public Function convertToHijri(greg As String) As String
        Dim h 
As New HijriCalendar()
 
       Dim g As New GregorianCalendar(GregorianCalendarTypes.USEnglish)
 
       Dim tempDate As DateTime Convert.ToDateTime(greg)
 
       Dim date3 As New DateTime(tempDate.YeartempDate.MonthtempDate.Dayg)
 
       Dim hijri As String h.GetYear(date3).ToString() + "/" h.GetMonth(date3).ToString() + "/" h.GetDayOfMonth(date3).ToString()
 
       Dim tempDate2 As DateTime Convert.ToDateTime(hijri)
 
       hijri tempDate2.ToString("yyyy/MM/dd")
 
       Return hijri
    End 
Function
 
   Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Dim dt 
As String t.Value.ToShortDateString
        dt 
convertToHijri(dt)
 
       Dim sql As String "select tn,td from tb where td='" dt "'"
 
       Dim ta As New DataTable
        Dim da 
As New OleDb.OleDbDataAdapter(sqlcon)
 
       da.Fill(ta)
 
       d.DataSource ta
    End Sub
End 
Class 


هذه الدالة استخدمها لحفظ الهجري وللاستعلام عنه واجعل العمود من نوع نصي


الملفات المرفقة
.zip   For_3li.zip (الحجم : 88.27 ك ب / التحميلات : 44)
الرد }}}
تم الشكر بواسطة:
#9
يعطي خطاء هنا
t.Value.ToShortDateString


علشان (t)
الرد }}}
تم الشكر بواسطة:
#10
(27-05-16, 09:41 PM)علي كعبي كتب : يعطي خطاء هنا
t.Value.ToShortDateString


علشان (t)

الـ t هذي هي DateTimePicker
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  محتاج طريقة لتنسيق نص الرسالة المرسلة إلى الواتس اب new_programer 2 163 04-03-24, 07:15 AM
آخر رد: new_programer
  [VB.NET] البحث باستخدام CheckedListBox لتكون نتيجة التحديد شرط لجملة الاستعلام ahmedramzyaish 0 116 19-02-24, 03:44 AM
آخر رد: ahmedramzyaish
  طريقة اجراء نسخة احتياطية و استرجاعها ؟ Osama NY 2 461 07-02-24, 08:59 PM
آخر رد: Kamil
  البحث بالهوية annagui 2 315 25-01-24, 01:00 PM
آخر رد: annagui
  ماهي طريقة نقل محتويات checkedlistbox الى داتاقريدفيو صالح عبدالله 3 253 06-01-24, 03:20 PM
آخر رد: Kamil
  [VB.NET] تحويل التاريخ بين أداتين تايم بيكر في نفس الفورم محمد العموري 1 267 29-12-23, 10:44 PM
آخر رد: Kamil
  [VB.NET] ما الخطأ فى هذا الكود - كود البحث المتعدد Ashraf Elafify 7 464 27-12-23, 10:50 PM
آخر رد: Ashraf Elafify
  [كود] البحث Abdellatif 2 208 27-12-23, 03:15 PM
آخر رد: Abdellatif
  [VB.NET] ما هي طريقة استدعاء الازرار في الكيبورد من خلار زر افتراضي haider.mohsin92 1 295 14-12-23, 03:19 PM
آخر رد: Kamil
  طريقة عرض التقرير كريستال ريبورت في جهاز العميل Adel27213 2 347 10-12-23, 04:03 AM
آخر رد: Adel27213

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


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