コアコード
<％ '関数：多機能日付フォーマット機能'ソース：http：//jorkin.reallydo.com/article.asp?id=477機能formatdate（sdatetime、sreallydo）dim sjorkin sjorkin = getlocale（） = now（）sdatetime = cdate（sdatetime）select case ucase（sreallydo＆）case 0、1、2、3、4 formatdate = formatdateTime（sdatetime、sreallydo）case 00 formatdate = formatdate（sdatetime、yyyy-mm-dd hh：mm：ss）ケース01 formatdate（sdatetime、yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy = formatdate（sdatetime = formatdate） （SDatetime、HH：MM：SS）ケース04 formatdate = formatdate（sdatetime、hh：mm）ケースISO8601、Google、SiteMap '// ISO8601 Format、一般に、+08：00はタイムゾーン= formatdate（sdateTime、yyyy-mm-ddthh：mm：ss.000 +08：00）ケースRFC822、feed '// rfc822フォーマット、一般的に使用されます。 RSSの場合、+0800はタイムゾーン（EN-GB）formatdate（sdatetime、ew、dd emm yyyy hh：mm：ss +0800）setlocale（sjorkin）case rnd、rand、rand、ランダム化'//文字列をランダム化するsjorkin = rnd（）formatdate = formatdate（sdatetime、yyyymmddhhmmmss）＆_ fix（（9 * 10^6 -1） * sjorkin） + 10^6ケースelse formatdate = sreallydo formatdate =置換yyyy、year（sdateTime））formatdate = formatdate（formatdate、dd、right（0＆day（sdateTime）、2））formatdate = leplay（formatdate、 Hh、右（0＆hour（sdatetime）、2））formatdate = formatdate（formatdate、mm、right（0＆minute（sdatetime）、2））formatdate = formatdate（formatdate、ss、right（0＆second（sdatetime）） 、2））formatdate = formatdate（formatdate、yy、right（year（sdatetime）、2））formatdate = formatdate（formatdate、d、day（sdatetime））formatdate = formatdate（formatdate、 h、hour（sdatetime））formatdate = formatdate（formatdate、m、minute（sdatetime））formatdate = formatdate（formatdate、s、second（sdatetime））if strust（1、formatdate、ew、1）> 0 setlocale（en en -gb）formatdate = formatdate（formatdate、ew、ucase（weekdayname（feakday（sdatetime）、false）））formatdate = leplay（formatdate、ew、 weekdayname（feekday（sdatetime）、false））formatdate = formatdate（formatdate、ew、ucase（weekday（sdatetime）、true））formatdate = formatdate（ew、weekdayname（sdatetime）、true））setlocale （sjorkin）else formatdate = leplage（formatdate、w、weekdayname（feakday（sdatetime）、false））formatdate =交換（formatdate、w、weekdayname（平日（sdateTime）、true））end if if if if if if if（formatdate、emm、1）> 0 sdateTime）、false））formatdate = formatdate（formatdate、emm、monthname（sdatetime、true））setlocale（sjorkin）else formatdate =交換（formatdate、mm、right（0＆month（sdatetime）、2））formatdate = formatdate（formatdate、m、month（sdateTime））end end if end selectend function％>
使用法は次のとおりです。
<％ '' ISO8601のフォーマット日付format respons.write（formatdate（2008-03-06 08:03:06、siteMap）） 、rss）） 'format date to（英語週、英語月/日/yyyy））' respons.write（formatdate（now（）、ew、emm/dd/yyyy）） '月、日、時間、分、2番目のResponse.write（formatdate（now（）、rnd））％>
詳細については、次の関連記事をご覧ください