protocol Property

Returns a String that represents the protocol of the current document. The protocol property returns the protocol substring up to and including the first colon, which indicates the URL's access method. Read-only.

expression   Required. An expression that returns a DispFPHTMLDocument object.

Example

The following example displays the protocol type used to access the active document.

Sub ProtocolType()
'Returns the protocol type used by the active document

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Display protocol type
    MsgBox "The current document's protocol type is :" & objDoc.protocol

End Sub