ASP中时间格式转换
ASP中now()函數(shù)可以獲取系統(tǒng)當(dāng)前時(shí)間,這個(gè)時(shí)間的格式形如"2008-5-19 10:55:26".可是,有時(shí)我們更習(xí)慣使用"2008年5月19日10時(shí)55分26秒"這樣的時(shí)間格式.那么,我們應(yīng)該如何才能得到這樣的要求呢?
思路一:使用replace()替換函數(shù),具體代碼如下:
<%
function chgtime(str)
if str <> "" then
str = replace(str,"-","年",1,1)'將第一個(gè)"-"轉(zhuǎn)換成"年"
str = replace(str,"-","月",1,1)'將第二個(gè)"-"轉(zhuǎn)換成"月"
str = replace(str," ","日")'將空格" "轉(zhuǎn)換成"日"
str = replace(str,":","時(shí)",1,1)'將冒號(hào)":"轉(zhuǎn)換成"時(shí)"
str = replace(str,":","分",1,1)'將冒號(hào)":"轉(zhuǎn)換成"分"
str = str&"秒"'在最后添加"秒"
end if
chgtime=str
end function
Response.Write chgtime("2008-5-19 10:55:26")
%>
運(yùn)行結(jié)果:2008年5月19日10時(shí)55分26秒
思路分析:從左至右依次進(jìn)行替換,具體參照代碼行后面的解釋.
思路二:使用FormatDateTime()函數(shù),具體代碼如下:
<%
function chgtime1(str)
dim str1,str2
if str <> "" then
str1 = FormatDateTime(str,1)'獲取日期部分,得到"2008年5月19日 星期一"
str2 = FormatDateTime(str,3)'獲取獲取時(shí)間部分,得到"10:55:26"
end if
chgtime1=str1&" "&str2
end function
Response.Write chgtime1("2008-5-19 10:55:26")
%>
運(yùn)行結(jié)果:2008年5月19日 星期一 10:55:26
思路分析:利用不FormatDateTime()函數(shù)的不同參數(shù)獲取時(shí)間的不同部分再用字符串連接符連接.
綜合以上兩種思路,可以得到形如"2008年5月19日 星期一 10時(shí)55分26秒"的時(shí)間格式.具體代碼如下:
<%
function chgtime2(str)
dim str1,str2
if str <> "" then
str1 = FormatDateTime(str,1)'獲取日期部分
str2 = FormatDateTime(str,3)'獲取獲取時(shí)間部分
str2 = replace(str2,":","時(shí)",1,1)'將冒號(hào)":"轉(zhuǎn)換成"時(shí)"
str2 = replace(str2,":","分",1,1)'將冒號(hào)":"轉(zhuǎn)換成"分"
str2 = str2&"秒"'在最后添加"秒"
end if
chgtime2=str1&" "&str2
end function
Response.Write chgtime2("2008-5-19 10:55:26")
%>
運(yùn)行結(jié)果:2008年5月19日 星期一 10時(shí)55分26秒
總結(jié)
以上是生活随笔為你收集整理的ASP中时间格式转换的全部?jī)?nèi)容,希望文章能夠幫你解決所遇到的問(wèn)題。
- 上一篇: Inno Setup使用教程大全
- 下一篇: asp下载防盗链代码