Sardonnen
Messages postés89Date d'inscriptionlundi 29 avril 2002StatutMembreDernière intervention 6 décembre 2006
-
17 nov. 2005 à 18:12
Sardonnen
Messages postés89Date d'inscriptionlundi 29 avril 2002StatutMembreDernière intervention 6 décembre 2006
-
18 nov. 2005 à 10:15
bonjour,
je voudrais affecter une couleur de fond sur des dates antérieures à aujourd'hui et une autre sur des dates postérieures à ce même jour. J'ai essayé ceci
While dbread.Read()
if CType(dbread.GetString(0),DateTime).ToString("dd/MM/yyyy") < today() then
cal_action.SelectedDayStyle.BackColor = System.Drawing.Color.FromName("red")
else
cal_action.SelectedDayStyle.BackColor = System.Drawing.Color.FromName("green")
end if
Sardonnen
Messages postés89Date d'inscriptionlundi 29 avril 2002StatutMembreDernière intervention 6 décembre 2006 18 nov. 2005 à 10:15
je viens de trouver la solution à mon pb, je la publie si cela peut servir
private sub cal_dayrender(sender As Object, e As System.Web.UI.WebControls.DayRenderEventArgs)
' connection a la base de donnees oracle '
dim cn_string as string
dim dbconn,sql,dbcomm,dbread
cn_string=ConfigurationSettings.AppSettings("ebissa_cn")
dbconn=New OleDbConnection(cn_string)
dbconn.Open()
' requete liste des jours ou il y a une action '
sql="select to_char(date_rea) as date_rea FROM w_action order by date_rea"
dbcomm=New OleDbCommand(sql,dbconn)
dbread=dbcomm.ExecuteReader(CommandBehavior.CloseConnection)
While dbread.Read()
if CType(dbread.GetString(0),DateTime).ToString("dd/MM/yyyy") < today() then
if e.day.date = CType(dbread.GetString(0),DateTime).ToString("dd/MM/yyyy") then
e.cell.backcolor = System.Drawing.Color.FromName("red")
end if
else
if e.day.date = CType(dbread.GetString(0),DateTime).ToString("dd/MM/yyyy") then
e.cell.backcolor = System.Drawing.Color.FromName("#00ff00")
end if
end if