Discussion :

[Sardonnen]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
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
 
 cal_action.SelectedDates.Add(CType(dbread.GetString(0),DateTime).ToString("dd/MM/yyyy"))
 
End While

Mais le problème est que c'est le dernier argument passé au SelectedDayStyle qui est appliqué sur toutes les dates
que dois je faire?????

[Sardonnen]

je viens de trouver la solution à mon pb, je la publie si cela peut servir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
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
 
  End While

dans la page

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<asp:calendar id="cal_action" runat="server" borderwidth="1px" backcolor="#eeeded" width="40px" daynameformat="Short" forecolor="#000000" height="40px" font-size="7pt" font-names="arial" bordercolor="#aaaaaa" showgridlines="True" tooltip="Sélectionner une date" NextPrevFormat="ShortMonth" OnDayRender="cal_dayrender" />