网站 › 『编程语言区』 › 易语言 北京时间 源码

qq1342072168 发表于 2011-8-1 14:33

易语言 北京时间 源码

强烈鄙视伸手党！！！！！！

吾爱、硬币 发表于 2011-8-2 17:17

回复 Foox 的帖子

不是吧难道给你0.5CB?

Foox 发表于 2011-8-2 12:05

1cb...好贵

jemmy8288 发表于 2011-8-1 21:49

错误的程序也敢拿出来

娿丶怖娃娃 发表于 2011-8-1 16:25

这个把源码放出来、放辅助上！是狠卜错滴~

ax123 发表于 2011-8-2 18:05

能不能用啊

＼ＣＰＵ＼ 发表于 2011-8-2 18:37

本帖最后由 ＼ＣＰＵ＼ 于 2011-8-2 18:39 编辑

.版本 2
.支持库 internet

.子程序 取北京时间, 日期时间型, ,
.局部变量 局_返回数据, 文本型
.局部变量 局_起始位置, 整数型
.局部变量 局_结束位置, 整数型
.局部变量 局_取出字符, 文本型
.局部变量 局_字符长度, 整数型

局_返回数据 ＝ 到文本 (HTTP读文件 (“http://open.baidu.com/special/time/”))
局_起始位置 ＝ 寻找文本 (局_返回数据, “window.baidu_time(”, , 假) ＋ 取文本长度 (“window.baidu_time(”)
局_结束位置 ＝ 寻找文本 (局_返回数据, “)”, 局_起始位置, 假)
局_字符长度 ＝ 局_结束位置 － 局_起始位置
局_取出字符 ＝ 取文本中间 (局_返回数据, 局_起始位置, 局_字符长度)
返回 (增减时间 (, #秒, 到数值 (局_取出字符) ÷ 1000))
楼主你好，不是我摔你饭碗，这源码确实很简单。。不值1CB。。

xj981205 发表于 2011-8-2 20:48

是有点不值得。

Ｋiζs~乄 发表于 2011-8-2 23:46

我好像还有这个的源码不过上面没有52pojie.cn这个广告 哈哈

黑夜 发表于 2011-8-3 01:22

是有点不值得。

查看完整版本: 易语言 北京时间 源码