對於access資料庫的日期時間型別字段儲存的日期，直接從資料庫中讀出顯示的效果是帶時間的如，2009-06-13 18：00 ，如果只是希望顯示日期應該怎麼辦呢？
vbscrip有乙個函式formatdatetime（）。其說明如下：
返回表示式，此表示式已被格式化為日期或時間。
formatdatetime(date[, named
引數 date
必選項。要被格式化的日期表示式。
namedformat
可選項。指示所使用的日期/時間格式的數值，如果省略，則使用 vbgeneraldate。
設定 namedformat 引數可以有以下值：
常數
值
描述
vbgeneraldate
0顯示日期和/或時間。如果有日期部分，則將該部分顯示為短日期格式。如果有時間部分，則將該部分顯示為長時間格式。如果都存在，則顯示所有部分。
程式設計客棧 dsbbv
vblongdate
1使用計算機區域設定中指定的長日期格式顯示日期。
vbshortdate
2使用計算機區域設定中指定的短日期格式顯示日期。
vblongtime
3使用計算機區域設定中指定的時間格式顯示時間。
vbshorttime
4使用 24 小時格式 (hh:mm) 顯示時間。
僅希望顯示日期時可用如下**：
strdate=formatdatetime(rs(「date」),2)。
因為在vbscript只有一種計算機區域那就是美國，所以只有一種短格式
「yyyy-mm-dd」.
asp時間日期格式化輸出
1，2010-10-10 00：00：00
2，2010-10-10
3，2010/程式設計客棧10/10
4，2023年10月10 00小時00分鐘00秒
5，10-10 00:00:00
6，10/10
7，10月10日
其他變換根據程式要自行新增即可
'轉換時間 時間格式化
function formatdate(byval t,byval ftype)
dim y, m, d, h, mi, s
formatdate=""
if isdate(t)=false then exit function
y=cstr(year(t))
m=cstr(month(t))
if len(m)=1 then m="0" & m
d=cstr(day(t))
if len(d)=1 then d="0" & d
h = cstr(hour(t))
if len(h)=1 then h="0" & h
mi = cstr(minute(t))
if len(mi)=1 then mi="0" & mi
s = cstr(second(t))
if len(s)=1 then s="0" & s
select case cint(ftype)
case 1
' yyyy-mm-dd
formatdate=y & "-" & m & "-" & d
case 2
' yy-mm-dd
formatdate=right(y,2) & "-" & m & "-" & d
case 3
' mm-dd
formatdate=m & "-" & d
case 4
' dsbbvyyyy-mm-dd hh:mm:ss
formatdate=y & "-" & m & "-" & d & " " & h & ":" & mi & ":" & s
case 5
' hh:mm:ss
formatdate=h & ":" & mi & ":" & s
case 6
' yyyy年mm月dd日
formatdate=y & "年" & m & "月" & d & "日"
case 7
' yyyymmdd
formatdate=y & m & d
case 8
'yyyymmddhhmmss
formatdate=y & m & d & h & mi & s
end select
end function
使用方法：
strdate=formatdatetime(rs(「date」),1)
本文標題: asp 日期格式化問題
本文位址:
java 日期格式化問題
這段時間寫了乙個資料查詢介面，測試的case中設定開始時間為12點 結束時間為13點，查詢出來的資料竟然有8點的。看了一下 date start dateutils.parsedate map.get start time yyyymmddhhmmss date end dateutils.pars...
格式化日期
格式化日期 輸出形式取決於使用者計算機的文化設定。using system using system.globalization public class mainclass string date for int i 0 i format.length i d 07 11 2004 輸出 d su...
格式化日期
function dateformat datestr,types dim datestring if isdate datestr false then datestring end if select case types case 1 datestring year datestr month...