Índice
Esto es lo mismo que lo del ejemplo anterior,
pero simplificando la cosa y sin usar ninguna función extra.
Hay dos formas de hacerlo: con JavaScript y con VBScript. Si usas este último
lenguaje, que sepas que seguramente no servirá para el Netscape, más bien
sólo para el Internet Explorer.
El código JavaScript (JScript)
El código VBScript:
pero simplificando la cosa y sin usar ninguna función extra.
Hay dos formas de hacerlo: con JavaScript y con VBScript. Si usas este último
lenguaje, que sepas que seguramente no servirá para el Netscape, más bien
sólo para el Internet Explorer.
El código JavaScript (JScript)
- Código:
[font=Verdana][size=9]<Script language ="JavaScript">
<!--
var now = new Date()
var dia = now.getDay()
var mes = now.getMonth()
var fecha
//El día de la semana
if(dia==0){
fecha="Domingo, ";
}else if(dia==1){
fecha="Lunes, ";
}else if(dia==2){
fecha="Martes, ";
}else if(dia==3){
fecha="Miércoles, ";
}else if(dia==4){
fecha="Jueves, ";
}else if(dia==5){
fecha="Viernes, ";
}else{
fecha="Sábado, ";
}
fecha = fecha + now.getDate() + " de "
//El nombre del mes
if(mes==0){
fecha=fecha + "Enero"
}else if(mes==1){
fecha=fecha + "Febrero"
}else if(mes==2){
fecha=fecha + "Marzo"
}else if(mes==3){
fecha=fecha + "Abril"
}else if(mes==4){
fecha=fecha + "Mayo"
}else if(mes==5){
fecha=fecha + "Junio"
}else if(mes==6){
fecha=fecha + "Julio"
}else if(mes==7){
fecha=fecha + "Agosto"
}else if(mes==8){
fecha=fecha + "Septiembre"
}else if(mes==9){
fecha=fecha + "Octubre"
}else if(mes==10){
fecha=fecha + "Noviembre"
}else{
fecha=fecha + "Diciembre"
}
fecha = fecha + " del " + now.getYear()
document.write(fecha);
//-->
</Script>
[/size][/font]
El código VBScript:
- Código:
[font=Verdana][size=9]<SCRIPT LANGUAGE="VBScript">
<!--
d=weekday(date)
if d = 1 then
today="Domingo"
elseif d = 2 then
today="Lunes"
elseif d = 3 then
today="Martes"
elseif d = 4 then
today="Miercoles"
elseif d = 5 then
today="Jueves"
elseif d = 6 then
today="Viernes"
elseif d = 7 then
today="Sábado"
end if
m=month(date)
if m=1 then
mon="Enero"
elseif m=2 then
mon="Febrero"
elseif m=3 then
mon="Marzo"
elseif m=4 then
mon="Abril"
elseif m=5 then
mon="Mayo"
elseif m=6 then
mon="Junio"
elseif m=7 then
mon="Julio"
elseif m=8 then
mon="Agosto"
elseif m=9 then
mon="Septiembre"
elseif m=10 then
mon="Octubre"
elseif m=11 then
mon="Noviembre"
elseif m=12 then
mon="Diciembre"
end if
Document.Write today & ", " & day(now) & " " & mon
-->
</SCRIPT>[/size][/font]
