Capítulo 3: Examen de datos
Se aplica a: Access 2013, Office 2013
El Capítulo 2 explicaba cómo se recuperan datos de un origen de datos en forma de objeto Recordset. En este capítulo se analizará con más detalle el objeto Recordset, incluyendo la forma de navegar a través de Recordset y ver sus datos.
Los objetos Recordset tienen métodos y propiedades que se diseñaron para facilitar el desplazamiento por ellos y examinar su contenido. En función de la funcionalidad admitida por el proveedor, algunas propiedades o métodos de Recordset pueden no estar disponibles. Para continuar explorando el objeto Recordset, considere un objeto Recordset que sería devuelto por la base de datos de ejemplo Neptuno en Microsoft SQL Server 2000, usando el código siguiente:
'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
Esta consulta SQL devuelve un objeto Recordset con cinco filas (registros) y tres columnas (campos). En la tabla siguiente se muestran los valores correspondientes a cada fila.
CAMPO 0 |
CAMPO 1 |
CAMPO 2 |
---|---|---|
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 |
En la sección siguiente se explica cómo buscar la posición actual del cursor en este conjunto de registros de ejemplo.
En este capítulo, se tratan los temas siguientes: