- 注册时间
- 2011-8-8
- 最后登录
- 1970-1-1
该用户从未签到
|
易语言如何判断系统时间
使用“如果”“取现行时间”“信息框”语句
转换为unix时间戳 就能通过大小比对判断了
.版本 2
.子程序 Unix时间戳记正转, 长整数型, 公开, 将时间类型值转到长整型的标准UNIX使用的格林威治时间戳记
.参数 时间值, 日期时间型, , 要转换的时间值
.参数 是否为秒, 逻辑型, 可空, 设置返回的时间戳记值单位 真:秒 假:毫秒 默认为真
.参数 是否为北京时间, 逻辑型, 可空, 默认为真
.局部变量 初始时间, 日期时间型
.如果真 (是否为空 (是否为北京时间))
是否为北京时间 = 真
.如果真结束
.如果 (是否为北京时间)
初始时间 = 到时间 (“1970-01-01 08:00:00”)
.否则
初始时间 = 到时间 (“1970-01-01 00:00:00”)
.如果结束
.如果真 (是否为空 (是否为秒))
是否为秒 = 真
.如果真结束
.如果 (是否为秒)
返回 (取时间间隔 (时间值, 初始时间, #秒))
.否则
返回 (取时间间隔 (时间值, 初始时间, #秒) × 1000)
.如果结束
返回 (取时间间隔 (时间值, 初始时间, #秒))
.子程序 Unix时间戳记反转, 日期时间型, 公开, 将标准UNIX使用的格林威治时间戳记转到易系统时间日期格式
.参数 时间戳记值, 长整数型, , 要转换的时间戳记值
.参数 是否为秒, 逻辑型, 可空, 时间戳记值单位 真:秒 假:毫秒 默认为真
.参数 是否为北京时间, 逻辑型, 可空, 默认为真,
.局部变量 初始时间, 日期时间型
.如果真 (是否为空 (是否为北京时间))
是否为北京时间 = 真
.如果真结束
.如果 (是否为北京时间)
初始时间 = 到时间 (“1970-01-01 08:00:00”)
.否则
初始时间 = 到时间 (“1970-01-01 00:00:00”)
.如果结束
.如果真 (是否为空 (是否为秒))
是否为秒 = 真
.如果真结束
.如果 (是否为秒)
返回 (增减时间 (初始时间, #秒, 时间戳记值))
.否则
返回 (增减时间 (初始时间, #秒, 时间戳记值 ÷ 1000))
.如果结束
返回 (增减时间 (初始时间, #秒, 时间戳记值)) |
|