Foxtable(狐表)用户栏目专家坐堂 → [求助]


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

主题:[求助]

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


加好友 发短信
等级:幼狐 帖子:194 积分:1168 威望:0 精华:0 注册:2015/6/8 21:38:00
  发帖心情 Post By:2015/11/19 9:18:00 [显示全部帖子]

Select Case e.DataCol.Name

    Case "序号"

        Dim dr As DataRow = e.DataRow

        Dim pr As DataRow = DataTables("内部合同").Find("序号 = '" & dr("序号") & "'")

        If pr IsNot Nothing Then

            dr("合同编号") = pr("合同编号")

            dr("品种_杆径") = pr("品种_杆径")

            dr("品种_材质") = pr("品种_材质")

            dr("品种_长度") = pr("品种_长度")

            dr("品种_级别") = pr("品种_级别")

            dr("品种_接箍") = pr("品种_接箍")

            dr("品种_特殊要求") = pr("品种_特殊要求")

            dr("品种_ID") = pr("品种_ID")

            dr("贸易性质_内贸") = pr("贸易性质_内贸")

            dr("贸易性质_外贸") = pr("贸易性质_外贸")

            dr("交付数量_根")= pr("数量_根")

            dr("合同交付日期")= pr("交付日期")

        End If

End Select


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


加好友 发短信
等级:幼狐 帖子:194 积分:1168 威望:0 精华:0 注册:2015/6/8 21:38:00
  发帖心情 Post By:2015/11/19 9:23:00 [显示全部帖子]

Dim pr As DataRow = DataTables("内部合同").Find("序号 = '" & dr("序号") & "'")
一定要判断pr是否为空。


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


加好友 发短信
等级:幼狐 帖子:194 积分:1168 威望:0 精华:0 注册:2015/6/8 21:38:00
  发帖心情 Post By:2015/11/19 9:56:00 [显示全部帖子]

1、重新增加行,弹出什么错误提示?
2、未将对象引用设置到对象的实例”,以2楼代码为例,
     1)如果没有If pr IsNot Nothing Then,当pr为空时,后面你又引用了此pr,则会出错
    2)dr("交付数量_根")= pr("数量_根")中,如果DataTables("内部合同")中,没有"数量_根"列或DataTables(拉动排产计划_浸漆)中没有"交付数量_根"列,也会出错
    3)没有加载DataTables("内部合同"),找不到DataTables("内部合同")

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


加好友 发短信
等级:幼狐 帖子:194 积分:1168 威望:0 精华:0 注册:2015/6/8 21:38:00
  发帖心情 Post By:2015/11/19 10:42:00 [显示全部帖子]

那不要用DataTables("内部合同"),引用你窗口表的DataTable

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


加好友 发短信
等级:幼狐 帖子:194 积分:1168 威望:0 精华:0 注册:2015/6/8 21:38:00
  发帖心情 Post By:2015/11/19 10:56:00 [显示全部帖子]

Validating事件:

Tables("绑定的表").Current("绑定的日期列") = e.Sender.Text


 回到顶部
帅哥哟,离线,有人找我吗?
狐表开发
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:194 积分:1168 威望:0 精华:0 注册:2015/6/8 21:38:00
  发帖心情 Post By:2015/11/19 11:08:00 [显示全部帖子]

1、是否用代码添加的问题列
2、数据库里是否有此问题列

 回到顶部