Как я получаю список всех имен файлов в каталоге с помощью VB6?

Таким образом, я разместил тот же вопрос на официальном форуме eltex, и они сказали, что сервер автоматической настройки, используемый моим провайдером, вызывает откат. Они попросили моего провайдера связаться, чтобы они могли позаботиться об этом. Я обновлю этот вопрос, как только он будет решен.

Ура.

8
задан Ray Vega 15 November 2008 в 00:19
поделиться

2 ответа

sFilename = Dir(sFoldername)

Do While sFilename > ""

  debug.print sFilename 
  sFilename = Dir()

Loop
16
ответ дан 5 December 2019 в 05:19
поделиться

Решение ди-джея является простым и эффективным, просто выведя другой в случае, если Вам нужно немного больше функциональности, которую FileSystemObject может обеспечить (требует ссылки на Microsoft Scripting Runtime).

Dim fso As New FileSystemObject
Dim fil As File

For Each fil In fso.GetFolder("C:\").Files
  Debug.Print fil.Name
Next
4
ответ дан 5 December 2019 в 05:19
поделиться
Другие вопросы по тегам:

Похожие вопросы: