ITrkRecord Interface | |
Description: | Represents one record in the TrkTable. The TrkRecords object stores one TrkRecord object for each record in the TrkTable. Each TrkRecord object is uniquely identified by an ID field, which is generated by the system whenever a TrkRecord object is added to the TrkRecords collection. Notes: Do not directly instantiate this object. TrkRecords object creates a TrkRecord object every time a TrkRecords.Add method is called. It also creates one TrkRecord object for each row returned by the database when TrkRecords.ReadDB method is called. Example: Dim oTrkTable As Object Dim oTrkRecord As Object Dim oTrkField As Object Dim oTADBRoot As Object Dim idx As Long Set oTADBRoot = CreateObject("TADB.TADBRoot") If oTADBRoot Is Nothing Then MsgBox "Root Object is not
created" End If oTADBRoot.Load "TRK7", "" 'Get Table from Collection of TrkTables Set oTrkTable = oTADBRoot.TrkTables.Item("GroupAttribs^BODY
COMPONENT^Body IDs") If oTrkTable Is Nothing Then 'Item Not found Else 'TrkTable Found ... oTrkTable.ReadDB "Item3" If oTrkTable.TrkRecords.Count == 1
then Set oTrkRecord =
oTrkTable.TrkRecords.Item(1) ... ... ... oTrkTable.TrkRecords.Remove
oTrkRecord.ID Else 'Record not
found... End If End If ... |
Properties: | ID , TrkFields |
Methods: | ReInitialize , Save |