Share via

IMessage.Fields Property

Fields Property

The Fields property specifies the Fields collection for the object.


Property Fields as ADODB.Fields
HRESULT get_Fields(Fields** pVal);


The Fields property obtains a collection of Microsoft® ActiveX® Data Objects (ADO) Field objects, each of which contains a field relating to the message.


This example code determines how many fields a message has:

' Reference to Microsoft ActiveX Data Objects 2.5 Library
' Reference to Microsoft CDO for Windows 2000 Library
Dim iMsg as New CDO.Message
Dim collFields as Fields
Set collFields = iMsg.Fields

If collFields.Count = 0 Then
  MsgBox "Fields collection is empty"
  MsgBox "Message has " & collFields.Count & " fields"
End If