新手求助：如何转换日期格式？

maplee

我验证一个WebEdit的内容，内容默认是当前日期，不过格式是：20130601 这样的，
一开始用CheckProperty(value, date)这样去校验，结果date返回的是2013-6-1 这样的格式，结果不通过。
我又用left、right函数，想从date中将字符获取出来，不过由于格式是2013-6-1，所以只能获取201361这样的。。。
没招了，来组织求助~

黑羽祭

建议用3楼的方法~

maplee

好方法都被楼上用了，我来个笨笨的方法:
y=year(date)
m=month(date)
if m
跑跑跑跑 发表于 2013-6-6 09:01

原来还可以这么写啊，真是条条大路通罗马，我怎么一条也没想出来呢

maplee

DateNow=Year(Date)&Right("0"&Month(Date),2)&Right("0"&Day(Date),2)

CheckProperty(value, DateNow)
feiyunkai 发表于 2013-6-5 10:58

    这个方法好，简单易懂，感谢感谢

maplee

回复  maplee


    后面的date返回的内容形式，和你电脑的设置还有些关系的。
或者你这样写：
黑羽祭 发表于 2013-6-5 09:37

    谢谢，虽然我看了好久，不过总算看懂了

跑跑跑跑

好方法都被楼上用了，我来个笨笨的方法:
y=year(date)
m=month(date)
if m<10 then
m=0&m
End if
d=day(date)
if d<10 then
d=0&d
End if
datenow=y&m&d

赵佳乐SMILE

楼上 都很厉害 学习了 想破脑袋也没想出来。。

黑羽祭

回复 3# feiyunkai


    哎哟~不错，挺巧妙啊

feiyunkai

DateNow=Year(Date)&Right("0"&Month(Date),2)&Right("0"&Day(Date),2)

CheckProperty(value, DateNow)

黑羽祭

回复 1# maplee


    后面的date返回的内容形式，和你电脑的设置还有些关系的。
或者你这样写：

1. CheckDate = year(date) &  string(2-len(month(date)),"0") & month(date) & string(2-len(day(date)),"0") & day(date)
   
2. CheckProperty(Cstr(value), CheckDate )

复制代码