有错误  修复中  不知道哪错了  头都想大了

yppy988 发表于 2019-4-8 22:48
[e]
.版本 2
.支持库 spec

谢谢~                                    

dw980972696 发表于 2019-4-8 21:55
什么问题，楼主解决了吗 我也想这块的解决方案

[e]
.版本 2
.支持库 spec
.支持库 internet

.子程序 __启动窗口_创建完毕
.局部变量 开机时间, 文本型
.局部变量 运行时长, 文本型

开机时间 (开机时间, 运行时长)
调试输出 (开机时间, 运行时长)

.子程序 开机时间
.参数 开机时间, 文本型, 可空
.参数 运行时长, 文本型, 可空
.局部变量 秒数, 整数型
.局部变量 分钟, 整数型
.局部变量 小时, 整数型
.局部变量 天, 整数型
.局部变量 时间, 日期时间型

秒数 ＝ 取启动时间 () ＼ 1000
时间 ＝ 现在时间 ()
开机时间 ＝ 时间到文本 (增减时间 (时间, 8, －秒数), 1)
天 ＝ 秒数 ＼ 86400
秒数 ＝ 秒数 － 86400 × 天
小时 ＝ 秒数 ＼ 3600
秒数 ＝ 秒数 － 3600 × 小时
分钟 ＝ 秒数 ＼ 60
秒数 ＝ 秒数 － 60 × 分钟
运行时长 ＝ 到文本 (天) ＋ “天” ＋ 到文本 (小时) ＋ “小时” ＋ 到文本 (分钟) ＋ “分钟” ＋ 到文本 (秒数) ＋ “秒”

.子程序 现在时间, 日期时间型
.局部变量 时间, 文本型
.局部变量 L1, 整数型
.局部变量 L2, 整数型

时间 ＝ 到文本 (HTTP读文件 (“http://quan.suning.com/getSysTime.do”))
.如果真 (时间 ＝ “”)
    返回 (取现行时间 ())
.如果真结束
L1 ＝ 寻找文本 (时间, #引号 ＋ “:” ＋ #引号, , 假) ＋ 3
L2 ＝ 寻找文本 (时间, #引号, L1, 假)
返回 (到时间 (取文本中间 (时间, L1, L2 － L1)))

[/e]

什么问题，楼主解决了吗 我也想这块的解决方案

梵蒂冈梵蒂冈地方广泛广泛大概豆腐干反对

贼帅~                             

感觉这个问题是基础问题，即 数据的溢出问题。  整数型的数值范围是多少？？？ 说实话，我也记不得，只能翻书，难为情了。

学习学习，参考下

66666666666666666666666666666666

谢谢分享，围观一下。

调试输出 (增减时间 (取现行时间 (), #秒, －取启动时间 () ÷ 1000))