QueryAllRecords method

  • Article

Returns all the records (matched, unmatched, and skipped) in a data set as a Recordset object. Allows you to browse the returned records. Returns an error for DataSet objects with a HowCreated property of geoDataSetDemographic.

Applies to

Objects:  DataSet

Syntax

object.QueryAllRecords

Parameters

Part Description
object Required. An expression that returns a DataSet object.

Example

  
    Sub GetAllRecordsOnMap()


  Dim objApp As New MapPoint.Application
  Dim objDataSet As MapPoint.DataSet
  Dim objRecordset As MapPoint.Recordset
  Dim objField As MapPoint.Field
  objApp.Visible = True
  objApp.UserControl = True
  Set objDataSet = objApp.OpenMap(objApp.Path & "\Samples\Clients.ptm").DataSets("Clients")


  'Retrieve all records
  Set objRecordset = objDataSet.QueryAllRecords


  'Get the values
  Dim vals As String
  objRecordset.MoveFirst
  Do Until objRecordset.EOF
    For Each objField In objRecordset.Fields
      vals = vals & CStr(objField.Value) & vbTab
    Next objField
    vals = vals & vbCrLf
    objRecordset.MoveNext
  Loop
  MsgBox vals


End Sub