Поделиться через


Глава 3. Изучение данных

Область применения: Access 2013, Office 2013

В главе 2 объясняется, как получить данные из источника данных в виде объекта Recordset . В этой главе более подробно рассматривается набор записей , в том числе как перемещаться по набору записей и просматривать его данные.

Наборы записей имеют методы и свойства, позволяющие легко перемещаться по ним и просматривать их содержимое. В зависимости от функциональных возможностей, поддерживаемых поставщиком, некоторые методы или свойства Recordset могут быть недоступны. Чтобы продолжить изучение объекта Recordset, рассмотрите набор записей, который будет возвращен из образца базы данных Northwind в Microsoft SQL Server 2000, используя следующий код:

 
'BeginRsTour 
Public Sub RecordsetTour() 
 On Error GoTo ErrHandler: 
 
 Dim objRs As New ADODB.Recordset 
 Dim strSQL As String 
 
 strSQL = "SELECT ProductID, ProductName, UnitPrice FROM Products " & _ 
 "WHERE CategoryID = 7" '7 = Produce 
 
 objRs.Open strSQL, strConnStr, adOpenForwardOnly, _ 
 adLockReadOnly, adCmdText 
 
 'Clean up 
 objRs.Close 
 Set objRs = Nothing 
 Exit Sub 
 
ErrHandler: 
 If Not objRs Is Nothing Then 
 If objRs.State = adStateOpen Then objRs.Close 
 Set objRs = Nothing 
 End If 
 
 If Err <> 0 Then 
 MsgBox Err.Source & "-->" & Err.Description, , "Error" 
 End If 
End Sub 
'EndRsTour 

Этот SQL-запрос возвращает набор записей с пятью строками (записями) и тремя столбцами (полями). Значения для каждой строки показаны в следующей таблице.

ПОЛЕ 0
Имя = ProductID

ПОЛЕ 1
Name = ProductName

ПОЛЕ 2
Name = UnitPrice

7

Органические сушеные груши дяди Боба

30.0000

14

Тофу

23.2500

28

Rssle Sauerkraut

45.6000

51

Манджимуп сушеные яблоки

53.0000

74

Longlife Tofu

10.0000

В следующем разделе объясняется, как найти текущее положение курсора в этом примере набора записей.

В этой главе рассматриваются следующие темы: