Share via


IncludeSourceFile property

Returns or sets whether a hyperlink to a copy of the current map file is included on the specified Web page. Read/write Boolean.

Applies to

Objects:  SavedWebPage

Syntax

object.IncludeSourceFile

Parameters

Part Description
object Required. An expression that returns a SavedWebPage object.

Example

    Sub RemoveLinkToSourceFile()
  Dim objApp As New MapPoint.Application
  Dim objMap As MapPoint.Map
  Dim objRoute As MapPoint.Route
  Dim objSW As MapPoint.SavedWebPage

  'Set up the application   Set objMap = objApp.ActiveMap   Set objRoute = objMap.ActiveRoute   objApp.Visible = True   objApp.UserControl = True
  'Create a route   objRoute.Waypoints.Add objMap.FindResults("Seattle, WA").Item(1)   objRoute.Waypoints.Add objMap.FindResults("Redmond, WA").Item(1)   objRoute.Calculate
  'Create a saved Web page   Set objSW = objMap.SavedWebPages.Add("SavedWeb", _     objRoute.Waypoints.Item(1).Location, "New Title", _     True, False, True, 200, 400, False, True, False, True)   objSW.Save
  'Remove link to the original *.ptm file from Web page   objSW.IncludeSourceFile = False   objSW.Save
  End Sub

Note  This sample code is specific for use in MapPoint North America; it is for illustration purposes only.