这篇文章主要介绍了ASP中格式化时间短日期补0变两位长日期的方法,需要的朋友可以参考下

因为短日期不足2位，所以在网页排版的时候，影响美观，下面两个函数可以解决这个问题。

2020-2-7短日期 变 2020-02-07长日期

  1. Function FStime(times)
  2.   Dim years,months,days
  3.    if len(times)=0 then exit function
  4.    years=year(times)
  5.    months=right("0"&month(times),2)
  6.    days=right("0"&day(times),2)
  7.    times=years&"-"&months&"-"&days
  8.    FStime=times
  9. End Function

2020-2-7 23:37:5短日期 变 2020-02-07 23:37:05长日期

  1. Function FLtime(times)
  2.   Dim years,months,days,hours,minutes,seconds
  3.    if len(times)=0 then exit function
  4.    years=year(times):months=right("0"&month(times),2)
  5.    days=right("0"&day(times),2):hours=right("0"&hour(times),2)
  6.    minutes=right("0"&minute(times),2):seconds=right("0"&second(times),2)
  7.    FLtime=years&"-"&months&"-"&days&" "&hours&":"&minutes&":"&seconds
  8. End Function

Pw_Sys 日期格式转换函数

  1. <%
  3. Rem Pw_Sys 日期格式转换函数
  5. function DateTimeFormat(DateTime,Format)
  6. select case Format
  7. case "1"
  8. DateTimeFormat=""&year(DateTime)&"年"&month(DateTime)&"月"&Right("0" & Day(DateTime),2)&"日"
  9. case "2"
  10. DateTimeFormat=""&month(DateTime)&"月"&Right("0" & Day(DateTime),2)&"日"
  11. case "3"
  12. DateTimeFormat=""&year(DateTime)&"-"&month(DateTime)&"-"&Right("0" & Day(DateTime),2)&""
  13. case "4"
  14. DateTimeFormat=""&year(DateTime)&"/"&month(DateTime)&"/"&Right("0" & Day(DateTime),2)&""
  15. case "5"
  16. DateTimeFormat=""&month(DateTime)&"/"&Right("0" & Day(DateTime),2)&""
  17. case "6"
  18. DateTimeFormat=""&year(DateTime)&"年"&month(DateTime)&"月"&Right("0" & Day(DateTime),2)&"日<font color=red> "&FormatDateTime(DateTime,4)&"</font>"
  19. case "7"
  20.   temp="星期日,星期一,星期二,星期三,星期四,星期五,星期六"
  21.   temp=split(temp,",")
  22.   DateTimeFormat=temp(WeekRight("0" & Day(DateTime),2)-1)
  23. case "8"
  24. DateTimeFormat=""&month(DateTime)&"-"&Right("0" & Day(DateTime),2)&""
  25. case "9"
  26. if len(hour(DateTime)) = 1 then
  27. str="0"&hour(DateTime)
  28. else
  29. str=hour(DateTime)
  30. end if
  31. DateTimeFormat=DateTimeFormat(DateTime,1)&" "&str&":"&Minute(DateTime)
  32. case "10"
  33. DateTimeFormat=""&year(DateTime)&"年"&month(DateTime)&"月"
  34. case else
  35. DateTimeFormat=DateTime
  36. end select
  37. end function
  39. %>

程序代码（把yyyy-mm-dd格式的日期中的月份和日期转换成两位数字的方法）
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E4%B8%8A%E4%B8%8B%E5%88%86%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E4%B8%8A%E4%B8%8B%E5%88%86%E5%AE%A2%E6%9C%8D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E4%B8%8A%E4%B8%8B%E5%88%86%E8%81%94%E7%B3%BB%E6%96%B9%E5%BC%8Fkka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E4%B8%8A%E4%B8%8B%E5%88%86%E7%83%AD%E7%BA%BF%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E4%B8%8A%E4%B8%8B%E5%88%86%E5%92%A8%E8%AF%A2%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E4%B8%8A%E4%B8%8B%E5%88%86%E7%94%B5%E8%AF%9D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E8%81%94%E7%B3%BB%E6%96%B9%E5%BC%8F%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E7%94%B5%E8%AF%9D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E5%AE%A2%E6%9C%8D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E7%BB%8F%E7%90%86%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E7%94%B5%E8%AF%9D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E8%81%94%E7%B3%BB%E6%96%B9%E5%BC%8F%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%9C%A8%E7%BA%BF%E5%BC%80%E6%88%B7%E5%BE%AE%E4%BF%A1ccv5670
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E8%81%94%E7%B3%BB%E7%94%B5%E8%AF%9D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E6%B3%A8%E5%86%8C%E5%BC%80%E6%88%B7%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E6%B3%A8%E5%86%8C%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E4%B8%AD%E5%BF%83%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%BC%80%E6%88%B7%E7%83%AD%E7%BA%BF%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E5%92%A8%E8%AF%A2%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E7%83%AD%E7%BA%BF%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E5%BC%80%E6%88%B7%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E4%B8%AD%E5%BF%83%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%9C%A8%E7%BA%BF%E5%AE%A2%E6%9C%8D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E7%94%B5%E8%AF%9D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E5%BE%AE%E4%BF%A1%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E5%AE%A2%E6%9C%8D%E8%81%94%E7%B3%BB%E7%94%B5%E8%AF%9D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E7%8E%B0%E5%9C%BA%E5%AE%A2%E6%9C%8D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E7%8E%B0%E5%9C%BA%E7%BB%8F%E7%90%86%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E6%B3%A8%E5%86%8C%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E6%B3%A8%E5%86%8C%E8%B4%A6%E5%8F%B7%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E6%B3%A8%E5%86%8C%E5%AE%98%E7%BD%91%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E7%83%AD%E7%BA%BF%E7%94%B5%E8%AF%9D%E5%BE%AE%E4%BF%A1kka10011
http://www.hnxxrsj.gov.cn/Error.aspx?msg=%E5%8D%8E%E7%BA%B3%E5%A8%B1%E4%B9%90%E6%B8%B8%E6%88%8F%E7%BD%91%E5%9D%80%E5%BE%AE%E4%BF%A1kka10011

dim today
today=Date ‘避免重复调用Date，所以赋值给一个变量
today=Year(today) & “-“ & Right(“0” & Month(today),2) & “-“ & Right(“0” & Day(today),2)

asp中一段自动补位的函数

  1. function formatsn(getnum,getbit)
  2. dim formatsnnum,formatsnpre,formatsnj
  3. formatsnnum = getbit – len(getnum)
  4. for formatsnj = 1 to formatsnnum
  5. formatsnpre = formatsnpre & "0"
  6. next
  7. formatsn = formatsnpre & getnum
  8. end function

更多相关文章

  1. android常用的代码片段
  2. Android(安卓)日期选择器、日期范围选择器：MaterialDateRangePick
  3. 阅读《Android(安卓)从入门到精通》（13）——日期选择器
  4. 两种方式使用android时间和日期控件
  5. Android(安卓)时间格式转换
  6. Android中获取指定日期是星期几
  7. 0317作业
  8. Android学习笔记(27):日历视图Calendar
  9. Android学习笔记(28):三种选择器DatePicker_TimePicker_NumberPi

随机推荐

  1. android 常用第三方类库汇总
  2. 关于Android4.0之上的ListView显示从网络
  3. ViewPager中的错误片段接收onContextItem
  4. Android Studio Gradle 缓存文件夹设置
  5. 使用Android保护RESTful服务的最佳方式
  6. latch（用于等待异步响应）冻结WebView（和UI）
  7. Android自定义View流程
  8. android datepickerdialog 怎样在第一次
  9. 【android】两个view共用同一个animation
  10. Android异步双屏显示