<%
Function getCurDate(pDate, pSplit)
getCurDate = Year(pDate) & pSplit & Right("0" & Month(pDate), 2) & pSplit & Right("0" & Day(pDate), 2)
End Function
Response.Write getCurDate(Now(), ".") & "<BR>"
Response.Write getCurDate(CDate("2009년 1월 7일"), "") & "<BR>"
%>
Function getCurDate(pDate, pSplit)
getCurDate = Year(pDate) & pSplit & Right("0" & Month(pDate), 2) & pSplit & Right("0" & Day(pDate), 2)
End Function
Response.Write getCurDate(Now(), ".") & "<BR>"
Response.Write getCurDate(CDate("2009년 1월 7일"), "") & "<BR>"
%>