Bonjour,
 
je dois ecrire un script en asp qui selon la date systeme, il affiche les fichiers d'un repertoire, c'est à dire si l'année est 2004 il va dans le repertoire 2004 puis si le mois est juillet il va dans le repertoire 7.
 
seulement j'ai aucune idée de la manière dont je peux ecrire ce code je me suis renseignée sur les variables des dates (year , month), mais je vois pas comment démarrer. c'est l'un de mes premiers codes en asp, si qq un peut m'aider
 
merci  

Response.redirect()

oui , merci  
mais comment je fais pour recuperer ce que renvoi les variables year et month pour ouvrir le repertoire en consequence.
 

 
poste ce que tu as fais déjà

 
en fait j'ai juste coder la partie qui sert a lister les fch du repertoire je n'ai rien fait pour ce qui concerne le test de la date car je vois vraiment pas
 
dsl  
 
 
<%  
dim fs, folder, file, item, url
set fs = CreateObject("Scripting.FileSystemObject" )
dir= Server.MapPath("./" )
Set folder= fs.GetFolder(dir)
 
'affiche la liste des fichiers pdf
for each item in folder.Files
 If Right(item.Name, "4" ) = ".PDF" Then
 %> <center> <% Response.Write("<a href=" & item.Name & " >" & item.Name & " </a>" )
 END IF
%> <br></center> <%
next %>
 

va falloir que tu utilise un peu google...
 
http://www.asp-php.net/tutorial/scripting/dates.php

 
 
ok merci de ton aide  

 
Apres etre allé sur plusieurs site j'ai reussi à ecrire le code suivant  
 
<%
 
dim mois, annee
'Récupération du numéro correspondant au mois
mois=month(now)
'récuperation de l'année
annee=year(now)
 
 
response.redirect"http://192.168.36.15/IFR/"& annee &"/"& mois &"/mois.asp"
%>
 
cette premiere page renvoi donc sur une page mois.asp le probleme de la page qui suit est que si le repertoire est vide (qu'il ne contient pas de fch pdf) il doit automatiquement rediriger sur le mois d'avant.
mais voilà la redirection ne marche pas et j'ai l'impression que le probleme vient de la boucle if. j'ai essayé plusieurs conditions et parametres a passer en test mais la redirection ne se fait tjs pas.
est ce que qqun aurait une petite idée?
 
 
 
<%  
 
dim fs, folder, file, item, url
dim mois, annee
set fs = CreateObject("Scripting.FileSystemObject" )
dir= Server.MapPath("./" )
Set folder= fs.GetFolder(dir)
 
'test si le repertoire est vide
 
if ("item.Name" ) = "NULL" Then
 
annee=year(now)
mois=month(now)
mois= mois - 1
 
response.redirect"http://??.??.??.??/IFR/"& annee &"/"& mois &"/mois.asp"
 
Else
 
for each item in folder.Files
 If Right(item.Name, "4" ) = ".PDF" Then
 %> <center> <% Response.Write("<a href=" & item.Name & " >" & item.Name & " </a>" )
 END IF
%> <br></center> <%
next
end if
 %>

 
 
J'ai résolu mon pb en ajoutant un compteur ....    
 
merci a tous