| |
|
|
| | читая форум, я натыкался на то, что можно проверить есть записи в таблице или она пустая, но сейчас не могу найти эту тему.
подскажите как проверить есть записи или нет? и существует ли таблица или нет?
спасибо | |
| |
| |
| |
|
|
| |
Function isTB&(sFiled$, sTable$)
On Error Resume Next
isTB = DCount(sFiled, sTable)
End Function
|
?isTB("ша","детали")
9
?isTB("x","x")
0 | |
| |
| |
| |
|
|
| | Если вы уверены, что таблица существует, то можно проще:
If DCount("*", "[ИмяТаблицы]") > 1 Then
На большом объеме данных быстрее будет так:
If Not CurrentDB.OpenRecordset("SELECT TOP 1 * From [ИмяТаблицы]").BOF Then | |
| |
| |
