Se Rs.State = 1 allora Rs.Close
Rs.Open “Invo_Dtl.Invo_No prescelto, Invo_Dtl.Invo_Date come _Invo_Date_, Invo_Dtl.Invo_From come _From, Invo_Dtl.Invo_To come _To, Invo_Dtl.Invo_Truck_No come Truck_No, Invo_Dtl.Invo_TP_No come TP_No, Invo_Dtl.Invo_TP_Date come TP_Date, Invo_Dtl.Invo_Amount come Net_Amount, Invo_Dtl.Invo_Load come _Loading, Invo_Dtl.Invo_Insu come assicurazione, Invo_Dtl.Invo_Vat_Cst come VAT_CST, Invo_Dtl.Invo_Total da Invo_Dtl dove >=# di Invo_Dtl.Invo_Date„ & DTPicker1.Value & “# e Invo_Dtl.Invo_Date <> 0 allora
Regolar DataGrid1.DataSource = Rs
|