我在 VB6 中编写了以下代码,以从访问中获取所需的数据并生成报告:
Dim st As String
st = "{sales_order_details.order_no}>=" & Text1.Text & " and {sales_order_details.order_no}<=" & Text2.Text & " and {sales_order_details.client_no}='" & Trim(Label2.Caption) & "'"
CR1.SelectionFormula = st
CR1.ReportFileName = frm_open.crname & "\" & "bill.rpt"
CR1.ReportSource = crptReport
CR1.Action = 2
rpt 文件的名称是 bill.rpt,在这里我可以使用 过滤数据order_no
,例如显示订单号 4 到 10 的账单。
但这里的问题是只生成了 4 号订单。相反,它应该从 4 到 10 的订单生成 7 张账单。
生成子句是:
"{sales_order_details.order_no}>=4 and
{sales_order_details.order_no}<=10 and
{sales_order_details.client_no}='535'"