主页 > 知识库 > ASP读取日期单日期自动补零函数代码

ASP读取日期单日期自动补零函数代码

热门标签:外呼线路批发 世界地图标注了哪些城市 武穴地图标注 梧州市地图标注 创意电话机器人 地图标注阳江 java外呼系统是什么 济源电销外呼系统线路 石家庄慧营销外呼系统
复制代码 代码如下:

public function fillzero(l1)
if len(l1)=1 then
fillzero="0"l1
else
fillzero=l1
end if
end function

用法示例:
复制代码 代码如下:

response year(now)month(now)day(now) 结果:201116
response year(now)fillzero(month(now))fillzero(day(now)) 显示结果:20110106

如何控制长日期格式和短日期格式的显示:

Short Date:FORMATDATETIME(DATE,vbShortDate)
Long Date:FORMATDATETIME(DATE,vbLongDate)

当根据英国(美国)区域设置显示日期时,日期显示为如下的格式:

Short Date:7/9/97
Long Date:Wednesday,July 09,1997

注意:短日期格式的显示与不做任何格式化时完全相同。在缺省情况下,日期以短日期格式显示。

如何用FORMATDATETIME()函数操作时间:

Short Time:FORMATDATETIME(TIME,vbShortTime)
Long Time:FORMATDATETIME(TIME,vbLongTime)

当以英国(美国)区域设置显示时间时,时间的格式如下:

Short Time:03:20
Long Time:3:20:08 AM
复制代码 代码如下:

%
function FillZero(str)
ttt=str
if len(str)=1 then
ttt="0" str
end if
FillZero=ttt
end function
'转化日期,将 一位补上零 2003-1-2 --> 2003-01-02
function ConvertDate(tDate)
ttt=tDate
if isdate(tDate) then
ttt=year(tDate) "-" FillZero(month(tDate)) "-" FillZero(day(tDate))
end if
ConvertDate=ttt
end function
'输入一个日期时间串,转换成年四位,其他两位的新的日期时间串
function ConvertDateTime(tDateTime)
ttt=tDateTime
if isdate(tDateTime) then
ttt=year(tDateTime) "-" FillZero(month(tDateTime)) "-" FillZero(day(tDateTime)) " " FillZero(cstr(hour(tDateTime))) ":" FillZero(cstr(minute(tDateTime))) ":" FillZero(cstr(second(tDateTime)))
end if
ConvertDateTime=ttt
end function
%>

标签:南宁 唐山 揭阳 淮北 甘南 迪庆 滁州 来宾

巨人网络通讯声明:本文标题《ASP读取日期单日期自动补零函数代码》,本文关键词  ASP,读取,日期,单日期,单,;如发现本文内容存在版权问题,烦请提供相关信息告之我们,我们将及时沟通与处理。本站内容系统采集于网络,涉及言论、版权与本站无关。
  • 相关文章
  • 下面列出与本文章《ASP读取日期单日期自动补零函数代码》相关的同类信息!
  • 本页收集关于ASP读取日期单日期自动补零函数代码的相关信息资讯供网民参考!
  • 企业400电话

    智能AI客服机器人
    15000

    在线订购

    合计11份范本:公司章程+合伙协议+出资协议+合作协议+股权转让协议+增资扩股协议+股权激励+股东会决议+董事会决议

    推荐文章