在ASP VB 中自定義日期格式的函式

2021-04-12 15:44:32 字數 1461 閱讀 5319

**如下:

function

addzero(val, digit)

dimret

ret 

=cstr

(val)

ret 

=replace

(space

(digit 

-len

(val)), ""

, "0"

) &ret        

addzero 

=ret

end function

function

formatdatatime(dt, format)

dimret

ret 

=replace

(format, "mm

", addzero(

month

(dt), 2))

ret 

=replace

(ret, "m

", month

(dt))

ret 

=replace

(ret, "mm

", addzero(

minute

(dt), 2))

ret 

=replace

(ret, "m

", minute

(dt))

ret 

=ucase

(ret)

ret 

=replace

(ret, 

"yyyy", 

year

(dt))

ret 

=replace

(ret, "dd

", day(dt))

ret 

=replace

(ret, "d

", addzero(

day(dt), 2))

ret 

=replace

(ret, "hh

", hour

(dt))

ret 

=replace

(ret, "h

", addzero(

hour

(dt), 2))

ret 

=replace

(ret, "ss

", addzero(

second

(dt), 2))

ret 

=replace

(ret, "s

", second

(dt))

formatdatatime 

=ret

end function

response.write formatdatatime(

now, 

"yyyy-mm-dd hh:mm:ss")

顯示結果:

2006-12-31 11:37:27

自定義日期(時間)格式

效果 我們把它輸入到頁面上並利用定時器 setinterval 實時更新 1.首先把上例中自定義日期物件的函式封裝到乙個tool.js檔案裡,用的時候直接呼叫即可。tool.js 內容如下 1 function showtime 1213 單數變雙數 14function doublenum num...

輸出自定義日期格式

通過實現iformatprovider,icustomformatter介面可以實現自定義的格式輸現,這裡有實現乙個例子,以輸出日期格式為例 顯示今天 明天 後天和 x月x日 等 1 假設我們有多種顯示日期格式的需求,我們可以定義乙個列舉如下 public enum datetimeformat 2...

jQuery js自定義日期或時間格式

在一些業務中,經常會遇到日期或時間格式的轉換,如下 為在實際情況中會經常用的格式 type 為需要自定義的格式 ns為時間,需要將日期轉換為時間,如 var ns new date gettime 其中用到了gettimezoneoffset時區轉換的方法,如果用不到,可以直接刪除 function...