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.
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