每季度响应一次

Question

我有两个约会对象

strFrom = formatDateTime("11:15",4)
strTo = formatDateTime("16:30",4)

我想生成一个脚本，以便每个季度从 strFrom 到 StrTo

11:15
11.30
11.45
12.00
12:15
12:30
12:45
13:00
13:15
...
...
...
16:00
16:30

Answer 1

首先您需要转换为日期时间，然后您需要循环增加分钟数。

<%
strFrom = formatDateTime("11:15",4)
strTo = formatDateTime("16:30",4)

dteFrom=CDate(strFrom)
dteTo=CDate(strTo)

Response.write(strFrom & "<br>")
Do While (dteFrom < dteTo)
    dteFrom=DateAdd("n",15,dteFrom)
    Response.write(formatDateTime(dteFrom,4) & "<br>")  
Loop
%>

每季度响应一次

Response every quarter between times

asp-classic