Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/08/2004, 17:08
Avatar de Boxmaster
Boxmaster
 
Fecha de Ingreso: agosto-2004
Ubicación: Ahorita... frente a mi PC
Mensajes: 74
Antigüedad: 20 años, 9 meses
Puntos: 0
Exclamación Mostrar fechas con diferente color

Saludos

Estoy realizando un trabajo que permite ver cuando una fecha esta vencida o si hay dias de tolerancia. El problema es cuando quiero mostrar las fechas desde una base de datos y al realizar la comparacion con DateDiff no puedo conseguir que las fechas vencidas cambien a un color en rojo, y cuando estan en tolerancia que permanezcan al color que tenian anteriormente.

Les muestro parte del codigo, espero que alguien me pueda ayudar, y de antemano les agradezco a todos los de este foro por sus comentarios.

<% Dim Fecha
Fecha = rs.fields("Fecha_Entrega")
'Response.Write Fecha
Diferencia=DateDiff("d", Date, Fecha)
'Response.Write Diferencia
If Diferencia - Fecha Then
Response.Write "<font color=""Red"" size=""1"" face=""Verdana"""
Response.Write Diferencia"</font>"
End If
Else
If Diferencia > Fecha Then
Response.Write "<font color=""Black"" size=""1"" face=""Verdana"""
Response.Write Diferencia"</font>"
End If
%>

Gracias