<%
	hoje = RIGHT("00" & day(now), 2) & "/" & RIGHT("00" & month(now),2) & "/" & year(now)
	hora = RIGHT("00" & hour(now), 2) & ":" & RIGHT("00" & minute(now),2) & ":" & second(now)
	function dt_date(str,dat)
	
		fcn_getDate = str

		dia = Right("00" & Day(dat), 2)
		mes = Right("00" & Month(dat), 2)
		
		fcn_getDate = replace(fcn_getDate,"dd",dia)
		fcn_getDate = replace(fcn_getDate,"mm",mes)
		if (LEN(str) = 8) then
			dt_date = replace(fcn_getDate,"yy",right(year(dat),2))
		else
			dt_date = replace(fcn_getDate,"yyyy",year(dat))
		end if
		
	end function
	
	function dt_time(str, hora)
		
		hr 	= Right("00" & hour(hora), 2)
		min = Right("00" & minute(hora), 2)
		sec = Right("00" & second(hora), 2)
		dt_time = str
		dt_time = replace(dt_time,"h",hr) : dt_time = replace(dt_time,"m",min) : dt_time = replace(dt_time,"s",sec)
		
	end function
%>