以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  调用的目标发生了异常  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55769)
--  作者：土佛
--  发布时间：2014/8/22 17:18:00
--  调用的目标发生了异常

狐爸及各位狐友好，不知为什么出现如下问题，请各位解解难

 

调用的目标发生了异常。
从字符串“[订单SX编码] = \'K8DD106\'”到类型“Long”的转换无效。
输入字符串的格式不正确。

下面的是代码：

Select Case e.DataCol.Name
    Case "实出仓_常品M"
        Dim Filter As String = "[订单SX编码] = \'" & e.DataRow("订单SX编码") & "\'"   And "[DNP编码] = \'" & e.DataRow("DNP编码") & "\'"  
        Dim drs As List(of DataRow) = DataTables("DK订单").Select(Filter) \'获得此产品所有订单
        For Each dr As DataRow In drs
            dr("已交M") = DataTables("出货规划").Compute("Sum(实出仓_常品M)", Filter)
        Next
End Select
--  作者：Bin
--  发布时间：2014/8/22 17:21:00
--  
例子文件发出来,代码看起来不应该出现这个问题.
--  作者：czy
--  发布时间：2014/8/22 20:30:00
--  
Select Case e.DataCol.Name
    Case "实出仓_常品M"
        Dim Filter As String = "[订单SX编码] = \'" & e.DataRow("订单SX编码") & "\' And [DNP编码] = \'" & e.DataRow("DNP编码") & "\'"  
        Dim drs As List(of DataRow) = DataTables("DK订单").Select(Filter) \'获得此产品所有订单
        For Each dr As DataRow In drs
            dr("已交M") = DataTables("出货规划").Compute("Sum(实出仓_常品M)", Filter)
        Next
End Select
--  作者：土佛
--  发布时间：2014/8/23 11:20:00
--  
感谢各位，是我自己把“”用错了，这个方面一直还有些模糊，估计其他狐友也会有