defaultCharset Property

Returns or sets a String that represents the default character set of the current document. Read/write.

expression   Required. An expression that returns a DispFPHTMLDocument object.

Example

The following example displays the default character set of the current document.

Sub CharSet()
'Displays the default character set of the current document

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument

    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Display the name of the default character set
    MsgBox "The default character set for the current document is " _
            & objDoc.defaultCharset & "."

End Sub