Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Пустой (?) DAO.Recordset... / 5 сообщений из 5, страница 1 из 1
05.03.2004, 11:33
    #32432387
ThuG
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пустой (?) DAO.Recordset...
strSQL1 = "SELECT * FROM [TABLE1] WHERE [FIELD1] = '" & Me![Field1] & "';"
Set rsSource1 = CurrentDb.OpenRecordset(strSQL1)

Как отловить ситуацию, когда этот запрос не найдет ничего в таблице?

"If RecordCount = 0 Then" не подходит, поскольку даже если в таблице нет строк, удовлетворяющих условию, в результате выдается таблица с одной пустой строкой, и в этом случае RecordCound = 1.
...
Рейтинг: 0 / 0
05.03.2004, 11:38
    #32432407
АлексейК
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пустой (?) DAO.Recordset...
а если одна строка есть ?

то две? существующая и новая?

так пойдет?

If RecordCount = 1
...
Рейтинг: 0 / 0
05.03.2004, 11:43
    #32432420
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пустой (?) DAO.Recordset...
If rsSource1.Eof() and rsSource1 .BOF Then
'нихрена нет
else
'хрен есть
end if
...
Рейтинг: 0 / 0
05.03.2004, 15:46
    #32432936
NEO_13
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пустой (?) DAO.Recordset...
Можно ксати, как вариант воспользоваться функцией DLookup.
Если она ничего не находит то возвращает Null

К примеру:
If Not IsNull (DLookup ("FIELD1";"TABLE1";"FIELD1 = " & Me![Field1])) Then
strSQL1 = "SELECT * FROM [TABLE1] WHERE [FIELD1] = '" & Me![Field1] & "';"
Set rsSource1 = CurrentDb.OpenRecordset(strSQL1)
Else
MsgBox "Ничего не нашел"
End If

Собственно как вариант, можно и без этого обойтись
Мы в этом мире только батарейки...
...
Рейтинг: 0 / 0
05.03.2004, 15:55
    #32432956
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пустой (?) DAO.Recordset...
А ещё есть ф-я DCount :)

Сделать можно всё!!!
Только бы знать как...
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Пустой (?) DAO.Recordset... / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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