|
[e]
.版本 2
.子程序 转换为GMT格式, 文本型, 公开, 将日期时间型数据转换为GMT格式
.参数 待转换时间, 日期时间型
.局部变量 整数容器, 整数型
.局部变量 GMT时间, 文本型
整数容器 = 取星期几 (待转换时间)
GMT时间 = 取文本中间 (“SunMonTueWenThuFriSat”, (整数容器 - 1) × 3 + 1, 3) + “, ”
GMT时间 = GMT时间 + 到文本 (取日 (待转换时间)) + “-”
整数容器 = 取月份 (待转换时间)
GMT时间 = GMT时间 + 取文本中间 (“JanFebMarAprMayJunJulAugSepOctNovDec”, (整数容器 - 1) × 3 + 1, 3) + “-”
GMT时间 = GMT时间 + 到文本 (取年份 (待转换时间)) + “ ”
GMT时间 = GMT时间 + 到文本 (取小时 (待转换时间)) + “:” + 到文本 (取分钟 (待转换时间)) + “:” + 到文本 (取秒 (待转换时间)) + “ GMT”
返回 (GMT时间)
[/e]
简化下代码,顺便把错误的"Mar" 换成 "May"..
|
|