html5中文学习网

您的位置: 首页 > 网络编程 > ASP编程 » 正文

ASP中如何在网页上输入中文日期_ASP教程_编程技术

[ ] 已经帮助:人解决问题

ASP中如何在网页上输入中文日期

   我们通常需要在WEB页面上写上当前的日期,可能使用客户端script,或者使用ASP。使用ASP的一个特点是,它产生的效果看起来是静态的页面,但实际上它是动态生成的。如果你希望用ASP显示一个中文的日期,则需要转化一下。下面是用来转化的函数及其调用实例。

< %

’======================================================

’ 函数 Date2Chinese

’ 功能:获得中文日期的字符串(如一九九八年五月十二日)

’ 参数: iDate 要转化的日期

’ 返回: 中文日期的字符串

’======================================================

Function Date2Chinese(iDate)

    Dim num(10)

    Dim iYear

    Dim iMonth

    Dim iDay

    num(0) = ""

    num(1) = "一"

    num(2) = "二"

    num(3) = "三"

    num(4) = "四"

    num(5) = "五"

    num(6) = "六"

    num(7) = "七"

    num(8) = "八"

    num(9) = "九"

    iYear = Year(iDate)

    iMonth = Month(iDate)

    iDay = Day(iDate)

    Date2Chinese = num(iYear / 1000) + _

        num((iYear / 100) Mod 10) + num((iYear _

        / 10) Mod 10) + num(iYear Mod _

        10) + "年"

    If iMonth >= 10 Then

        If iMonth = 10 Then

            Date2Chinese = Date2Chinese + _

            "十" + "月"

        Else

            Date2Chinese = Date2Chinese + _

            "十" + num(iMonth Mod 10) + "月"

        End If

    Else

        Date2Chinese = Date2Chinese + _

            num(iMonth Mod 10) + "月"

    End If

    If iDay >= 10 Then

        If iDay = 10 Then

            Date2Chinese = Date2Chinese + _

            "十" + "日"

        ElseIf iDay = 20 Or iDay = 30 Then

            Date2Chinese = Date2Chinese + _

            num(iDay / 10) + "十" + "日"

        ElseIf iDay > 20 Then

            Date2Chinese = Date2Chinese + _

            num(iDay / 10) + "十" + _

            num(iDay Mod 10) + "日"

        Else

           Date2Chinese = Date2Chinese + _

           "十" + num(iDay Mod 10) + "日"

        End If

    Else

        Date2Chinese = Date2Chinese + _

        num(iDay Mod 10) + "日"

    End If

End Function

%>

可以在网页的任何地方使用以下输出中文日期:

< %

response.write date2Chinese(date())

%>

msUHTML5中文学习网 - HTML5先行者学习网
msUHTML5中文学习网 - HTML5先行者学习网
(责任编辑:)
推荐书籍
推荐资讯
关于HTML5先行者 - 联系我们 - 广告服务 - 友情链接 - 网站地图 - 版权声明 - 人才招聘 - 帮助