28-03-20, 05:11 PM
يوجد مشكله تواجهني عند فتح فورم معين
كود :
Public Sub Load_Sales_by_date_bill(ByVal sale_date As Date, ByVal sale_bill_no As Integer)
dt_sales_by_date_bill.Clear()
Dim cmd As New SqlCommand("Select sale_no,sale_date,sale_bill_no,ITEM_NAME,item_qunitity,item_price,total,customer_id From Sales,Items where sale_date=@sale_date and sale_bill_no=@sale_bill_no and Sales.item_id = Items.ITEM_ID", connSQLServer)
cmd.Parameters.Add("sale_date", SqlDbType.Date).Value = sale_date
cmd.Parameters.Add("sale_bill_no", SqlDbType.Int).Value = sale_bill_no
connSQLServer.Open()
dt_sales_by_date_bill.Load(cmd.ExecuteReader)
connSQLServer.Close()
cmd = Nothing
End Sub