mimeType 类型

返回 String 类型的值，该值代表当前文档的 MIME（多用途 Internet 邮件扩展）类型。只读。

expression  必选。返回 DispFPHTMLDocument 对象的表达式。

示例

下列示例显示当前文档使用的 MIME 类型。

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