Équivalent de Dir() en ASP

Winterrage Messages postés 1 Date d'inscription vendredi 25 janvier 2008 Statut Membre Dernière intervention 25 janvier 2008 - 25 janv. 2008 à 15:38
cs_ghuysmans99 Messages postés 3982 Date d'inscription jeudi 14 juillet 2005 Statut Membre Dernière intervention 30 juin 2013 - 25 janv. 2008 à 17:44
Bonjour à tous,

Je suis un débutant en ASP et j'aimerais connaitre un équivalent à la fonction Dir() en VB6.

Dans mon cas, je dois boucler dans un répertoire a la recherche de fichier rencontrant certains critères

Par exemple: En VB6 le dir est appellé comme

strFichier = Dir(strPath) ' Ou strPath est un chemin de recherche par exemple: C:\*.tx*

Ensuite boucler sur tout les fichiers
Do While strFichier <> ""
...
...
strFichier = Dir
Loop

J'aimerais connaitre s'il y a un équivalent en ASP :)

Merci beaucoup

1 réponse

cs_ghuysmans99 Messages postés 3982 Date d'inscription jeudi 14 juillet 2005 Statut Membre Dernière intervention 30 juin 2013 16
25 janv. 2008 à 17:44
Dim
FSO 'As Object 'New Scripting.FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")

Public Sub ListDirs(root)
 Dim File 'As Object 'Scripting.File
 Dim Dir 'As Object 'Scripting.Folder
 For Each File In FSO.GetFolder(root).Files
  Response.Write File.Name
  DoEvents
 Next
 For Each Dir In FSO.GetFolder(root).SubFolders
  ListDirs Dir.Path
  DoEvents
 Next
End Sub ,

----

Colorisation syntaxique par Renfield


_______________________________________________________________________


VB.NET
is good ...
VB6
is better
0
Rejoignez-nous