如何取指定的时间到时间戳？

℡逍遙ゝ2o⒓

不是取系统当前时间，是随便写个时间 转到到 时间戳！

Siempre

时间_到时间戳（）

℡逍遙ゝ2o⒓

Siempre 发表于 2022-7-24 18:13
时间_到时间戳（）

是这样的吧！ 原来老的精益模块 没有这个

℡逍遙ゝ2o⒓

这个 时间_到时间戳 超过20年 就变负数了

Siempre

℡逍遙ゝ2o⒓ 发表于 2022-7-24 18:25
这个 时间_到时间戳 超过20年 就变负数了

那应该是取时间间隔的问题
你看下源码修改一下 把取时间间隔的单位改成天 再乘以一天的秒数试试

Siempre

℡逍遙ゝ2o⒓ 发表于 2022-7-24 18:25
这个 时间_到时间戳 超过20年 就变负数了

  

子程序名	返回值类型	公开	备 注
时间_到时间戳2	文本型		把指定日期时间转换为10位或13位时间戳,默认生成13位时间戳。13位：1325252169718，10位：1325252169
参数名	类 型	参考	可空	数组	备 注
欲处理的时间	日期时间型				可为空，默认为现行时间。此处参数影响最终结果，如果含毫秒且毫秒不要为0，请留空！
十位时间戳	逻辑型				本参数为真时，将生成10位时间戳返回
是否补满10位	逻辑型				如果参数为真，则保证一定取出至少10位，如果不足10位，在前面补0。如果为假，则直接取出。

变量名	类 型	静态	数组	备 注
SystemTime	精易_时间
vTime	日期时间型
szTimeStamp	文本型
szMilliseconds	文本型

GetLocalTime (SystemTime)
如果 (是否为空 (欲处理的时间))
SystemTimeToVariantTime (SystemTime, vTime)
vTime ＝ 欲处理的时间
szTimeStamp ＝ 到文本 (取时间间隔 (vTime, 到时间 (“1970-01-01 08:00:00”), #日 ) × 86400)
如果真 (是否补满10位)
szTimeStamp ＝ 文本_自动补零 (szTimeStamp, 10)
如果真 (十位时间戳)
返回 (取文本左边 (szTimeStamp, 10))
如果 (是否为空 (欲处理的时间))
szMilliseconds ＝ 文本_自动补零 (到文本 (SystemTime.毫), 3)
szMilliseconds ＝ “000”
返回 (szTimeStamp ＋ szMilliseconds)

.版本 2<br /> <br /> .子程序 时间_到时间戳2, 文本型, 公开, 把指定日期时间转换为10位或13位时间戳,默认生成13位时间戳。13位：1325252169718，10位：1325252169<br /> .参数 欲处理的时间, 日期时间型, 可空, 可为空，默认为现行时间。此处参数影响最终结果，如果含毫秒且毫秒不要为0，请留空！<br /> .参数 十位时间戳, 逻辑型, 可空, 本参数为真时，将生成10位时间戳返回<br /> .参数 是否补满10位, 逻辑型, 可空, 如果参数为真，则保证一定取出至少10位，如果不足10位，在前面补0。如果为假，则直接取出。<br /> .局部变量 SystemTime, 精易_时间<br /> .局部变量 vTime, 日期时间型<br /> .局部变量 szTimeStamp, 文本型<br /> .局部变量 szMilliseconds, 文本型<br /> <br /> GetLocalTime (SystemTime)<br /> .如果 (是否为空 (欲处理的时间))<br />     SystemTimeToVariantTime (SystemTime, vTime)<br /> .否则<br />     vTime ＝ 欲处理的时间<br /> .如果结束<br /> szTimeStamp ＝ 到文本 (取时间间隔 (vTime, 到时间 (“1970-01-01 08:00:00”), #日) × 86400)<br /> <br /> .如果真 (是否补满10位)<br />     szTimeStamp ＝ 文本_自动补零 (szTimeStamp, 10)<br /> .如果真结束<br /> .如果真 (十位时间戳)<br />     返回 (取文本左边 (szTimeStamp, 10))<br /> .如果真结束<br /> .如果 (是否为空 (欲处理的时间))<br />     szMilliseconds ＝ 文本_自动补零 (到文本 (SystemTime.毫), 3)<br /> .否则<br />     szMilliseconds ＝ “000”<br /> .如果结束<br /> 返回 (szTimeStamp ＋ szMilliseconds)

企鹅号525150138

时间_到时间戳 2038-01-20 开始无法返回正确时间戳
https://bbs.125.la/forum.php?mod=viewthread&tid=14549896
(出处: 精易论坛)

大司命

https://zhidao.baidu.com/question/201401287733787405.html