请帮助我解决此问题,它现在向我显示任何错误消息。
ds.Clear()
Dim oi As String = "SELECT product_id, orderitem_category, product_price, order_quantity, OrderItems.total_price FROM OrderItems WHERE salesorder_id=" & checkInvoiceReceiptSalesOrderNo.Text
Dim oiCmd As SqlCommand
oiCmd = New SqlCommand(oi, conn)
Dim oiAdapter As SqlDataAdapter
oiAdapter = New SqlDataAdapter(oiCmd)
oiAdapter.Fill(ds, "InvoiceReceipt")
rpt.SetDataSource(ds.Tables("InvoiceReceipt"))