Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Несколько вопросов по VBA.  [new]
# Darth Vader #
Member

Откуда: С ит колхоза
Сообщений: 7731
Всех с новых годом!

Вопрос 1.

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

Вопрос 2.

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

Вопрос 3.

Заказчик хочет, чтобы фото клиентов хранились только в базе. Т.е в виде файлов на диске их быть не должно. Я ему втираю, что это в общем геморрой.
Если хранить фото в виде OLE , размер базы просто будет непристойный. Может в отдельном mdb хранить фото клиентов? Заказчик хочет, чтобы фото можно было смотреть только из базы.
5 янв 04, 10:05    [480949]     Ответить | Цитировать Сообщить модератору
 Re: Несколько вопросов по VBA.  [new]
Shark
Member

Откуда:
Сообщений: 2365
1,2 Dir,FileSearch
3 Может.
5 янв 04, 10:42    [480987]     Ответить | Цитировать Сообщить модератору
 Re: Несколько вопросов по VBA.  [new]
# Darth Vader #
Member

Откуда: С ит колхоза
Сообщений: 7731
2 Shark
Да нет, не это мне нужно.

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

Вообще очень содержательный ответ.
5 янв 04, 11:10    [481028]     Ответить | Цитировать Сообщить модератору
 Re: Несколько вопросов по VBA.  [new]
# Darth Vader #
Member

Откуда: С ит колхоза
Сообщений: 7731
Видать многие еще отходят от праздников.
5 янв 04, 11:36    [481044]     Ответить | Цитировать Сообщить модератору
 Re: Несколько вопросов по VBA.  [new]
Serge Gavrilov
Member

Откуда:
Сообщений: 3248
Достаточно содержательный ответ содержится в Help по функции Dir.
Как вам уже и ответили.
5 янв 04, 11:45    [481056]     Ответить | Цитировать Сообщить модератору
 Re: Несколько вопросов по VBA.  [new]
Лифчик
Member

Откуда:
Сообщений: 1699
Есть еще бибилиотека Microsoft Scripting Runtime, а при ней всякие файловые объекты:
Dim objFSO As FileSystemObject

Dim objFiles as Files
Set objFSO = New FileSystemObject
Set objFiles = objFSO.GetFolder(FolderPath).Files
objFiles.Count 'дает число файлов в папке

а упомянутая акулой ф-я Dir вернет нулевую строку (файл отсутствует), если обратиться с путем на несуществующий файл.

А форумляне постепенно просыпаются и переходят к следующим
пунктам меню
5 янв 04, 12:00    [481079]     Ответить | Цитировать Сообщить модератору
 Re: Несколько вопросов по VBA.  [new]
# Darth Vader #
Member

Откуда: С ит колхоза
Сообщений: 7731
Спасибо.
5 янв 04, 14:27    [481300]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить