asp将秒转化为XX天XX时XX分XX秒

lj419300010 2011-01-21 10:46:14
<%=DateDiff("s",rs("date1"),rs("date2"))%>
高手们,请问将上面得到的秒数怎么转化为XX天XX时XX分XX秒呢
当秒数小于60秒时只显示秒数。不显示前面的多少天多少时。

先谢谢了,谁可以写个实例。
...全文
109 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
代码之城 2011-01-22
  • 打赏
  • 举报
回复
楼上正解
lj419300010 2011-01-22
  • 打赏
  • 举报
回复
还是自己写的好
<script language="javascript" type="text/javascript" runat="server">
function time_To_hhmmss(seconds)
{
var tian;
var shi;
var fen;
var miao;

if(seconds==null||seconds<0){
return;
}

tian = Math.floor(seconds / 86400);

seconds = seconds - tian * 60 * 60 * 24;
shi = Math.floor(seconds / 3600);
seconds = seconds - shi * 60 * 60;
fen = Math.floor(seconds / 60);
seconds = seconds - fen * 60;
miao = seconds;

if(tian>0)
{
return tian+"天"+shi+"时"+fen+"分"+miao+"秒"
}
if(shi<24 && shi>0)
{
return shi+"时"+fen+"分"+miao+"秒"
}
if(fen <60 && fen >0 )
{
return fen+"分"+miao+"秒"
}
if(miao<60)
{
return miao+"秒"
}
}





</script>


<%=time_To_hhmmss(DateDiff("s",rs("date1"),rs("date2")))%>
hookee 2011-01-22
  • 打赏
  • 举报
回复

<%
n = 24 * 60 * 60 - 2
Response.Write fmtSeconds(n)

Function fmtSeconds(n)
On Error Resume Next
Dim d, h , m, s, t

If Not IsNumeric(n) Then
fmtSeconds = ""
Exit Function
End If
d = n \ (24 * 60 * 60)
h = (n - d * (24 * 60 * 60)) \ (60 * 60)
m = (n - d * (24 * 60 * 60) - h * (60 * 60)) \ 60
s = n Mod 60
t = ""
If d > 0 Then t = t & d & "天"
If t <> "" Or h > 0 Then t = t & h & "小时"
If t <> "" Or m > 0 Then t = t & m & "分"
t = t & s & "秒"
fmtSeconds = t
End Function
%>
  • 打赏
  • 举报
回复
1天=24小时,1小时=60分,1分=60秒。这个还不会算,还需要问?
建议你改学JSP更好些。

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧