- <%
- '******************************
- '函数:FormatDate(DateAndTime, para)
- '参数:DateAndTime,要格式化的日期时间;para,样式。
- '作者:阿里西西
- '日期:2007/7/12
- '描述:将日期格式化为需要的格式
- '示例:<%=FormatDate(now(), 3)%>
- '******************************
- Public Function FormatDate(DateAndTime, para)
- On Error Resume Next
- Dim y, m, d, h, mi, s, strDateTime
- FormatDate = DateAndTime
- If Not IsNumeric(para) Then Exit Function
- If Not IsDate(DateAndTime) Then Exit Function
- y = CStr(Year(DateAndTime))
- m = CStr(Month(DateAndTime))
- If Len(m) = 1 Then m = "0" & m
- d = CStr(Day(DateAndTime))
- If Len(d) = 1 Then d = "0" & d
- h = CStr(Hour(DateAndTime))
- If Len(h) = 1 Then h = "0" & h
- mi = CStr(Minute(DateAndTime))
- If Len(mi) = 1 Then mi = "0" & mi
- s = CStr(Second(DateAndTime))
- If Len(s) = 1 Then s = "0" & s
- Select Case para
- Case "1"
- strDateTime = y & "-" & m & "-" & d & " " & h & ":" & mi & ":" & s
- Case "2"
- strDateTime = y & "-" & m & "-" & d
- Case "3"
- strDateTime = y & "/" & m & "/" & d
- Case "4"
- strDateTime = y & "年" & m & "月" & d & "日"
- Case "5"
- strDateTime = m & "-" & d & " " & h & ":" & mi
- Case "6"
- strDateTime = m & "/" & d
- Case "7"
- strDateTime = m & "月" & d & "日"
- Case "8"
- strDateTime = y & "年" & m & "月"
- Case "9"
- strDateTime = y & "-" & m
- Case "10"
- strDateTime = y & "/" & m
- Case "11"
- strDateTime = right(y,2) & "-" &m & "-" & d & " " & h & ":" & mi
- Case "12"
- strDateTime = right(y,2) & "-" &m & "-" & d
- Case "13"
- strDateTime = m & "-" & d
- Case Else
- strDateTime = DateAndTime
- End Select
- FormatDate = strDateTime
- End Function
- %>
asp 将日期格式化为需要的格式
2019-10-12 10:53阿里西西 ASP教程
asp 将日期格式化为需要的格式
延伸 · 阅读
- 2019-10-12asp实现取得数组中的最大值的代码
- 2019-10-12asp 下产生任意位数随机密码的代码
- 2019-10-12asp下返回以千分位显示数字格式化的数值
- 2019-10-12asp重定向页面的方法总结
- 2019-10-12asp下去除数组中重复项的方法
- 2019-10-12asp下实现 重新排序数字数组的代码
精彩推荐
- ASP教程
使用ODBC数据库管理Serv-U的FTP用户及相关ASP编程[附源码示例下载
使用ODBC数据库管理Serv-U的FTP用户及相关ASP编程[附源码示例下载]...
- ASP教程
提高ASP页面执行效率的方法分析
改善程序性能是一件很微妙的事情。尤其是和INTERNET相关的程序,像ASP程序,制约其性能的因素很多,像 WEB服务器、TCP/IP网络和数据库服务器等。...
- ASP教程
asp fckeditor自定义上传文件的文件名
上传文件时如果遇到中文就很麻烦,但又不能让用户自己把文件名改后再上传,所以直接把文件名自动生成了一下。...
- ASP教程
ASP让url的中文显示为编码
有时候传递中文会出现乱码等原因,最好对中文参数进行编码处理。...
- ASP教程
XMLHttp ASP远程获取网页内容代码
asp下利用xmlhttp获取网页内容的方法这个方法一般比较通用的,然后通过字符截取网页的内容。 ...
- ASP教程
ASP 调用带参数输出的COM接口
asp com接口的调用代码。 需要的朋友可以参考下。...
- ASP教程
ASP javascript Application对象的Contents和StaticObjects做Cache的一些经验
ASP javascript: Application对象的Contents和StaticObjects做Cache的一些结论。 ASP封装Cache对象,一般都是基于Application的, ...
- ASP教程
ASP+Access数据库安全设置方法小结
1.首先,我们需要过滤所有客户端提交的内容,其中包括?id=N一类,另外还有提交的html代码中的操作数据库的select及asp文件操作语法,大家可以把提交的字符转...