Équivalent de Dir() en ASP

Signaler
Messages postés
1
Date d'inscription
vendredi 25 janvier 2008
Statut
Membre
Dernière intervention
25 janvier 2008
-
Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
-
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

Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
14
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