联合查询

2014-01-26 02:19:00 239 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

【MySQL实战】联合查询详解：从基础到进阶，掌握多表联合查询技巧联合查询是指在一个SQL语句中，联合多个表的数据，返回满足条件的结果。阅读详情

数据库用的是ACCESS，查询语句在ACCESS中正常，但在VB.NET中提示“其他信息: ORDER BY 子句语法错误。”
代码如下：

    Private Sub FillCustomersAccounts()

        strCustomersAccountsSQL = "Select Customer, EarningDate as AccountDate, Description as Desc, Amount as DR, 0 as CR From " &

            "tblCustomersEarns Where EarningDate Between #2014-1-1# And #2014-1-31# " &

            "UNION ALL Select Customer, OrderDate as AccountDate, Remark as Desc, 0 as DR, Account as CR From " &

            "S:\Order.accdb.tblOrder Where OrderDate Between #2014-1-1# And #2014-1-31#"

        conCustomer.Open()

        Dim CustomersAccountsDataAdapt As New OleDb.OleDbDataAdapter(strCustomersAccountsSQL, conCustomer)

        Dim CustomersAccountsDataset As New DataSet

        CustomersAccountsDataAdapt.Fill(CustomersAccountsDataset, "CustomersAccounts")

        dgvCustomerAccount.DataSource = CustomersAccountsDataset

        dgvCustomerAccount.DataMember = "CustomersAccounts"

        conCustomer.Close()

    End Sub

求大神正解。

...全文