当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP分页和日期格式化为RFC822格式的办法

ASP
亲密接触ASP.Net(16)
NT 下虚拟域名的实现
介绍一种效率极高的分类算法
asp+发送email
用 ASP 技术开发 WEB 调查(投票)系统 (1)
用ASP技术开发 WEB 调查(投票)系统 (2)
用ASP技术开发WEB调查(投票)系统 (3)
ASP+全新接触
ASP+上载例子
从ASP迁移至ASP+--最初的考虑(一)
从ASP迁移至ASP+--进入DataSet
将HTML表格转换为ASP+数据列表(DataList)
急不可耐了?转换其他的页面吧!
用ASP解决域名登记查询
从ASP迁移至ASP+--处理会话变量
从ASP迁移至ASP+--CustomValidator控件
从ASP迁移至ASP+--从用户那儿收集数据
展现C#(1):C#简介
展现C#(2):NGWS Runtime 基础
展现C#(3):第一个C#应用程序

ASP分页和日期格式化为RFC822格式的办法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 261 ::
收藏到网摘: n/a

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


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