Foxtable(狐表) → 用户栏目 → 专家坐堂 → 自动添加


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

主题：自动添加
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/8 16:50:00 [显示全部帖子]

“手动工时”表DataColChanged事件

If e.DataCol.Name = "作业者" Then 
    If e.NewValue IsNot Nothing Then 
        Dim dr As DataRow

        Dim yuedu As String = Format(Date.Today,"yyyy年MM月")
        dr = DataTables("绩效工时统计").Find("[作业者] = '" & e.NewValue & "' and 月度 = '" & yuedu & "'")
        If dr Is Nothing Then 
            dr = DataTables("绩效工时统计").AddNew()
            dr("作业者") = e.DataRow("作业者")
 dr("月度") = yuedu
        End If
       
    End If
End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/9 8:44:00 [显示全部帖子]

 Format( e.DataRow("作业日期"),"yyyy年MM月") 

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/9 9:58:00 [显示全部帖子]

DataRowDeleting事件，find到对应的行，然后删除
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/9 14:17:00 [显示全部帖子]

就是8楼的用法

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


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/9 15:27:00 [显示全部帖子]

Dim yuedu2 As String = Format( e.DataRow("作业开始时间"),"yyyy年MM月")
Dim pr2 As DataRow = DataTables("绩效工时统计").Find("作业者 = '" & e.DataRow("作业者") &"' And 年月 = '" & yuedu2 & "'")
If pr2 IsNot  Nothing Then '如果有对应的订单
     pr2.Delete '删除
End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/9 16:10:00 [显示全部帖子]

重新上传有问题的项目看看

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/9 17:19:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:绩效工时.rar
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/12/12 10:05:00 [显示全部帖子]

已有的数据，重置一下列或者手工自己改改

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06250 秒, 6 次数据查询