当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP分页和日期格式化为RFC822格式的办法
计算分页,嘿嘿一次搞定不用判断
将日期格式化为RFC822格式,以前的方法麻烦哦,看这个简单的
| 以下为引用的内容: Function DateToRFC822(byVal dtaVal) Dim strCurLocale : strCurLocale = GetLocale() SetLocale("en-gb") dtaVal = CDate(dtaVal) DateToRFC822 = WeekdayName(Weekday(dtaVal),True)&","&_ Right("0"&Day(dtaVal),2)&" "&_ MonthName(Month(dtaVal),True)&" "&_ Year(dtaVal)&" "&_ Right("0"&Hour(dtaVal),2)&":"&_ Right("0"&Minute(dtaVal),2)&":"& _ Right("0"&Second(dtaVal),2)&" "& _ " +0800" SetLocale(strCurLocale) End Function |
评论 (0) All