|
|
|
Пустой (?) DAO.Recordset...
|
|||
|---|---|---|---|
|
#18+
strSQL1 = "SELECT * FROM [TABLE1] WHERE [FIELD1] = '" & Me![Field1] & "';" Set rsSource1 = CurrentDb.OpenRecordset(strSQL1) Как отловить ситуацию, когда этот запрос не найдет ничего в таблице? "If RecordCount = 0 Then" не подходит, поскольку даже если в таблице нет строк, удовлетворяющих условию, в результате выдается таблица с одной пустой строкой, и в этом случае RecordCound = 1. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.03.2004, 11:33 |
|
||
|
Пустой (?) DAO.Recordset...
|
|||
|---|---|---|---|
|
#18+
а если одна строка есть ? то две? существующая и новая? так пойдет? If RecordCount = 1 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.03.2004, 11:38 |
|
||
|
Пустой (?) DAO.Recordset...
|
|||
|---|---|---|---|
|
#18+
If rsSource1.Eof() and rsSource1 .BOF Then 'нихрена нет else 'хрен есть end if ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.03.2004, 11:43 |
|
||
|
Пустой (?) DAO.Recordset...
|
|||
|---|---|---|---|
|
#18+
Можно ксати, как вариант воспользоваться функцией 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 Собственно как вариант, можно и без этого обойтись Мы в этом мире только батарейки... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.03.2004, 15:46 |
|
||
|
|
start [/forum/topic.php?fid=45&tid=1676248]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
153ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
35ms |
get tp. blocked users: |
1ms |
| others: | 200ms |
| total: | 430ms |
| 0 / 0 |
