Si Rs.State = 1 entonces Rs.Close
Rs.Open “Invo_Dtl.Invo_No selecto, Invo_Dtl.Invo_Date como _Invo_Date_, Invo_Dtl.Invo_From como _From, Invo_Dtl.Invo_To como _To, Invo_Dtl.Invo_Truck_No como Truck_No, Invo_Dtl.Invo_TP_No como TP_No, Invo_Dtl.Invo_TP_Date como TP_Date, Invo_Dtl.Invo_Amount como Net_Amount, Invo_Dtl.Invo_Load como _Loading, Invo_Dtl.Invo_Insu como seguro, Invo_Dtl.Invo_Vat_Cst como VAT_CST, Invo_Dtl.Invo_Total de Invo_Dtl donde >=# de Invo_Dtl.Invo_Date” y DTPicker1.Value y “# e Invo_Dtl.Invo_Date <> 0 entonces
Fijar DataGrid1.DataSource = Rs
|