做一个聪明的勤劳人，悠悠的。。。 温馨提醒：少喝奶茶；不吃刚烤的面包；远离充电电源；白天多喝水晚上少喝； 一天不喝多于两杯咖啡，少吃油多的食物；最佳睡眠为晚上十点至早上六点； 晚上五点后少吃大餐’ 每天喝酒不多过一杯； 不用冷水服胶囊； 睡前半小时服药忌立刻躺下； 睡眠不足八小时人会变笨； 有午睡的习惯人不易老； 手机电池剩一格时不要打电话，剩一格时辐射是平时的一千倍， 还要记得用左耳接电话，用右耳会直接伤害到大脑。

qtp中的日期格式【转】

上一篇 / 下一篇  2008-03-26 23:05:51 / 个人分类：QTP

查看( 452 ) / 评论( 0 ) / 评分( 0 / 0 )

前几天的时候,用QTP别一个AX日期控件对象的时候

不知道是对象的关系还是QTP的关系不可以用SET方法瓷柚弥?只可以用SETdate来设置,

而且格式只有d-M-yyyy,如"7-Mar-2007"

而日期只有2007-3-7 yyyy-m-d,

先是有FormatDateTime,cdate(vbs没format)来转换,我用的是简体中文系统,所以无果

看来只好自己做,如果自己做的话就要拼字符串,日-短英月-长年,日和年可以用day和year取出来

月的话就要写select来做吗?,我发现短英月就是英文月份的前3个字符,这样的话,我就只要取出一个英文月份名就可以了,如何取出英文月份名呢,我想了,日期格式是和区域设置有关,幸好vbs中有GetLocale和SetLocale,我就方便了,这样我先设置美国英文"en-gb",得到"07 March 2007"(dd MM yyyy),看来月份是有了,不过这个在中间,不太方便我就是试了试别的英语国家,终于在加拿大"en-ca"中有了"March 07, 2007" 这样我就只要取左3个字符了.

 

Function MyCdate(oDate)

currentLocale = GetLocale

original = SetLocale("en-ca")

 

mon=left(cstr(FormatDateTime(oDate,1)),3)

original = SetLocale(currentLocale)

MyCdate=cstr(day(odate))+"-"+mon+"-"+cstr(year(odate))

 

End Function

 

摘自：http://www.114study.com/d0710190929060806


收藏 举报

TAG: QTP

 

评分：0

我来说两句

Open Toolbar