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 one of the objects in the Applies To list.
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 destination file name of 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, the report will be overwritten. If False, the report will not be overwritten. The default value is True.
The following example saves a report of all files in the current web 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