List<string> orders = new List<string>();

            foreach (DataGridViewRow dr in ordersTable.Rows)
            {
                orders.Add(dr.Cells["szPOSOrderNumber"].Value.ToString());

WHERE (((" & RsHdr.ioqh_nbr & ")=726148));

Private Sub txtTicketNo_AfterUpdate()
On Error GoTo ERR_txtTicketNo_AfterUpdate

Dim Answer, strSQL, strConn As String
Dim TicketNo As Long
Dim Conn1 As New ADODB.Connection
Dim RsHdr, RsCust, RsCustAddr, RsHdrAddr, RsLookup As ADODB.Recordset

strConn = "ODBC;Dsn='';" & _
          "Driver={INFORMIX

DoCmd.RunSQL strSQL

        strSQL = "INSERT INTO Logsheet_Table ( Ticket_No, Date_Entered,

SELECT IIf(Weekday([ClockInDate])=2,"Monday",IIf(Weekday([ClockInDate])=3,"Tuesday",IIf(Weekday([ClockInDate])=4,"Wednesday",IIf(Weekday([ClockInDate])=5,"Thursday",IIf(Weekday([ClockInDate])=6,"Friday",IIf(Weekday([ClockInDate])=7,"Saturday","Sunday"))))))

strSQL = "SELECT TOP 1 EmployeeNo

SELECT   [EmployeeNo]
       , DateDiff('d',[Enter Start Date],[Enter End Date]) \ 7 AS [WeekNo]
       , DateAdd('ww',[WeekNo],[Enter Start