主题：[求助]Substring报错

With DataTables("出库表")
    .LoadFilter = "Substring([下单时间],1,10) In (#" & Date.Today & "#)"
    '.LoadPage = 0 '加载第一页
    .LoadTop = 20 '每页5行
    .Load()
    End With
此主题相关图片如下：搜狗截图130106_1.png

.NET Framework 版本：2.0.50727.1891
Foxtable 版本：2012.11.28.1
错误所在事件：
详细错误信息：
System.Data.OleDb.OleDbException: IErrorInfo.GetDescription 因 E_FAIL(0x80004005) 而失败。
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
   在 System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.OleDb.OleDbCommand.System.Data.IDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.FillInternal(DataSet dataset, DataTable[] datatables, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable[] dataTables, Int32 startRecord, Int32 maxRecords, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable dataTable)
   在 Foxtable.DataTable.Load(Boolean OO000l1l)

 用like吧。

.LoadFilter = "Substring([下单时间],1,10)  like '%" & Date.Today & "%'"

还是不行啊

 

我就是想找在所有日期里找出今天的单子

日期是用date.now生成的

 dim sDate as date = date.Today
 dim eDate as date = sDate.AddDays(1)
 
 ......

 .LoadFilter = "下单时间 >= #" & sDate & "# And 下单时间 < #" & eDate & "#"

好了

谢谢