sur une page asp, j'aimerais simplement afficher les images d'un dossier précis (contenu que des images et non des dossiers).
Avec le code suivant, il m'affiche le bon chemin (xxx/images/) mais j'aimerais qu'il m'affiche les images dans le dossiers images. Cependant, il m'affiche les fichiers du dossiers juste avant images (pas très compréhensible mon truc).
Ayant repris un code source et modifié moi-meme, j'ai de la peine à comprendre mon erreur, alors je vous sollicite    
 
<% Set objFs = Server.CreateObject("Scripting.FileSystemObject" )    
   chemin = Server.MapPath("./images/" )  
   set objDossier = objFs.getFolder(chemin)  
%>
<%= chemin %>
<table>
<% For each Fichier in objDossier.Files %>
   <tr>
     <td><img src=<%=Fichier.name%>></td>
   </tr>
<% Next %>
</table>

arf j'ai trouvé mon erreur, quelle nulle je suis    
si je précise dans la source de l'image le dossier images ca va mieux marcher  

bon je profite de ce topic inutile pour une autre erreur qui m'arrive avec SmartUpload.
J'utilise le script suivant:
 
<%
response.expires=0
response.buffer=true
On error resume next
 
Dim mySmartUpload
Dim file
 
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload" )
mySmartUpload.MaxFileSize = 5000000
mySmartUpload.AllowedFilesList = "gif,jpg"
mySmartUpload.Upload
For each file In mySmartUpload.Files
  If not file.IsMissing Then
    fichier="../images/nuku" & numero1 & "." & file.FileExt
  file.SaveAs(fichier)
  End If
Next
Set mySmartUpload=nothing
 
if err.number =0 then
direc= "img.asp?msg=pasdeprobleme"
else
direc="img.asp?msg=Une erreur s'est produite, réessayez"
end if
response.redirect direc
%>
 
script que j'ai pompé sur un site de développement. Le problème est que mon script fonctionne très bien, respecte les tailles et les extensions de fichiers. le truc, c'est que meme s'il revient sur img.asp avec le message "pas de problème", le fichier n'est cependant pas uploadé.

up  

heu j'ai peut-être pas tout suivit là mais comment tu envois le fichier au serveur ???? Tu fais un "form" ???

j'ai trouvé un autre code source, et ca fonctionne mystérieusement    
voici le code si ca intéresse qqun:
 
<%
      On error resume next
      Dim Objet_SmartUpload
      Dim Fichier
      Dim i
      i = 0
      Set Objet_SmartUpload = _
              Server.CreateObject("aspSmartUpload.SmartUpload" )
      Objet_SmartUpload.MaxFileSize = 5000000
      Objet_SmartUpload.AllowedFilesList = "gif,jpg"
      Objet_SmartUpload.Upload
      For each Fichier In Objet_SmartUpload.Files
        If not Fichier.IsMissing Then
          Fichier.SaveAs("../images/" & "nuku" & numero2 & "." & Fichier.FileExt)
          i = i + 1
        End If
      Next
      IF err.number=0 THEN
        Response.Redirect "../images.asp"
      ELSE
        Response.Write "Une erreur est survenue"
      END IF
    %>
 
le script prend donc en charge les fichier jpg et gif, jusqu'à 5Mo. Autrement, il affiche une erreur. la variable numero2 est reprise des fichiers présents sur le serveur et incrémenté pour le nouveau fichier à enregistrer. (ché pas si vous avez compris mais bon). J'ai mixé 2 code source pour obtenir ca