01.Dim Sql_x As String
02.Sql_x = ""
03.
04.Sql_x = "SELECT tbl_promotion.id_po_list,"
05.
06.Sql_x = Sql_x & ",'#',Last_day+'/'+last_month +'/' + last_year +'#' AS <span style="background-color:red;">LastDate </span>"
07.
08.Sql_x = Sql_x & "FROM tbl_promotion
09.
10.Sql_x = Sql_x & "WHERE <span style="background-color:red;">LastDate </span>> '#" & Today.Day.ToString & "/" & Today.Month.ToString & "/" & Today.Year.ToString & "#' ;"
11.
12.Dim DAX As New SqlDataAdapter
13.Dim DCX As New SqlCommand
14.Dim DSX As New DataSet
15.DCX.Connection = Open_connec_Sarver()
16.DCX.CommandText = Sql_x
17.DAX.SelectCommand = DCX
18.DAX.Fill(DSX, "DRX") <<================ Error ตรงนี้ครับ มันบอกหา LastDate ไม่เจอ
