Foxtable(狐表)用户栏目专家坐堂 → DataTables("工位912").Save 不会自动保存


  共有3290人关注过本帖树形打印复制链接

主题:DataTables("工位912").Save 不会自动保存

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


加好友 发短信
等级:七尾狐 帖子:1553 积分:10082 威望:0 精华:0 注册:2014/12/18 16:12:00
DataTables("工位912").Save 不会自动保存  发帖心情 Post By:2020/12/17 10:22:00 [显示全部帖子]

Dim n As String = CurrentTable.DataTable.name
Select n
    Case "工位912"
        If user.name = "组装" OrElse user.name = "开发者" OrElse user.group = "品质" OrElse user.group = "行政" 
            For Each dr As Row In Tables("工位912").Rows
                If dr("JPK") = "NO JPK"
                Else
                    If dr("工位") <> "944"
                        If dr("操作员") = Nothing
                            dr("操作员") = "207"
                            dr("生产日期") = Date.Today
                        End If
                    End If
                End If
            Next 
            DataTables("工位912").Save
        End If
End Select

上述代码执行完之后,好像不会自动保存,也就是说红色那句代码没有起作用,请问为什么?

 回到顶部
帅哥哟,离线,有人找我吗?
edisontsui
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1553 积分:10082 威望:0 精华:0 注册:2014/12/18 16:12:00
  发帖心情 Post By:2020/12/18 15:20:00 [显示全部帖子]

发现是别的原因造成的。

 回到顶部