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

Вопрос 1.

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

Вопрос 2.

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

Вопрос 3.

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

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

Вообще очень содержательный ответ.
...
Рейтинг: 0 / 0
Несколько вопросов по VBA.
    #32368379
Фотография # Darth Vader #
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Видать многие еще отходят от праздников.
...
Рейтинг: 0 / 0
Несколько вопросов по VBA.
    #32368390
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Достаточно содержательный ответ содержится в Help по функции Dir.
Как вам уже и ответили.
...
Рейтинг: 0 / 0
Несколько вопросов по VBA.
    #32368403
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть еще бибилиотека 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
Несколько вопросов по VBA.
    #32368564
Фотография # Darth Vader #
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо.
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Несколько вопросов по VBA.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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