关于添加数据 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim lsjl As DataRow = DataTables("流量卡绑定商户历史记录表").Find("流量卡号='" & dr("流量卡号") & "' and 解绑日期 is null")
        If lsjl IsNot Nothing Then
            lsjl ("解绑日期") =Date.Today
        Else
           ' lsjl ("解绑日期") =Date.Today
            lsjl = DataTables("流量卡绑定商户历史记录表").addnew
            lsjl ("流量卡ID") =dr("流量卡ID")
            lsjl ("流量卡号") =dr("流量卡号")
            lsjl ("类型") =dr("类型")
            lsjl ("商户ID") =dr("商户ID")
            lsjl ("商户名称") =dr("商户名称")
            lsjl ("客户ID") =dr("客户ID")
            lsjl ("客户姓名") =dr("客户姓名")
                    lsjl ("绑定日期") =Date.Today
                    lsjl ("解绑日期") =Date.Today
        End If
甜老师这样是给“流量卡绑定历史记录表”新增的数据“解绑日期”赋值的，不是新解绑的数据赋值的呀，怎样实现给新解绑的数据赋解绑日期值呢？

[此贴子已经被作者于2017/9/26 14:05:37编辑过]

查不到数据，才会执行你else的代码。

请认认真真去看你历史数据，肯定没有符合条件的行啊。

我解绑的数据流量卡号是123数据库里有数据解绑后新增加数据是124 我想给123赋值解绑日期不是给124赋值解绑日期的如下图最后一张图是ACCESS数据库表甜老师您帮我测试测试吧

图片点击可在新窗口打开查看此主题相关图片如下：990.jpg

此主题相关图片如下：991.jpg

此主题相关图片如下：992.jpg

此主题相关图片如下：999.jpg

此主题相关图片如下：9995.jpg

下载信息 [文件大小：下载次数： ]
点击浏览该文件:商户入库数据同步.rar

[此贴子已经被作者于2017/9/26 15:55:56编辑过]

Dim lsjl As DataRow = DataTables("流量卡绑定商户历史记录表").Find("流量卡号='" & sr("流量卡号") & "' and 解绑日期 is null")

主题：关于添加数据