Foxtable(狐表)用户栏目专家坐堂 → 增加行时报错!


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

主题:增加行时报错!

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


加好友 发短信
等级:幼狐 帖子:69 积分:789 威望:0 精华:0 注册:2017/7/1 18:52:00
增加行时报错!  发帖心情 Post By:2020/9/29 18:39:00 [只看该作者]

今天莫名的出现新增行时报错的情况! 找了很久都没找出原因,还请帮助!

报错信息如下:
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2020.5.29.8
错误所在事件:
详细错误信息:
'=' 附近有语法错误。

代码如下:

        Case "明细新增"
            Dim tb1 As Table = Tables("tblckydcgrkmx")

            If e.Form.Controls("khbh").value IsNot Nothing Then
                tb1.AllowEdit = True
                tb1.AllowAddNew = True
                tb1.AddNew
                tb1.Select(tb1.RowSel,tb1.Cols("djlb").Index)
            Else
                Messagebox.show("需先确定客户名称","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
            End If

tb1表的 增加行前事件 BeforeAddDataRow

If e.DataTable.DataRows.Count > 0 Then '如果不是一个空表
    Dim dr As DataRow = e.DataTable.DataRows(e.DataTable.DataRows.Count - 1) '获得最后一行

    If dr.IsNULL("djlb") OrElse  dr.IsNULL("xmbh2")  Then
      MessageBox.show("请补全定单信息")
      e.Cancel = True
    End If
End If


增加一行时执行DataRowAdding

If Forms("frmcg04cgrkedit").Opened  Then

    E.DataRow("gkph") = newnumber("管控批号")

    E.DataRow("yddh") = newnumber("异动编号")

    e.DataRow("djbh") = Forms("frmcg04cgrkedit").Controls("djbh").value

    e.DataRow("djrq1") = Date.Today

    e.DataRow("wldw1") = Forms("frmcg04cgrkedit").Controls("khbh").value

    e.DataRow("dwmc1") = Forms("frmcg04cgrkedit").Controls("DropBoxwlkh").value

    E.DataRow("sysbz") = "手动新增"

End If


用MessageBox.Show 测式 报错应该在 BeforeAddDataRow 事件后,DataRowAdding事件前 (全局表中无相应代码),请教问题错误可能在那里。



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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/29 20:08:00 [只看该作者]

newnumber是什么东西?

其它地方看不出有什么问题

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


加好友 发短信
等级:幼狐 帖子:69 积分:789 威望:0 精华:0 注册:2017/7/1 18:52:00
  发帖心情 Post By:2020/9/30 7:59:00 [只看该作者]

你好,我用用MessageBox.Show测式 报错应该在 BeforeAddDataRow事件后,DataRowAdding事件前发生的,报错时DataRowAdding还没有执行。

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


加好友 发短信
等级:幼狐 帖子:69 积分:789 威望:0 精华:0 注册:2017/7/1 18:52:00
  发帖心情 Post By:2020/9/30 8:19:00 [只看该作者]

我还测试过,这两个事件代码全去掉,报错还是发生。不知新增行过程中还触发了什么事件?

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/30 8:37:00 [只看该作者]

这个表还有其它事件吗?有没有表达式列?有没有设置列属性?列属性里有没有用到条件表达式?
[此贴子已经被作者于2020/9/30 8:37:28编辑过]

 回到顶部