E语言时间对比问题.

li76450473

比如    要对比的时间 2016-05-17 17:59:40      然后取 现在北京时间   

  如果  要对比的时间 大于 北京时间
   信息框xxxxx
返回

完整的代码怎么写？
怎么获取  怎么对比 全面点

按键精灵

li76450473 发表于 2015-6-10 16:25
要对比的时间 2016-05-17 17:59:40    是这个

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
当前时间戳	文本型
百度时间网页源码	文本型
北京时间	文本型

百度时间网页源码 ＝ 到文本 (HTTP读文件 (“http://open.baidu.com/special/time/”))
当前时间戳 ＝ 文本_取出中间文本 (百度时间网页源码, “window.baidu_time(”, “);”, , )
北京时间 ＝ 时间_时间戳转文本 (当前时间戳)
调试输出 (“北京时间” ＋ 北京时间)
如果真 (取时间间隔 (到时间 ("2016-05-17 17:59:40"), 到时间 (北京时间), #秒 ) ＞ 0)
信息框 (“本机时间>网络时间”, 0, , )
如果真 (取时间间隔 (到时间 ("2016-05-17 17:59:40"), 到时间 (北京时间), #秒 ) ＝ 0)
信息框 (“本机时间=网络时间”, 0, , )
如果真 (取时间间隔 (到时间 ("2016-05-17 17:59:40"), 到时间 (北京时间), #秒 ) ＜ 0)
信息框 (“本机时间<网络时间”, 0, , )

i支持库列表	支持库注释
internet	互联网支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 internet<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 当前时间戳, 文本型<br /> .局部变量 百度时间网页源码, 文本型<br /> .局部变量 北京时间, 文本型<br /> <br /> 百度时间网页源码 ＝ 到文本 (HTTP读文件 (“<a href="http://open.baidu.com/special/time/" rel="nofollow" rel="nofollow" target="_blank">http://open.baidu.com/special/time/</a>”))<br /> 当前时间戳 ＝ 文本_取出中间文本 (百度时间网页源码, “window.baidu_time(”, “);”, , )<br /> 北京时间 ＝ 时间_时间戳转文本 (当前时间戳)<br /> 调试输出 (“北京时间” ＋ 北京时间)<br /> .如果真 (取时间间隔 (到时间("2016-05-17 17:59:40"), 到时间 (北京时间), #秒) ＞ 0)<br />     信息框 (“本机时间>网络时间”, 0, , )<br /> .如果真结束<br /> .如果真 (取时间间隔 (到时间("2016-05-17 17:59:40"), 到时间 (北京时间), #秒) ＝ 0)<br />     信息框 (“本机时间=网络时间”, 0, , )<br /> .如果真结束<br /> .如果真 (取时间间隔 (到时间("2016-05-17 17:59:40"), 到时间 (北京时间), #秒) ＜ 0)<br />     信息框 (“本机时间<网络时间”, 0, , )<br /> .如果真结束

要比对什么时间 把到时间("2016-05-17 17:59:40")换掉就可以了

喵娘

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
cmd	日期时间型

cmd ＝ 到时间 (“2016-05-17 17:59:40”)
如果真 (cmd ≥ 取现行时间 ())
信息框 (“德玛西亚”, 0, )

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 cmd, 日期时间型<br /> <br /> <br /> cmd ＝ 到时间 (“2016-05-17 17:59:40”)<br /> <br /> .如果真 (cmd ≥ 取现行时间 ())<br /> 信息框 (“德玛西亚”, 0, )<br /> .如果真结束

jr21066

.版本 2
.支持库 spec

s1 ＝ 取现行时间 ()
延迟 (1000)
s2 ＝ 取现行时间 ()
调试输出 (取时间间隔 (s1, s2, #秒))
调试输出 (取时间间隔 (s2, s1, #秒))

使用 取时间间隔 命令
只要第一个时间比第二个时间大,就会有返回值的

EExiaolin

  

如果真 (取时间间隔 (到时间 (“2016-05-17 17:59:40”), 取现行时间 (), 7) ＜ 0)
信息框 (“呵呵呵”, 0, , )

.版本 2<br /> <br /> .如果真 (取时间间隔 (到时间 (“2016-05-17 17:59:40”), 取现行时间 (), 7) ＜ 0)<br />     信息框 (“呵呵呵”, 0, , )

li76450473

EExiaolin 发表于 2015-6-10 15:58
[e=1].版本 2

.如果真 (取时间间隔 (到时间 (“2016-05-17 17:59:40”), 取现行时间 (), 7) ＜ 0)

我要的是北京时间 不是系统时间哦

按键精灵

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
当前时间戳	文本型
百度时间网页源码	文本型
北京时间	文本型

百度时间网页源码 ＝ 到文本 (HTTP读文件 (“http://open.baidu.com/special/time/”))
当前时间戳 ＝ 文本_取出中间文本 (百度时间网页源码, “window.baidu_time(”, “);”, , )
北京时间 ＝ 时间_时间戳转文本 (当前时间戳)
调试输出 (“本机时间” ＋ 到文本 (取现行时间 ()))
调试输出 (“北京时间” ＋ 北京时间)
如果真 (取时间间隔 (取现行时间 (), 到时间 (北京时间), #秒 ) ＞ 0)
信息框 (“本机时间>网络时间”, 0, , )
如果真 (取时间间隔 (取现行时间 (), 到时间 (北京时间), #秒 ) ＝ 0)
信息框 (“本机时间=网络时间”, 0, , )
如果真 (取时间间隔 (取现行时间 (), 到时间 (北京时间), #秒 ) ＜ 0)
信息框 (“本机时间<网络时间”, 0, , )

i支持库列表	支持库注释
internet	互联网支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 internet<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 当前时间戳, 文本型<br /> .局部变量 百度时间网页源码, 文本型<br /> .局部变量 北京时间, 文本型<br /> <br /> 百度时间网页源码 ＝ 到文本 (HTTP读文件 (“<a href="http://open.baidu.com/special/time/" rel="nofollow" rel="nofollow" target="_blank">http://open.baidu.com/special/time/</a>”))<br /> 当前时间戳 ＝ 文本_取出中间文本 (百度时间网页源码, “window.baidu_time(”, “);”, , )<br /> 北京时间 ＝ 时间_时间戳转文本 (当前时间戳)<br /> 调试输出 (“本机时间” ＋ 到文本 (取现行时间 ()))<br /> 调试输出 (“北京时间” ＋ 北京时间)<br /> .如果真 (取时间间隔 (取现行时间 (), 到时间 (北京时间), #秒) ＞ 0)<br />     信息框 (“本机时间>网络时间”, 0, , )<br /> .如果真结束<br /> .如果真 (取时间间隔 (取现行时间 (), 到时间 (北京时间), #秒) ＝ 0)<br />     信息框 (“本机时间=网络时间”, 0, , )<br /> .如果真结束<br /> .如果真 (取时间间隔 (取现行时间 (), 到时间 (北京时间), #秒) ＜ 0)<br />     信息框 (“本机时间<网络时间”, 0, , )<br /> .如果真结束

补充内容 (2015-6-10 16:23):
北京时间是通过百度时间网获取的

li76450473

糖糖—贝亚安娜 发表于 2015-6-10 15:54
[e=1].版本 2

.子程序 __启动窗口_创建完毕

我要的是北京时间 不是系统时间哦

li76450473

按键精灵 发表于 2015-6-10 16:21
[e=6].版本 2
.支持库 internet
.支持库 spec

要对比的时间 2016-05-17 17:59:40    是这个

Toro

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

如果真 (是否到期 (到时间 (“2014-05-17 17:59:40”)))
信息框 (“亲，到期了”, 0, , )
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
取网络时间	日期时间型

变量名	类 型	静态	数组	备 注
局_返回数据	文本型
局_起始位置	整数型
局_结束位置	整数型
局_取出字符	文本型
局_字符长度	整数型

局_返回数据 ＝ 到文本 (HTTP读文件 (到文本 ({ 104, 116, 116, 112, 58, 47, 47, 111, 112, 101, 110, 46, 98, 97, 105, 100, 117, 46, 99, 111, 109, 47, 115, 112, 101, 99, 105, 97, 108, 47, 116, 105, 109, 101, 47 })))
局_起始位置 ＝ 寻找文本 (局_返回数据, 到文本 ({ 119, 105, 110, 100, 111, 119, 46, 98, 97, 105, 100, 117, 95, 116, 105, 109, 101, 40 }), , 假) ＋ 取文本长度 (到文本 ({ 119, 105, 110, 100, 111, 119, 46, 98, 97, 105, 100, 117, 95, 116, 105, 109, 101, 40 }))
局_结束位置 ＝ 寻找文本 (局_返回数据, 到文本 ({ 41 }), 局_起始位置, 假)
局_字符长度 ＝ 局_结束位置 － 局_起始位置
局_取出字符 ＝ 取文本中间 (局_返回数据, 局_起始位置, 局_字符长度)
返回 (增减时间 ([1970年1月1日8时], #秒, 到数值 (局_取出字符) ÷ 1000))

子程序名	返回值类型	公开	备 注
是否到期	逻辑型
参数名	类 型	参考	可空	数组	备 注
到期时间	日期时间型

如果 (取时间间隔 (到期时间, 取网络时间 (), #分钟 ) ≤ 0)
返回 (真)
返回 (假)

i支持库列表	支持库注释
INTERNET	(未知支持库)

.版本 2<br /> .支持库 INTERNET<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> .如果真 (是否到期 (到时间 (“2014-05-17 17:59:40”)))<br />     信息框 (“亲，到期了”, 0, , )<br /> .如果真结束<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 取网络时间, 日期时间型, 公开<br /> .局部变量 局_返回数据, 文本型<br /> .局部变量 局_起始位置, 整数型<br /> .局部变量 局_结束位置, 整数型<br /> .局部变量 局_取出字符, 文本型<br /> .局部变量 局_字符长度, 整数型<br /> <br /> 局_返回数据 ＝ 到文本 (HTTP读文件 (到文本 ({ 104, 116, 116, 112, 58, 47, 47, 111, 112, 101, 110, 46, 98, 97, 105, 100, 117, 46, 99, 111, 109, 47, 115, 112, 101, 99, 105, 97, 108, 47, 116, 105, 109, 101, 47 })))<br /> 局_起始位置 ＝ 寻找文本 (局_返回数据, 到文本 ({ 119, 105, 110, 100, 111, 119, 46, 98, 97, 105, 100, 117, 95, 116, 105, 109, 101, 40 }), , 假) ＋ 取文本长度 (到文本 ({ 119, 105, 110, 100, 111, 119, 46, 98, 97, 105, 100, 117, 95, 116, 105, 109, 101, 40 }))<br /> 局_结束位置 ＝ 寻找文本 (局_返回数据, 到文本 ({ 41 }), 局_起始位置, 假)<br /> 局_字符长度 ＝ 局_结束位置 － 局_起始位置<br /> 局_取出字符 ＝ 取文本中间 (局_返回数据, 局_起始位置, 局_字符长度)<br /> 返回 (增减时间 ([1970年1月1日8时], #秒, 到数值 (局_取出字符) ÷ 1000))<br /> <br /> .子程序 是否到期, 逻辑型, 公开<br /> .参数 到期时间, 日期时间型<br /> <br /> .如果 (取时间间隔 (到期时间, 取网络时间 (), #分钟) ≤ 0)<br />     返回 (真)<br /> .否则<br />     返回 (假)

补充内容 (2015-6-10 16:39):
你的问题是对比时间大于 则弹出信息框
.版本 2

.如果真 (是否到期 (到时间 (“2016-05-17 17:59:40”)) ＝ 假)
    信息框 (“亲，到期了”, 0, , )