开启辅助访问
切换到宽版

天天ASP家园官方Q群

天天ASP家园网友互动群

群1: 697497501(新手学习互助群)

群2: 47598123(进阶应用群)

天天ASP家园»论坛 › 技术交流 › ASP技术 › 贡献一个函数：根据秒数算出天时分秒
返回列表 发新帖
查看: 497|回复: 1

[ASP函数] 贡献一个函数：根据秒数算出天时分秒

[复制链接]
冰河非非 发表于 2022-2-19 20:01:28 | 显示全部楼层 |阅读模式
  1. Function getTime(times) '根据秒数算出天时分秒
  2.     sec = times Mod 60 '取余数，算出剩余多少秒
  3.     min = ( times - sec ) / 60
  4.     If min<60 Then
  5.         min = min
  6.         hur = 0
  7.         days = 0
  8.     ElseIf min = 60 Then
  9.         min = 0
  10.         hur = 1
  11.         days = 0
  12.     Else
  13.         min = min Mod 60 '取余数，算出是多少分
  14.         hur = (( times - sec ) / 60 - min) / 60 '算出小时
  15.         If hur<24 Then
  16.             days = 0
  17.         ElseIf hur = 24 Then
  18.             days = 1
  19.         Else
  20.             hur = hur Mod 24 '取余数，算出剩余多少小时
  21.             days = ( (( times - sec ) / 60 - min) / 60 - hur) / 24
  22.         End If
  23.     End If

  25.      Response.Write  days & "天" & hur & "小时" & min & "分" & sec & "秒"
  26. End Function
  27. %>
复制代码



ASP币如何冲？请看这里
回复

使用道具 举报

 楼主| 冰河非非 发表于 2022-2-19 20:03:42 | 显示全部楼层
运行结果

getTime(5000)
QQ图片20220219200310.png

ASP币如何冲？请看这里
回复 支持 反对

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表

在线客服

售前咨询
售后咨询
服务热线
023-58418553
微信公众号