%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
function HoyEn()
dim sHoy, aHoy
aHoy = split(FormatDateTime(Now, 1),",")
sHoy = aHoy(1)
HoyEn = CStr(sHoy) & ", " & aHoy(2)
end Function
function HoyEs()
dim sMes
Select Case (Month(Now))
Case 1 sMes = "Enero"
Case 2 sMes = "Febrero"
Case 3 sMes = "Marzo"
Case 4 sMes = "Abril"
Case 5 sMes = "Mayo"
Case 6 sMes = "Junio"
Case 7 sMes = "Julio"
Case 8 sMes = "Agosto"
Case 9 sMes = "Septiembre"
Case 10 sMes = "Octubre"
Case 11 sMes = "Noviembre"
Case 12 sMes = "Diciembre"
End Select
HoyEs = Day(Now) & " de " & sMes & ", " & Year(Now)
end Function
%>
Nuevo (Puerto) Vallarta Hotels (Condos), Mexico !! Playa Del Sol Resort