Als Rs.State = 1 toen Rs.Close
Rs.Open „selecteren Invo_Dtl.Invo_No, Invo_Dtl.Invo_Date als _Invo_Date_, Invo_Dtl.Invo_From als _From, Invo_Dtl.Invo_To als _To, Invo_Dtl.Invo_Truck_No als Truck_No, Invo_Dtl.Invo_TP_No als TP_No, Invo_Dtl.Invo_TP_Date als TP_Date, Invo_Dtl.Invo_Amount als Net_Amount, Invo_Dtl.Invo_Load zoals _Loading, Invo_Dtl.Invo_Insu als Verzekering, Invo_Dtl.Invo_Vat_Cst als VAT_CST, Invo_Dtl.Invo_Total van Invo_Dtl waar Invo_Dtl.Invo_Date >=#“ & DTPicker1.Value & „# en Invo_Dtl.Invo_Date <> 0 toen
Vastgesteld DataGrid1.DataSource = Rs
|