25-01-24, 09:22 PM
السلام عليكم ورحمة الله وبركاته
عندي خانة البحث بين تاريخيين وشغاله تمام
ولكن النتيجة في خانة (تاريخ الدخول) لا تظهر مرتبة بالأقدم الى الاحدث
هذا كود تعبئة في load
عندي خانة البحث بين تاريخيين وشغاله تمام
ولكن النتيجة في خانة (تاريخ الدخول) لا تظهر مرتبة بالأقدم الى الاحدث
هذا كود تعبئة في load
كود :
Imports System.Data
Imports System.Data.OleDb
Imports System.IO
Imports JbsaPrintDataGridView
Public Class sdadtgrid
Public connAccess999 As New OleDbConnection("provider=Microsoft.ACE.OLEDB.12.0;" & "data source=" & Application.StartupPath & "\DATA.accdb")
Dim ds As New DataSet
Dim dt As New DataTable
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim da As New OleDbDataAdapter("select id_mr, name_mr , jn_mr , num_mr , jeh_mr , FORMAT(time_mr,'dd/MM/yyyy') AS time_mr , FORMAT(time1_mr,'dd/MM/yyyy') AS time1_mr,sad_mr,sak_mr,name_sa from tan", connAccess999)
da.Fill(dt)
DataGridView1.DataSource = dt
DataGridView1.Refresh()
DataGridView1.Columns(1).HeaderText = "اسم المراجع"
DataGridView1.Columns(0).HeaderText = "رقم الهويه"
DataGridView1.Columns(2).HeaderText = "الجنسية"
DataGridView1.Columns(3).HeaderText = "رقم الجوال"
DataGridView1.Columns(4).HeaderText = "جهة الزياره"
DataGridView1.Columns(5).HeaderText = "تاريخ الدخول"
DataGridView1.Columns(6).HeaderText = "تاريخ الخروج"
DataGridView1.Columns(7).HeaderText = "ساعة الدخول"
DataGridView1.Columns(8).HeaderText = "ساعة الخروج"
DataGridView1.Columns(9).HeaderText = "ملاحظات"
End Sub