ACCESS: Выборка SELECT

[fyedor]

LittleFatCat, скорее всего неправильно...это я узнаю сколько столбцов рассматривается в запросе...

Как можно проверить количество строк в рекордсете?

[LittleFatCat]

Доброго времени суток!

Нет, это количество полей в одной записи... :-)
Количество записей в рекордсете - это что-то типа .RecordCount
Если Вы говорите о 3-х значениях, то должно быть три записи...
Можно попробовать напрямую проинициализировать рекордсет -
.MoveLast
.MoveFirst
перед тем как к нему обращаться для считывания значения
я пока использую старое доброе DAO, c напрямую созданными рекордсетами :-) Если у Вас ADO, то может отличаться оператор подсчета строк.. Но по-моему он такой же...

[LittleFatCat]

А вообще в работе использую вот такую функцию для определения количества строк в рекордсете любого типа

Function CountRec(r As DAO.Recordset) As Long
'-----------------------------
'  Определяет кол-во записей в объекте Recordset
'-----------------------------
Dim BMark As String
 If r.Type = dbOpenTable Then
    CountRec = r.RecordCount
 Else
    If r.RecordCount = 0 Then
       CountRec = 0
    Else
       r.MoveFirst
       BMark = r.Bookmark
       r.MoveLast
       CountRec = r.RecordCount
       r.Bookmark = BMark
    End If
 End If
Exit Function
End Function

Ни разу еще меня не подводила :-), не моя к сожалению, но за давностью уже не помню откуда взял :-)

[gluk_fm]

Добрый день.
Что Вы подразумеваете под обращением к нем? Обращение к выбранному в форме полю или Вы подразумеваете перебор записей в самом рекордсете?

Если второе:

dim db as database
set db = currentdb
Set PPStrSQL = db.openrecordset("SELECT УЛИЦА FROM ЧИСЛОЖИТЕЛЕЙПОКВАДРАТАМГОРОД WHERE Квадрат = 51;")

PPStrSQL.movefirst
do until PPStrSQL.EOF
'показывает чему на данный момент равно значение в рекордсете
p = PPStrSQL![УЛИЦА]


PPStrSQL.move next
loop

Проходите это дело по Ф8 и направляя на "Р" смотрите чему равно значение

[fyedor]

LittleFatCat, gluk_fm,

Спасибо Вам, разобрался.

Использовал последний вариант gluk_fm.