主题：父表与子表同步加载错误提示

帮看下这段代码有什么问题，参照的是 父表与子表同步加载

 

If DataTables("综管").DataRows.Count = 0 Then '如果订单表没有数据
    DataTables("执行单").LoadFilter = "申请号 Is Null" '不加载订单明细
Else
    Dim ids As String
    For Each dr As DataRow In DataTables("综管").DataRows
        ids = ids & "," & dr("服务执行单据记录表_申请号")
    Next
    ids= ids.Trim(",")
    DataTables("执行单").LoadFilter = "申请号 In (" & ids & ")"
End If
DataTables("执行单").Load()

 

综管表的关联列是 服务执行单据记录表_申请号

执行单表的关联列是 申请号

 

错误提示

.NET Framework 版本：2.0.50727.5466
Foxtable 版本：2012.11.28.1
错误所在事件：
详细错误信息：
System.Data.OleDb.OleDbException: 至少一个参数没有被指定值。
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandTextErrorHandling(OleDbHResult hr)
   在 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)

 

 

 

 

此主题相关图片如下：12.png

 

 

 

要么是列名 申请号 不存在数据库的表。

要么是 申请号 是字符串类型，要改一下代码

For Each dr As DataRow In DataTables("综管").DataRows
    ids = ids & "'" & dr("服务执行单据记录表_申请号") & "',"
Next