怎样将 ASP 分页以及获取 RFC 822 形式的数据

计算分页，嘿嘿一次搞定不用判断

以下为引用的内容：

intNumPage = Abs(Int(-(intNumRecord/intPerPage)))

将日期格式化为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

（编辑：驾考网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!