Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Несколько вопросов по VBA. / 7 сообщений из 7, страница 1 из 1
05.01.2004, 10:05
    #32368304
# Darth Vader #
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Несколько вопросов по VBA.
Всех с новых годом!

Вопрос 1.

Как проверить существует файл/папка на диске или нет?

Вопрос 2.

Как определить количество файлов в папке?

Вопрос 3.

Заказчик хочет, чтобы фото клиентов хранились только в базе. Т.е в виде файлов на диске их быть не должно. Я ему втираю, что это в общем геморрой.
Если хранить фото в виде OLE , размер базы просто будет непристойный. Может в отдельном mdb хранить фото клиентов? Заказчик хочет, чтобы фото можно было смотреть только из базы.
...
Рейтинг: 0 / 0
05.01.2004, 10:42
    #32368337
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Несколько вопросов по VBA.
1,2 Dir,FileSearch
3 Может.
...
Рейтинг: 0 / 0
05.01.2004, 11:10
    #32368366
# Darth Vader #
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Несколько вопросов по VBA.
2 Shark
Да нет, не это мне нужно.

Как это через VBA сделать?

Вообще очень содержательный ответ.
...
Рейтинг: 0 / 0
05.01.2004, 11:36
    #32368379
# Darth Vader #
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Несколько вопросов по VBA.
Видать многие еще отходят от праздников.
...
Рейтинг: 0 / 0
05.01.2004, 11:45
    #32368390
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Несколько вопросов по VBA.
Достаточно содержательный ответ содержится в Help по функции Dir.
Как вам уже и ответили.
...
Рейтинг: 0 / 0
05.01.2004, 12:00
    #32368403
Лифчик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Несколько вопросов по VBA.
Есть еще бибилиотека Microsoft Scripting Runtime, а при ней всякие файловые объекты:\r
Код: plaintext
1.
2.
3.
4.
Dim objFSO As FileSystemObject\r
Dim objFiles as Files\r
Set objFSO = New FileSystemObject\r
Set objFiles = objFSO.GetFolder(FolderPath).Files\r
objFiles.Count \'дает число файлов в папке
\r
а упомянутая акулой ф-я Dir вернет нулевую строку (файл отсутствует), если обратиться с путем на несуществующий файл.\r
\r
А форумляне постепенно просыпаются и переходят к следующим \r
"пунктам меню"
...
Рейтинг: 0 / 0
05.01.2004, 14:27
    #32368564
# Darth Vader #
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Несколько вопросов по VBA.
Спасибо.
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Несколько вопросов по VBA. / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]