主题：老大 帮我看个SQL语句 取同一客户 同一产品的最后记录

loadfilter 加载同一产品 同一客户  的最后的送货记录  可以根据送货日期.

.NET Framework 版本：2.0.50727.3634

Foxtable 版本：2012.11.29.1

错误所在事件：

详细错误信息：

System.Data.OleDb.OleDbException: 无法完成延迟准备。

未能准备语句。

')' 附近有语法错误。

   在 System.Data.OleDb.OleDbDataReader.ProcessResults(OleDbHResult hr)

   在 System.Data.OleDb.OleDbDataReader.BuildSchemaTableRowset(Object handle)

   在 System.Data.OleDb.OleDbDataReader.GenerateSchemaTable(OleDbDataReader dataReader, Object handle, CommandBehavior behavior)

   在 System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)

   在 System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)

   在 System.Data.OleDb.OleDbCommand.ExecuteDbDataReader(CommandBehavior behavior)

   在 System.Data.Common.DbCommand.ExecuteReader(CommandBehavior behavior)

   在 System.Data.Common.DbCommandBuilder.GetSchemaTable(DbCommand sourceCommand)

   在 System.Data.Common.DbCommandBuilder.BuildCache(Boolean closeConnection, DataRow dataRow, Boolean useColumnsForParameterNames)

   在 System.Data.Common.DbCommandBuilder.GetInsertCommand(DataRow dataRow, Boolean useColumnsForParameterNames)

   在 System.Data.OleDb.OleDbCommandBuilder.GetInsertCommand()

   在 Foxtable.Ol0O0O0010001O.OO0100Ol10l0OO0O(OleDbDataAdapter OOOO1l0)

   在 Foxtable.DataTable.Oll0(String O0110101lOOO, OleDbConnection O01O00Ol1l, Boolean O0Oll00)

   在 Foxtable.DataTable.Fill(String O1l0000O0O00, String Ol10llO0lOlOl0, Boolean Ol101l1)

   在 Foxtable.Table.Fill(String O1llll1001l1, String O1lO0OlOOOO00O, Boolean O100l0O)

Dim strIn As String = ""

Dim cmdText As String = ""

Dim cmd As new SQLCommand

cmd.C

cmd.CommandText = "Select * From {送货明细} a INNER JOIN (Select 产品名称,Max(送货日期) As 送货日期 From {送货明细} Group By 产品名称) b on a.送货日期 = b.送货日期 and a.产品名称 = b.产品名称"

Dim dt As DataTable = cmd.ExecuteReader

For Each dr As DataRow In dt.DataRows

    strIn = strIn & dr("_Identify") & ","

Next

strIn = strIn.TrimEnd(",")

cmdText = "Select * from {送货明细} where _Identify In (" & strIn & ") Order by 客户名称"

Tables("送货单_Table1").Fill(cmdText,"Server",False)