使用C#和VB.NET把发表的时间改为几个月,几天前,几小时前,几分钟前,或几秒前

VB.NET

<%
dim timedifference
TimeDifference = DateDiff("s", rs("updatetime"), Now)

If TimeDifference <60 then
response.write(TimeDifference & "秒前")
Elseif TimeDifference <60*60 then
response.write(TimeDifference\60 & "分钟前")
Elseif TimeDifference <60*60*24 then
response.write(TimeDifference\(60*60) & "小时前")
else if TimeDifference <60*60*60*24 then
response.write(TimeDifference\(60*60*24) & "天前")
end if
End If%>

Function TimerString(pTimeValue)
'tOutString = TimerString ( pTimeValue )
'参数：pTimeValue 以秒表示的时间。
'返回：tOutString 以文字表示的时间。

tOutString = ""

tNameListStr = "秒,分,小时,天,周,年"
'如果你要取消“年”单位="秒,分,小时,天,周"
tNameList = Split(tNameListStr, ",")

tStepListStr = "1,60,60,24,7,52,65536"
'如果你要取消“年”单位="1,60,60,24,7,65536"
tStepList = Split(tStepListStr, ",")

tItemCount = UBound(tNameList)

ReDim tAbsValue(tItemCount)

tAbsValue(0) = CLng(pTimeValue)

For tIndex = 1 To tItemCount
tAbsValue(tIndex) = CLng(tAbsValue(tIndex - 1)) \ CLng(tStepList(tIndex))
Next

ReDim tModValue(tItemCount)

For tIndex = 0 To tItemCount

tModValue(tIndex) = tAbsValue(tIndex) Mod CLng(tStepList(tIndex + 1))

If CBool(tModValue(tIndex)) Then
tOutString = tModValue(tIndex) & tNameList(tIndex) & tOutString
End If

Next

TimerString = tOutString
End Function

如果你要取消"周"单位，而只保留"年"：
tNameListStr = "秒,分,小时,天,年"
tStepListStr = "1,60,60,24,365,65536"

pTimeValue是这样计算出来的：

相对年=年-参照年（你可以选择一个闰年作为参照，你的网站不会早于这个日期的。）

一年是31557600秒（365.25天）

相对年×31557600+所在年天数×86400+当天的Timer（从0点开始的秒数，可以用Timer取得）

所在年天数需要另外一个程序计算，根据月份表计算。

pTimeValue用long表示，可以以秒记录68年。

C#

public string DateStringFromNow(DateTime dt)
TimeSpan span = DateTime.Now - dt;
if (span.TotalDays > 60)
return dt.ToShortDateString();
}
else if ( span.TotalDays > 30 )
return "1个月前";
}
else if (span.TotalDays > 14)
return "2周前";
}
else if (span.TotalDays > 7)
return "1周前";
}
else if (span.TotalDays > 1)
return string.Format("{0}天前", (int)Math.Floor(span.TotalDays));
}
else if (span.TotalHours > 1)
return string.Format("{0}小时前", (int)Math.Floor(span.TotalHours));
}
else if (span.TotalMinutes > 1)
return string.Format("{0}分钟前", (int)Math.Floor(span.TotalMinutes));
}
else if (span.TotalSeconds >= 1)
return string.Format("{0}秒前", (int)Math.Floor(span.TotalSeconds));
}
else
return "1秒前";
}
}

C#中使用TimeSpan计算两个时间的差值

可以反加两个日期之间任何一个时间单位。
private string DateDiff(DateTime DateTime1, DateTime DateTime2)
{string dateDiff = null;
TimeSpan ts1 = new TimeSpan(DateTime1.Ticks);
TimeSpan ts2 = new TimeSpan(DateTime2.Ticks);
TimeSpan ts = ts1.Subtract(ts2).Duration();
dateDiff = ts.Days.ToString()+"天"+ ts.Hours.ToString()+"小时"+ ts.Minutes.ToString()+"分钟"+ ts.Seconds.ToString()+"秒";
return dateDiff;
}

TimeSpan ts = Date1 - Date2;
double dDays = ts.TotalDays;//带小数的天数，比如1天12小时结果就是1.5
int nDays = ts.Days;//整数天数，1天12小时或者1天20小时结果都是1

说明：
1.DateTime值类型代表了一个从公元0001年1月1日0点0分0秒到公元9999年12月31日23点59分59秒之间的具体日期时刻。因此，你可以用DateTime值类型来描述任何在想象范围之内的时间。一个DateTime值代表了一个具体的时刻
2.TimeSpan值包含了许多属性与方法，用于访问或处理一个TimeSpan值
下面的列表涵盖了其中的一部分：
Add：与另一个TimeSpan值相加。
Days:返回用天数计算的TimeSpan值。
Duration:获取TimeSpan的绝对值。
Hours:返回用小时计算的TimeSpan值
Milliseconds:返回用毫秒计算的TimeSpan值。
Minutes:返回用分钟计算的TimeSpan值。
Negate:返回当前实例的相反数。
Seconds:返回用秒计算的TimeSpan值。
Subtract:从中减去另一个TimeSpan值。
Ticks:返回TimeSpan值的tick数。
TotalDays:返回TimeSpan值表示的天数。
TotalHours:返回TimeSpan值表示的小时数。
TotalMilliseconds:返回TimeSpan值表示的毫秒数。
TotalMinutes:返回TimeSpan值表示的分钟数。
TotalSeconds:返回TimeSpan值表示的秒数。

/// <summary>
/// 日期比较
/// </summary>
/// <param name="today">当前日期</param>
/// <param name="writeDate">输入日期</param>
/// <param name="n">比较天数</param>
/// <returns>大于天数返回true，小于返回false</returns>
private bool CompareDate(string today, string writeDate, int n)
{
DateTime Today = Convert.ToDateTime(today);
DateTime WriteDate = Convert.ToDateTime(writeDate);
WriteDate = WriteDate.AddDays(n);
if (Today >= WriteDate)
return false;
else
return true;
}