[سعود]

اخي الكريم لاتحول الحقل ...
شوف جربت دالة وجدتها بالنت

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.Year, tempDate.Month, tempDate.Day, g)
        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 Object, e As EventArgs) Handles 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(sql, con)
        da.Fill(ta)
        d.DataSource = ta
    End Sub
End Class 


---

---

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