รหัสหลัก
ฟังก์ชั่น <%': ฟังก์ชั่นการจัดรูปแบบมัลติฟังก์ชั่นการจัดรูปแบบของฟังก์ชั่น: http://jorkin.realllydo.com/article.asp?id=477Function formatDate (sdatetime, srealllydo) dim Sjorkin sjorkin = getLocale () = Now () SDATETIME = CDATE (SDATETIME) เลือก CASE UCASE (SREALLYDO &) CASE 0, 1, 2, 3, 4 FormatDate = FormatDateTime (SDATETIME, SREALLYDO) กรณี 00 FormatDate = FormatDate (SDATETIME, YYYY-MM-DD HH: MM: SS) กรณี 01 FormatDate = FormatDate (SDATETIME, YYYYYYYYYYYYYYYYYYY-MM-DD) กรณี 02 FORMATDATE = FormatDate (SDATETIME, YYYYY-MM-DD) (SDATETIME, HH: MM: SS) CASE 04 FormatDate = FormatDate (SDATETIME, HH: MM) CASE ISO8601, Google, SiteMap '// iso8601 รูปแบบ, โดยทั่วไปใช้สำหรับ googlesitemap, +08: 00 เป็นเขตเวลา สำหรับ RSS, +0800 เป็นเขตเวลา '// สุ่มสตริงสุ่ม sjorkin = rnd () formatDate = formatDate (sdatetime, yyyymmddhhmmss) & _ fix ((9 * 10^6 -1) * sjorkin) + 10^6 กรณีอื่น ๆ yyyy, ปี (sdatetime)) formatdate = แทนที่ (formatdate, dd, ขวา (0 & day (sdatetime), 2)) formatdate = แทนที่ (formatdate, HH, ขวา (0 & ชั่วโมง (SDATETIME), 2)) FormatDate = แทนที่ (FormatDate, MM, ขวา (0 & Minute (SDATETIME), 2)) FormatDate = แทนที่ (FormatDate, SS, ขวา (0 & Second (SDATETIME) , 2)) formatDate = แทนที่ (formatDate, yy, ขวา (ปี (sdatetime), 2)) formatDate = แทนที่ (formatDate, D, วัน (sDatetime)) formatDate = แทนที่ (formatDate, H, Hour (SDATETIME)) formatDate = แทนที่ (FormatDate, M, นาที (sDatetime)) formatDate = แทนที่ (formatDate, s, second (sdatetime)) ถ้า instr (1, formatdate, ew, 1)> 0 จากนั้น setLocale (en) -GB) formatDate = แทนที่ (FormatDate, EW, UCASE (วันธรรมดา (วันธรรมดา (วันธรรมดา (SDATETIME), FALSE))) FormatDate = แทนที่ (FormatDate, EW, วันธรรมดา (วันธรรมดา (sdatetime), false)) formatDate = แทนที่ (FormatDate, EW, UCASE (วันธรรมดา (วันธรรมดา (วันธรรมดา (SDATETIME), TRUE)) formatDate = แทนที่ (FormatDate, EW, WeekDayName (วันธรรมดา (sjorkin) else formatDate = แทนที่ (formatDate, W, วันธรรมดา (วันธรรมดา (SDATETIME), FALSE)) formatDate = แทนที่ (FormatDate, W, WeekdayName (วันธรรมดา (sdatetime), true)) สิ้นสุดถ้าถ้า instr (1, formatdate, emm, 1)> 0 จากนั้น setlocale (en-gb) formatDate = แทนที่ (FormatDate, EMM, MonthName (เดือน (เดือน (เดือน (en-gb) SDATETIME), FALSE)) formatDate = แทนที่ (FormatDate, EMM, monthName (เดือน (sDatetime), true)) setLocale (sjorkin) else formatDate = แทนที่ (FormatDate, MM, Right (0 & Month (SDATETIME), 2)) FormatDate = แทนที่ (FormatDate, M, เดือน (SDATETIME)) สิ้นสุดถ้าสิ้นสุดฟังก์ชั่น SELECTEND%>
การใช้งานมีดังนี้:
<%'วันที่รูปแบบถึง iso8601 การตอบสนองรูปแบบการเขียน (FormatDate (2008-03-06 08:03:06, Sitemap))' วันที่รูปแบบถึง RFC822 การตอบสนองรูปแบบการเขียน (FormatDate (2008-03-06 08: 03: 06: 06: 06: 06: 06 , rss)) 'วันที่รูปแบบถึง (สัปดาห์อังกฤษ, เดือนอังกฤษเดือน/วัน/yyyy))' response.write (formatdate (ตอนนี้ (), ew, emm/dd/yyyy)) ' เดือน, วัน, ชั่วโมง, นาทีและครั้งที่สอง response.write (formatDate (ตอนนี้ (), rnd))%>
สำหรับข้อมูลเพิ่มเติมโปรดตรวจสอบบทความที่เกี่ยวข้องต่อไปนี้