ASP 格式化显示时间为几个月,几天前,几小时前,几分钟前,或几秒前
- 当前标签
- 日期
Function DateStringFromNow(Byval sTheDate)
' 格式化显示时间为几个月,几天前,几小时前,几分钟前,或几秒前
Dim iSeconds, iMinutes, iHours, iDays
iSeconds = DateDiff("s", sTheDate, Now()) 'd/h/n/s
iMinutes = Int(iSeconds/60)
iHours = Int(iSeconds/3600)
iDays = Int(iSeconds/86400)
If iDays > 60 Then
DateStringFromNow = sTheDate
ElseIf iDays > 30 Then
DateStringFromNow = "1个月前"
ElseIf iDays > 14 Then
DateStringFromNow = "2周前"
ElseIf iDays > 7 Then
DateStringFromNow = "1周前"
ElseIf iDays > 1 Then
DateStringFromNow = iDays & "天前"
ElseIf iHours > 1 Then
DateStringFromNow = iHours & "小时前"
ElseIf iMinutes > 1 Then
DateStringFromNow = iMinutes & "分钟前"
ElseIf iSeconds >= 1 Then
DateStringFromNow = iSeconds & "秒前"
Else
DateStringFromNow = "1秒前"
End If
End Function
前一页：asp判断是否是手机访问
后一页：ASP读取json并输出
- 相关阅读
- ( 2018/5/14 10:35:46 )ASP版通过身份证信息获取对应的生日性别年龄
- ( 2016/8/15 19:04:22 )asp获得系统Unix时间戳与将Unix时间戳转为正常日期
- ( 2016/3/12 14:58:19 )Asp得到当月天数的函数方法
- ( 2015/3/11 9:06:06 )asp判断是否是手机访问
- ( 2013/8/6 8:01:49 )经常使用到有关数据库的操作sql
- ( 2012/10/29 9:53:56 )深山旅行社管理系统商业版增加线路日期报价功能样式选择(增加了3个日期报价效果)
- ( 2012/8/14 9:46:58 )javascript日期验证比较
- ( 2011/5/25 22:07:30 )asp简易论坛制作教程(三)——数据库的设置
- 共有0条关于《ASP 格式化显示时间为几个月,几天前,几小时前,几分钟前,或几秒前》的评论
- 发表评论
正在加载评论……
返回顶部发表评论
深山工作室网友评论声明，请自觉遵守互联网相关政策法规。
您发布的评论即表示同意遵守以下条款：
一、不得利用本站危害国家安全、泄露国家秘密，不得侵犯国家、社会、集体和公民的合法权益；
二、不得发布国家法律、法规明令禁止的内容；互相尊重，对自己在本站的言论和行为负责；
三、本站对您所发布内容拥有处置权。
- 更多>>同类信息
- 批量删除access字段里面fld.Properties.Delete
- ASP操作access或sqlserver数据库的函数库
- asp中求两个数的百分比（利用百分比函数FormatPercent就可以自带%的符号）
- asp利用sql操作数据表、数据库的一些方法
- rs操作数据表记录集对象的方法
- [转载]中国行政区划数据（省市区街道）
- ASP版通过身份证信息获取对应的生日性别年龄
- ASP网站打开特别卡 提示：msxml3.dll 错误 '80072ee2' /LM/W3SVC/670931603/Root/global.asa解决办法
- 更多>>最新添加文章
- 批量删除access字段里面fld.Properties.Delete
- ASP操作access或sqlserver数据库的函数库
- asp采用access数据库搜索信息时因为日文片假名问题提示“Microsoft JET Database Engine 错误80040e14”的解决方法
- asp中求两个数的百分比（利用百分比函数FormatPercent就可以自带%的符号）
- asp利用sql操作数据表、数据库的一些方法
- rs操作数据表记录集对象的方法
- asp利用dateadd获得上个月、本月、下个月的第一天和最后一天
- asp随机显示字符长度与类型（可随机显示数字、小写字母、大写字母，可以做为随机密码使用）
苏公网安备 32070502010230号