Foxtable(狐表)用户栏目专家坐堂 → 这是为什么呢?引用数据时 数据存在但不能引用


  共有11660人关注过本帖平板打印复制链接

主题:这是为什么呢?引用数据时 数据存在但不能引用

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/5/4 22:33:00 [只看该作者]

请先把代码改成这样,避免运行的时候出错:

 

Dim dr As DataRow
Dim dm As DataTable = DataTables("订单主明细")
Dim dl As String = "[部件图号] = '" & e.DataRow("部件图号") & "'"
If e.DataCol.Name = "部件图号" Then
    dr = dm.Find(dl & "And [装配进度] <> '已出库'"& "And [计划客户] Is Null")
    If dr IsNot Nothing Then
        e.DataRow("唯一码") = dr("唯一码")
    End If
    dm.ReplaceFor("计划客户", 2, "[唯一码] = '" & e.DataRow("唯一码") & "'" )
End If

 

至于没有引用到数据,一般是本来就不存在符合条件的行,如果你觉得有符合条件的行,但是没有引用到,请具体指出是哪一行。


 回到顶部