fun.inc

来自「虎门热线交友程序 2005版 全套的交友网站。释放到服务器」· INC 代码 · 共 14 行

<%
function InsertZero(M)
if len(M)=1 then
   InsertZero="0"&M
else
   InsertZero=M
end if
end function     

function GetDate(D)
GetDate=DatePart("m",D)&"月"&InsertZero(DatePart("d",D))&"日"
end function
%>