Foros del Web » Programando para Internet » ASP Clásico »

Holidays-mostrar Mensaje En Esa Fecha

Estas en el tema de Holidays-mostrar Mensaje En Esa Fecha en el foro de ASP Clásico en Foros del Web. Hola amigos, me gustaría sacar lo siguiente pero no sé como empezar. Que en una página se mostrara el contenido de una capa dependiendo del ...
  #1 (permalink)  
Antiguo 22/10/2003, 10:57
Avatar de epa2  
Fecha de Ingreso: abril-2002
Ubicación: Málaga
Mensajes: 1.475
Antigüedad: 22 años, 2 meses
Puntos: 9
Holidays-mostrar Mensaje En Esa Fecha

Hola amigos, me gustaría sacar lo siguiente pero no sé como empezar.

Que en una página se mostrara el contenido de una capa dependiendo del día que es, me refiero, a programar en una rutina o crear un función, yo que ché, para que los días 25 de diciembre y el 1 de enero se mostrara el contenido de una capa
en la página.

Por supuesto, los demás dias esta capa no se mostraría, y la fecha al tratarse de asp se cogería del Server.

¿Alguna idea de por donde empezar?


Espero ansioso, je je
__________________

***Aprendiz de todo y maestro de nada***
  #2 (permalink)  
Antiguo 22/10/2003, 12:19
Avatar de Cbas  
Fecha de Ingreso: enero-2002
Ubicación: capital federal
Mensajes: 437
Antigüedad: 22 años, 5 meses
Puntos: 2
Si lo querés ebn funcíón podría ser así:


Function CheckFecha()

'Para el 25 de Diciembre
if day(Date) = 25 AND Month(Date) = 12 Then
response.write "MOSTRAR CAPA DEL DIA 25 de Diciembre"
END

'Para el 1 de Enero
if day(Date) = 1 AND Month(Date) = 1 Then
response.write "MOSTRAR CAPA DEL DIA 1º de Enero."
END

End Function

espero que sea esto lo que precisas y que te sirva...

SALUDOS
__________________
La Perfección es enemigo de lo bueno.
  #3 (permalink)  
Antiguo 23/10/2003, 04:29
Avatar de epa2  
Fecha de Ingreso: abril-2002
Ubicación: Málaga
Mensajes: 1.475
Antigüedad: 22 años, 2 meses
Puntos: 9
Gracias Chas, tan sencillo y tan fácil al mismo tiempo, ¿como no se me había ocurrido?

Lo voy a probar ahora mismo.

__________________

***Aprendiz de todo y maestro de nada***
  #4 (permalink)  
Antiguo 23/10/2003, 10:44
Avatar de epa2  
Fecha de Ingreso: abril-2002
Ubicación: Málaga
Mensajes: 1.475
Antigüedad: 22 años, 2 meses
Puntos: 9
Un momento amigo, un colega me acaba de pasar este código, y puede ser que sea lo que esté buscando...

pero me da error en la linea 5 DICIENDOME QUE SE ESPERABA UNA CONSTANTE ENTERA. ¿queeeeeee????

¿pero esto es cachondeo o es cachondeo????
¿se está quedando conmigo el ordenador??????
¿constante entera???????

el error es.....

Error de compilación de Microsoft VBScript error '800a0402'

Se esperaba una constante entera


dim dia_festivo(NUM_DIAS)
----------------^

bueno, os paso el código para que me echeis una manilla con él. He estado repasando la documentación del msd con las constantes,pero nada de nada....


Código:
<%
'Número de dias festivos.
public const NUM_DIAS = 12

dim dia_festivo(NUM_DIAS)
dim mes_festivo(NUM_DIAS)

'Definición de dias festivos.
Public Sub CargarDiasFestivos()

	
	dia_festivo(1) = 1 : mes_festivo(1) = 1
	dia_festivo(2) = 6 : mes_festivo(2) = 1
	dia_festivo(3) = 28 : mes_festivo(3) = 2
	dia_festivo(4) = 8 : mes_festivo(4) = 4
	dia_festivo(5) = 9 : mes_festivo(5) = 4
	dia_festivo(6) = 1 : mes_festivo(6) = 5
	dia_festivo(7) = 16 : mes_festivo(7) = 8
	dia_festivo(8) = 12 : mes_festivo(8) = 10
	dia_festivo(9) = 2 : mes_festivo(9) = 11
	dia_festivo(10) = 6 : mes_festivo(10) = 12
	dia_festivo(11) = 8 : mes_festivo(11) = 12
	dia_festivo(12) = 25 : mes_festivo(12) = 12
End Sub


Public Sub MostrarDiaFestivo()
Dim dia
	For dia=0 To NUM_DIAS-1
		If Day(Date)=dia_festivo(dia) And Month(Date)=mes_festivo(dia) Then
			MostrarDiaFestivo = "El dia " & dia_festivo(dia) & " es festivo." & _
			"El mes es " & mes_festivo(dia)
		End If
	Next
End Sub
%>
este archivo lo guardo como festivos.inc y luego le hago en otra página un include <!-- #include file ="festivos.inc" -->

y también en la misma página le pongo que escriba el valor la variable del bucle

<%= MostrarDiaFestivo %>

pero nada,


ayudaaaaaaa..
__________________

***Aprendiz de todo y maestro de nada***
  #5 (permalink)  
Antiguo 24/10/2003, 03:40
Avatar de epa2  
Fecha de Ingreso: abril-2002
Ubicación: Málaga
Mensajes: 1.475
Antigüedad: 22 años, 2 meses
Puntos: 9
Bueno, en fin

de momento estoy solito

seguiré investigando a ver si lo saco
__________________

***Aprendiz de todo y maestro de nada***
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 00:37.