SaveReport Method

Microsoft FrontPage Visual Basic

Show All Show All

SaveReport Method

Saves a specified report to an HTML file on the user's computer.

expression.SaveReport(reportviewModeEx, DestinationUrl, Title, ForceOverwrite)

expression    Required. An expression that returns a WebWindowEx object.

reportviewModeEx    Required. An FpWebViewModeEx constant that represents the type of report you want to save.

FpWebViewModeEx can be one of these FpWebViewModeEx constants.
fpWebViewExAllFiles
fpWebViewExAssignedTo
fpWebViewExBrokenLinks
fpWebViewExBrowserTypes
fpWebViewExCategories
fpWebViewExCheckoutStatus
fpWebViewExComponentErrors
fpWebViewExDailyPageHits
fpWebViewExDailySummary
fpWebViewExFolders
fpWebViewExLinks
fpWebViewExMonthlyPageHits
fpWebViewExMonthlySummary
fpWebViewExNavigation
fpWebViewExOlderFiles
fpWebViewExOsTypes
fpWebViewExPage
fpWebViewExPublishStatus
fpWebViewExRecentlyAddedFiles
fpWebViewExRecentlyChangedFiles
fpWebViewExReferringDomains
fpWebViewExReferringURLs
fpWebViewExReviewStatus
fpWebViewExSearchStrings
fpWebViewExSiteSummary
fpWebViewExSlowPages
fpWebViewExTodo
fpWebViewExUnlinkedFiles
fpWebViewExUsageSummary
fpWebViewExVisitingUsers
fpWebViewExWeeklyPageHits
fpWebViewExWeeklySummary

DestinationUrl    Required. A String that represents the target file name for the report.

Title    Required. A String that represents the title of the new report.

ForceOverwrite    Optional. A Boolean that indicates if any previously created report with the same file name will be overwritten by the new report. If True, an existing file will be overwritten. The default value is True.

Example

The following example saves a report of all files in the current Web site to a file named Report1.htm on the local user's computer. The report will overwrite any existing report in the \Reports directory with the name "Report1.htm".

    Sub ReportSave()
'Saves a specified report to a specified location.

    Dim objApp As FrontPage.Application
    Dim objWebwdw As WebWindowEx

    Set objApp = FrontPage.Application
    Set objWebwdw = objApp.ActiveWebWindow
    'Save the report
    objWebwdw.SaveReport reportviewModeEx:=fpWebViewExAllFiles, _
        Title:="Current Project Progress", _
        DestinationURL:="C:\NewProject\Reports\Report1.htm", _
        ForceOverwrite:=True

End Sub