易语言unix时间戳转易语言格式源码

资源介绍：

将时间类型值转到长整型的标准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))
.如果结束
返回 (增减时间 (初始时间, #秒, 时间戳记值))

资源下载：