Freigeben über

Kapitel 3: Untersuchen von Daten

  • Artikel

Gilt für: Access 2013, Office 2013

In Kapitel 2 wird erläutert, wie Sie Daten aus einer Datenquelle als Recordset -Objekt abrufen können. Dieses Kapitel beschreibt das Recordset -Objekt detaillierter und erklärt, wie Sie das Recordset -Objekt und seine Daten in einer Schleife durchlaufen.

Recordset -Objekte haben Methoden und Eigenschaften, die es erleichtern, sie zu durchlaufen und ihre Inhalte zu überprüfen. Abhängig von der vom Anbieter unterstützten Funktionalität sind einige Recordset -Methoden oder -Eigenschaften möglicherweise nicht verfügbar. Im folgenden Codebeispiel mit einem von der Northwind-Beispieldatenbank auf Microsoft SQL Server 2000 zurückgegebenen Recordset -Objekt wird die Verwendung des Recordset -Objekts genauer beschrieben:

 
'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

Diese SQL-Abfrage gibt ein Recordset -Objekt mit fünf Zeilen (Datensätzen) und drei Spalten (Feldern) zurück. Die Werte für die einzelnen Zeilen sind in der folgenden Tabelle aufgelistet.

FELD 0
Name = ProductID

FELD 1
Name = ProductName

FELD 2
Name = UnitPrice

7

Uncle Bob's Organic Dried Pears

30.0000

14

Tofu

23.2500

28

Rssle Sauerkraut

45.6000

51

Manjimup Dried Apples

53.0000

74

Longlife Tofu

10.0000

Im nächsten Abschnitt wird erläutert, wie Die aktuelle Position des Cursors in diesem Recordset-Beispiel gesucht wird.

In diesem Kapitel werden die folgenden Themen behandelt: