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