Creator Property Example

This example checks if the creator of a file is FrontPage.

Private Sub GetCreator()
Dim myCreator As String

myCreator = ActiveWeb.RootFolder.Files(0).Creator

If myCreator <> "FrontPage.Editor.Document" Then
    MsgBox "This file was not created by FrontPage."
End If
End Sub