Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: папочки Добавлено: 15.09.03 22:32  

Автор вопроса:  ZoomerSD | ICQ: 148640473 
подскажите пожалуйста, как мне программно получить имена всех подпапок в паке, и чтобы туда не лезли ярлыки, с функцией DIR это не получаеться. Ктонить помогите.

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #1
Добавлено: 16.09.03 09:04
С функцией dir всё нормально получается. Только там надо флаг
поставить vbDirectory.

А вообще синтаксис функции Dir мне совсем не нравится... Вот в .NET
намного красивее получается - путём вызова
IO.DirectoryInfo.GetDirectories получаем массив с именами подпапок.

Ответить

Номер ответа: 2
Автор ответа:
 crackoff



ICQ: 156165990 

Вопросов: 12
Ответов: 229
 Профиль | | #2 Добавлено: 16.09.03 13:17

Подключай microsoft scripting runtime (scrrun.dll) и делай так:

Dim fso As New FileSystemObject, fld As Folder, fl1
Set fld = fso.GetFolder("c:\windows")
For Each fl1 In fld.SubFolders
    MsgBox fl1.Path
Next

Ответить

Номер ответа: 3
Автор ответа:
 ZoomerSD



ICQ: 148640473 

Вопросов: 135
Ответов: 270
 Профиль | | #3 Добавлено: 16.09.03 21:49

Павел, даже если указать в функции Dir аттрибут vbDirectory , всё-равно масив будет с ярлыками (*.lnk) уже проверял., а вот код, который дал sKit , работает.

И ещё, неохота писать новую тему, но после того, как сделали ForumByEmail, ко мне перестали приходить ответы на вопросы.(Информация к размышлению)

Ответить

Номер ответа: 4
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #4
Добавлено: 17.09.03 10:49
> И ещё, неохота писать новую тему, но после того, как сделали ForumByEmail
Такого быть не должно... Мне, например, сейчас присылаются и ответы и
сообщения из ForumByEmail. Проверь настройки в профиле.

Ответить

Номер ответа: 5
Автор ответа:
 ZoomerSD



ICQ: 148640473 

Вопросов: 135
Ответов: 270
 Профиль | | #5 Добавлено: 17.09.03 17:00
в профиле, всё стоит, так-что тут дело не во мне а в сервере

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам