Поделиться через

Объект VisWebPageSettings (Visio Save As Web)

  • Статья

Содержит параметры веб-страницы.

Замечания

Объект VisWebPageSettings служит контейнером для свойств веб-страницы.

Многие свойства объекта VisWebPageSettings соответствуют параметрам, доступным в диалоговом окне "Сохранить как", когда пользователь выбирает вкладку "Экспорт", веб-страница "Изменение>типа> файла" >(*.htm)>Сохранить как.

Например, свойство PageTitle, содержащее заголовок, который отображается в строке заголовка при отображении веб-страницы в браузере, соответствует значению в поле Заголовок страницы диалогового окна Установка заголовка страницы (диалоговое окно >Сохранить какизменить заголовок).

Кроме того, свойство DispScreenRes соответствует значению, выбранному в списке Целевой монитор на вкладке Дополнительно диалогового окна Сохранить как веб-страницу (диалоговое окно>Сохранить как список > типов веб-страница (*.htm;*.html)>Опубликовать).

Если вы хотите создать веб-страницу, используйте свойство WebPageSettings объекта VisSaveAsWeb , чтобы получить ссылку на объект VisWebPageSettings , который можно использовать для задания свойств веб-страницы, как показано в следующем примере.

Public Sub VisWebPageSettingsObject_Example() 
 Dim vsoWebSettings As VisWebPageSettings 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 
 ' Query Visio for the VisSaveAsWeb object. 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 
 ' Get a WebPageSettings object. 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 With vsoWebSettings 
 
 ' Set the title that is displayed in the browser's title bar. 
 .PageTitle = "AccountingDeptOrgChart082501" 
 
 ' Prevent dialog boxes from appearing in the user interface. 
 .QuietMode = True 
 End With 
 
 ' If you don't call the AttachToVisioDoc method to 
 ' identify a specific document, Visio saves the 
 ' active document by default. 
 vsoSaveAsWeb.CreatePages 
End Sub

Примечание.

Чтобы просмотреть класс VisWebPageSettings в обозревателе объектов, убедитесь, что у вас есть ссылка на библиотеку DLL Сохранить как веб-страницу в проекте (в окне редактора Visual Basic выберите Ссылки в меню Сервис , а затем установите флажок Microsoft Visio 15.0 Сохранить как веб-тип библиотеки в списке Доступные ссылки ).

Методы

Свойства

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.