| 以下是代码片段: <% '============================================================= '格式化时间(显示) '参数:n_flag '1: "yyyy-mm-dd hh:mm:ss" '2: "yyyy-mm-dd" '3: "HH:mm:ss" '4: "yyyy年mm dd日" '============================================================= function format_time(s_time、n_flag) dim y、m、d、h、mi、s format_time = "" isdate(s_time)= falseの場合、機能を終了します y = cstr(year(s_time)) M = CSTR(月(S_TIME)) len(m)= 1の場合、m = "0"&m d = cstr(day(s_time)) len(d)= 1の場合、d = "0"&d h = cstr(hour(s_time)) len(h)= 1の場合、h = "0"&h mi = cstr(minute(s_time)) len(mi)= 1の場合、mi = "0"&mi s = cstr(second(s_time)) len(s)= 1の場合、s = "0"&s ケースn_flagを選択します ケース1 'yyyy-mm-dd hh:mm:ss format_time = y& " - "&m& " - "&d& "&": "&mi&": "&s ケース2 'yyyy-mm-dd format_time = y& " - "&m& " - "&d ケース3 'HH:mm:ss format_time = h& ":"&mi& ":"&s ケース4 'yyyy年mm format_time = y& "年"&m& "月"&d& "日" [選択]を終了します エンド関数 %> |