ASP 根据时间计算是否过期

<%
Function DateDiffStr(dstr)
dim sysj
sysj=DateDiff("d",date(),dstr)//判断剩余时间或是否过期 
if sysj<0 then 
DateDiffStr="<font color=#808080>已过期</font>" 
else 
'DateDiffStr="距听课时间:<font color=#ff0000>"&sysj&"</font>天" 
'DateDiffStr="<font color=#808080>未过期</font>" 
end if
end Function

%>


<%=DateDiffStr("2019-9-20")%>


Copyright © 2014 ASP技巧教程源码大全 All Rights Reserved
晋ICP备14006235号-3 页面执行时间:93.750毫秒 返回顶部