日期格式转换

tvro · 发表于 2009-10-2 12:18:15

本帖最后由 tvro 于 2009-10-4 23:03 编辑

$Sdate1 = GUICtrlCreateDate("2009/10/02 11:29:13", 160, 50, 130, 21)
MsgBox(0,"",GUICtrlRead($Sdate1))

这样读到的日期是:2009年9月2日(YYYY年M月D日)

请教各位大老如何用最简单的办法转换为:2009-09-02(YYYY-MM-DD)

bing614 · 发表于 2009-10-2 14:36:34

MsgBox(0,"",StringTrimRight(StringRegExpReplace("2009年9月2日","年|月","-"),1))

tvro · 发表于 2009-10-2 15:01:22

谢谢bing614
这样出来的日期月和日不是两位数字
2009-09-02(YYYY-MM-DD)

sxd · 发表于 2009-10-2 16:09:33

请参考 _Date_Time系列UDF

bing614 · 发表于 2009-10-2 23:13:35

发错。。。。。

netegg · 发表于 2009-10-2 23:21:08

如果只是这一种类型，不换其他的，下面一行就够了
stringreplace(Guictrlread($Sdate1), “/“, “-”)

tvro · 发表于 2009-10-2 23:26:51

谢谢各位大老的帮助,我主要是用在SQLite按日期的期间查询数据,SQLite默认如期格式是"yyyy-MM-dd")

想了半天,干脆来个狠的

$DateFormatKey = "HKEY_CURRENT_USER\Control Panel\International"
RegWrite($DateFormatKey, "sLongDate" , "REG_SZ", "yyyy-MM-dd")
RegWrite($DateFormatKey, "sShortDate" , "REG_SZ", "yyyy-MM-dd")

再次谢谢各位大老的帮助,

afan · 发表于 2009-10-3 00:22:45

$a = StringSplit('2009年9月2日', '年月日')
MsgBox(0, 0, StringFormat('%04s-%02s-%02s', $a[1], $a[2], $a[3]))

dajun · 发表于 2010-5-5 18:52:34

不错，不错，不错。

pizigao · 发表于 2010-9-27 22:42:00

参考一下~~~

417252056 · 发表于 2012-1-10 11:41:27

困扰好几天的东西终于解决了，顶

devineresse · 发表于 2012-4-9 11:16:20

Local $sDate = @YEAR & "-" & @MON & "-" & @MDAY

这样就可以了奥

devineresse · 发表于 2012-4-9 11:16:24

Local $sDate = @YEAR & "-" & @MON & "-" & @MDAY

这样就可以了奥

devineresse · 发表于 2012-4-9 11:16:33

Local $sDate = @YEAR & "-" & @MON & "-" & @MDAY

这样就可以了奥

devineresse · 发表于 2012-4-9 11:16:44

Local $sDate = @YEAR & "-" & @MON & "-" & @MDAY

这样就可以了奥

		自动登录	找回密码
密码			加入