Date

Signaler
-
 Cedric -
comment fair pour avoir une zone de liste qui comporte les jours avec la date du jour acctuelle selectionner et une autre avec les mêmes caractéristiques mais pour les mois ???
Merçi d'avance pour vos aides!!!!!

1 réponse

<%
dim jour,mois,i,liste_mois(12)
jour=day(Now)
mois=Month(Now)

liste_mois(1)="Janvier"
liste_mois(2)="Fevrier"
liste_mois(3)="Mars"
liste_mois(4)="Avril"
liste_mois(5)="Mai"
liste_mois(6)="Juin"
liste_mois(7)="Juillet"
liste_mois(8)="Aout"
liste_mois(9)="Septembre"
liste_mois(10)="Octobre"
liste_mois(11)="Novembre"
liste_mois(12)="Decembre"

%>
<SELECT NAME="liste_jour">
<%
for i=1 to 31
if i=jour then
response.write "<option SELECTED value=" & i & ">" & i &"</option>"
else
response.write "<option value=" & i & ">" & i &"</option>"
end if
next
%>
</SELECT>
<SELECT NAME="liste_jour">
<%
for i=1 to 12
if i=mois then
response.write "<option SELECTED value=" & i & ">" & liste_mois(i) & "</option>"
else
response.write "<option value=" & i & ">" & liste_mois(i) & "</option>"
end if
next
%>