Foxtable(狐表)用户栏目专家坐堂 → 删除语句不起作用呢?还是有2月份数据


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

主题:删除语句不起作用呢?还是有2月份数据

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


加好友 发短信
等级:七尾狐 帖子:1696 积分:15801 威望:0 精华:0 注册:2017/6/1 23:12:00
删除语句不起作用呢?还是有2月份数据  发帖心情 Post By:2018/2/13 21:15:00 [只看该作者]

        Dim d1 As Date = new Date(val(cb1.text),val(cb2.text),1)
        Dim rkc As DataRow=DataTables("日库存表").find("[编号]='" & dr("编号") & "' And 日期 >= '" & d1 & "' And 日期<'" & d1.AddMonths(1) & "'")       
        If rkc IsNot Nothing
        DataTables("日库存表").DeleteFor("[编号]='" & dr("编号") & "' And 日期 >= '" & d1 & "' And 日期<'" & d1.AddMonths(1) & "'")
         DataTables("日库存表").save       
        End If

 回到顶部