Fields Property

Fields Property

The Fields collection for the object.

Syntax

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

Remarks

The Microsoft® Active X® Data Objects (ADO) Fields objectis a collection of ADO Field objects that pertain to this object. Each Field object holds a name/value pair that defines a header field for the body part. The name is always a string, and the value is a VARIANT. The subtype of the VARIANT depends on the field definition. See the Fields section of the reference for a list of valid fields to use along with a list of the various VARIANT subtypes for each field.

The fields that resize in this collection depend upon the specific implementation. Consult the appropriate Component Object Model (COM) class for details about available fields.

Example

Dim iMsg as New CDO.Message
Dim iBp as CDO.IBodyPart
Set iBp = iMsg

Dim Flds as ADODB.Fields
Set Flds = iBp.Fields

With Flds
   .Item("urn:schemas:mailheader:content-type") = "application/msword"
   .Item("urn:schemas:mailheader:content-disposition") = "attachment"
   .Update
End With