wgij007 发表于 2022-2-4 21:06:00

求教一个格式的转换

这个是网络的时间，Fri, 04 Feb 2022 13:02:08 GMT，能抽取到这种格式吗，20220204 ，其他不要。感谢

和尚777 发表于 2022-2-4 21:06:01

(setq e(read(strcat "(" "Fri, 04 Feb 2022 13:02:08 GMT" """)")))
(if(wcmatch "FEB" (vl-prin1-to-string(caddr e)))(setq a "02"))
(if(= 1(length(list(cadr e))))
        (setq b (strcat "0"(vl-prin1-to-string(cadr e))))
        (setq b (vl-prin1-to-string(cadr e)))
)
(strcat(vl-prin1-to-string(cadddr e))a b)

yxp 发表于 2022-2-4 23:28:18

可以，用 DWX 调用 Windows API

wgij007 发表于 2022-2-6 17:13:43

和尚777 发表于 2022-2-5 14:45
(setq e(read(strcat "(" "Fri, 04 Feb 2022 13:02:08 GMT" """)")))
(if(wcmatch "FEB" (vl-prin1-to-str ...

有办法，一年里的月份都可以转换吗

aihuyujian 发表于 2022-2-6 18:41:31

(cond
((wcmatch "JAN" (vl-prin1-to-string (caddr e))) (setq a "01"))
((wcmatch "FEB" (vl-prin1-to-string (caddr e))) (setq a "02"))
...
)
把十二个月份补齐就行

wgij007 发表于 2022-2-14 20:36:30

aihuyujian 发表于 2022-2-6 18:41
(cond
((wcmatch "JAN" (vl-prin1-to-string (caddr e))) (setq a "01"))
((wcmatch "FEB" (vl-prin1-to- ...

非常感谢多谢。

流氓兔 发表于 2022-2-14 21:43:10

yxp 发表于 2022-2-4 23:28
可以，用 DWX 调用 Windows API

YXP老大，来个案例

yxp 发表于 2022-2-15 21:50:58

流氓兔 发表于 2022-2-14 21:43
YXP老大，来个案例

http://bbs.mjtd.com/thread-184770-1-1.html

来了。
页: [1]
查看完整版本: 求教一个格式的转换