05/12/2002, 16:14
|
 | | | Fecha de Ingreso: enero-2002 Ubicación: Monterrey
Mensajes: 2.454
Antigüedad: 23 años, 3 meses Puntos: 5 | |
A ver si te sirve esta funcion que hice... solo cambiala a tu conveniencia.
Recibe dos variables, "cuando" es la fecha que quieres desplegar, pudiendo se Now(), y "forma" decide si es forma larga o corta de la fecha.
Código:
function fechaEsp(cuando,forma)
Dim meses
Dim dias
meses= Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre")
dias= Array("Domingo","Lunes","Martes","Miércoles","Jueves","Viernes","Sábado")
If forma=1 Then
response.write dias(Weekday(cuando)-1)&" "&Day(cuando)&" de "&meses(month(cuando)-1)&" de "&year(cuando)
Else
response.write meses(month(cuando)-1)&" "&Day(cuando)
End If
End Function
__________________
Manoloweb |