4s天天飞车刷金币|天天飞车突击尖兵觉醒
★→ASP程序學習群:62655404 微信公眾號開發
訂閱本欄目 RSS您所在的位置: 深山工作室 > ASP學習 > 正文

ASP 格式化顯示時間為幾個月,幾天前,幾小時前,幾分鐘前,或幾秒前

 2015/5/23 16:10:18  字體:  瀏覽 2326 我要評論
當前標簽
日期
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
相關閱讀
( 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 格式化顯示時間為幾個月,幾天前,幾小時前,幾分鐘前,或幾秒前》的評論
發表評論
正在加載評論……
返回頂部發表評論
呢 稱:
表 情:
內 容:
評論內容:不能超過 1000 字,需審核,請自覺遵守互聯網相關政策法規。
驗證碼: 驗證碼 
深山工作室網友評論聲明,請自覺遵守互聯網相關政策法規。

您發布的評論即表示同意遵守以下條款:
一、不得利用本站危害國家安全、泄露國家秘密,不得侵犯國家、社會、集體和公民的合法權益;
二、不得發布國家法律、法規明令禁止的內容;互相尊重,對自己在本站的言論和行為負責;
三、本站對您所發布內容擁有處置權。

更多信息>>欄目類別選擇
rss學習
個人空間
網站設計
網站公告
下載
photoshop學習
ASP學習
DIV+CSS學習
SEO搜索引擎憂化
java學習
HTML學習
網站信息
網站類信息
更多>>同類信息
ASP利用fso讀取文件夾里所有文件的名字
asp實現獲得當前文章的上一篇信息與下一篇信息功能及代碼
asp導出內容到excel表并自定義命名后下載(非打開)
'禁止站外提交頁面和數據
asp將中文漢字字符轉為unicode編碼(\u編碼)與把unicode編碼轉為漢字
asp中qequest讀取優先級順序(通過優化之后提高速度)
asp計算頁面執行時間顯示到毫秒
批量刪除access字段里面fld.Properties.Delete
更多>>最新添加文章
sql server中前綴為PK、UK、DF、CK、FK表的意思
網站從http改成https(ssl證書)后設置301跳轉將http跳轉到https的方法
ASP利用fso讀取文件夾里所有文件的名字
jquery動態生成的html代碼中無法使用jquery事件的解決方法
asp實現獲得當前文章的上一篇信息與下一篇信息功能及代碼
asp導出內容到excel表并自定義命名后下載(非打開)
'禁止站外提交頁面和數據
asp將中文漢字字符轉為unicode編碼(\u編碼)與把unicode編碼轉為漢字
更多>>隨機抽取信息
一個相當帥的日歷時間面板
[轉載]中國行政區劃數據(省市區街道)
CSS教程:CSS兼容的技巧
仿淘寶首頁商品分類列表效果
asp中最難發現的錯誤由最簡單的程序引起
用CSS層疊樣式表實現文字變圖象特效
網站策劃:網站欄目和頁面的策劃
用于深山在線投票的一個javascript統計checkbox現在選中的個數一邊點復選框一邊驗證并計算現在選了多少個復選框
4s天天飞车刷金币