Deambulando

Hoy un fotolog me ha recordado esta canción ;)

Letra
Seguir leyendo…

Los egipcios tenían una creencia materialista sobre la vida después de la muerte. Acompañaban las sepulturas de sus difuntos con sus bienes materiales apara que pudieran disfrutar de ellos en el más allá. Algo parecido recuerdan las siguientes imágenes pertenecientes a un entierro gitano. Con televisión de plasma y DVD incluidos, al muerto no le va a faltar de nada.

Seguir leyendo…

Bueno una función de estas útiles , extraído de la wikipedia y reprogramado por mí xD

se usa  isSemanaSanta(”23/04/2008″)

function isSemanaSanta(Fecha)‘le pasas una fecha y te dice si cae en semana santa
dim FechaDomingoSanto,FechaInicio,FechaFin

Fecha=cdate(Fecha)
FechaDomingoSanto=cdate(obtenerDomingoSanto(year(fecha)))
‘para barcelona
FechaInicio=dateadd(”d”,-2,FechaDomingoSanto)’acaba en el lunes de pascua
FechaFin=dateadd(”d”,1,FechaDomingoSanto)’comienza en viernes santo
‘resto españa
‘FechaInicio=dateadd(”d”,-3,FechaDomingoSanto)’comienza en jueves santo
‘FechaFin=FechaDomingoSanto’acaba el mismo domingo
‘rw FechaInicio & FechaFin
if Fecha>=FechaInicio and Fecha<=FechaFin then
isSemanaSanta=true’es semana santa
else
isSemanaSanta=false’sino esta en rango no es semana santa
end if

end function
Seguir leyendo…