mimeType Property

       

Returns a String that represents the MIME (Multipurpose Internet Mail Extension) type of the current document. Read-only.

expression.mimeType

expression   Required. An expression that returns a DispFPHTMLDocument object.

Example

The following example displays the MIME type used by the current document.

Sub DisplayMimetype()
'Displays the MIME type of the current document

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument

    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Display document's MIME type
    MsgBox "The current document's MIME type is " & objDoc.mimeType & "."

End Sub