起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 571|回复: 12

【结】取得服务器的年月**

[复制链接]
发表于 2008-3-14 11:20:24 | 显示全部楼层 |阅读模式
1.我想取得本年的1月到12月的月份(2008.01、2008.02....) ,把这些月份填到数据集里

2.我想取得本年每一天的日期(2008.01.01----2008.12.31),把这些日期填到数据集里

请问这些怎么样可以实现
回复

使用道具 举报

发表于 2008-3-14 11:38:03 | 显示全部楼层
1.我想取得本年的1月到12月的月份(2008.01、2008.02....) ,把这些月份填到数据集里
取本年,参考 http://bbs.justep.com/forum.php?mod=viewthread&tid=461  2楼
然后自己加上月就可以了。
取年系统还提供参数,在 业务模型\系统空间\系统参数组\日期时间参数组\服务器年

2.我想取得本年每一天的日期(2008.01.01----2008.12.31),把这些日期填到数据集里
用本年的第一个和明年的第一天,然后根据天数来循环,每次都加+就可以了。
也有参数  业务模型\系统空间\系统参数组\日期时间参数组\服务器本年第一天 和
          业务模型\系统空间\系统参数组\日期时间参数组\服务器明年第一天
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-3-14 15:49:29 | 显示全部楼层
1 yearof截取的年不正确!我截取出来的是1905-06-30

2 如果我的"月份"字段要显示的数据是"2008.01",字段可以设为日期类型吗?
回复 支持 反对

使用道具 举报

发表于 2008-3-14 15:55:04 | 显示全部楼层
1、你的服务器时间看了吗?是多少?如果是对的,请把代码帖出来看看

2、不行
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-3-14 16:02:50 | 显示全部楼层
1 DataSetBroker2.DataSet.FieldByName['RQ'].AsDateTime := DateUtils.YearOf(Business.Data.SysSrv.SysService.Time);
          Dialogs.ShowMessage(SysUtils.DateToStr(DateUtils.YearOf(Business.Data.SysSrv.SysService.Time)));
服务器时间没错,已确认是2008-03-14

2  不能用日期类型了吗?那只能用字符串来表示了?
回复 支持 反对

使用道具 举报

发表于 2008-3-14 16:06:08 | 显示全部楼层
2  不能用日期类型了吗?那只能用字符串来表示了?


1 DataSetBroker2.DataSet.FieldByName['RQ'].AsDateTime := DateUtils.YearOf(Business.Data.SysSrv.SysService.Time);
          Dialogs.ShowMessage(SysUtils.DateToStr(DateUtils.YearOf(Business.Data.SysSrv.SysService.Time)));
服务器时间没错,已确认是2008-03-14
Business.Data.SysSrv.SysService.Time 这个取出来的是啥,你看的是数据库服务器还是应用服务器的日期?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-3-14 16:16:53 | 显示全部楼层
1  我要的是数据库服务器的时间,不是用这个来取吗?Business.Data.SysSrv.SysService.Time
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-3-14 16:19:56 | 显示全部楼层
二楼中的2不是很明白
能否详细的解释一下
回复 支持 反对

使用道具 举报

发表于 2008-3-14 16:40:35 | 显示全部楼层
一个一个说吧,第一个问题ok了吗?

Business.Data.SysSrv.SysService.Time  取的是应用服务器的时间,不是数据库的时间
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-3-14 16:49:56 | 显示全部楼层
那取数据库时间是怎么取?

我用SysUtils.FormatDateTime('yyyy',Business.Data.SysSrv.SysService.Time)
可以把2008取出来
用 DateUtils.YearOf(Business.Data.SysSrv.SysService.Time)取出来是错的

第一个问题OK了
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-8 22:59 , Processed in 0.041373 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表