Foxtable(狐表)用户栏目专家坐堂 → 关于天数自动更新的问题


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

主题:关于天数自动更新的问题

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


加好友 发短信
等级:三尾狐 帖子:693 积分:5206 威望:0 精华:0 注册:2011/3/15 12:34:00
  发帖心情 Post By:2013/8/7 14:46:00 [只看该作者]


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

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/7 14:52:00 [只看该作者]

做一下判断IF dr.isnull("入职天数")=false then 再执行就好了

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


加好友 发短信
等级:三尾狐 帖子:693 积分:5206 威望:0 精华:0 注册:2011/3/15 12:34:00
  发帖心情 Post By:2013/8/7 15:24:00 [只看该作者]

For Each dr As DataRow In DataTables("职工基本信息").datarows

IF dr.isnull("入职天数")=false then

  Dim tp As TimeSpan = Date.today - CDate(dr("入职时间"))
  dr("入职天数") = Math.Round(tp.TotalDays )
Next

 

 

 

没有通过,请帮忙修改,先谢了!


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/7 15:24:00 [只看该作者]

上例子吧.  怎么个没通过法?

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


加好友 发短信
等级:三尾狐 帖子:693 积分:5206 威望:0 精华:0 注册:2011/3/15 12:34:00
  发帖心情 Post By:2013/8/7 17:05:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


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


加好友 发短信
等级:三尾狐 帖子:693 积分:5206 威望:0 精华:0 注册:2011/3/15 12:34:00
  发帖心情 Post By:2013/8/7 17:06:00 [只看该作者]

请大师们指教!

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/8/7 17:09:00 [只看该作者]

你问题就没有描述对,当然没有办法得到正确的答案

你应该判断的是入职时间.

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb



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


加好友 发短信
等级:三尾狐 帖子:693 积分:5206 威望:0 精华:0 注册:2011/3/15 12:34:00
  发帖心情 Post By:2013/8/7 17:22:00 [只看该作者]

谢谢Bin老师!

 回到顶部
总数 18 上一页 1 2