Запуск "Сохранить как веб-страницу" из командной строки
Функция Сохранить как веб-страницу автоматически устанавливается с каждым продуктом Visio. Он устанавливается как надстройка Visio с именем SaveAsWeb.
Чтобы запустить функцию Сохранить как веб-страницу из интерфейса командной строки, вызовите надстройку SaveAsWeb и используйте необходимые параметры командной строки.
Вы можете выбрать любой из следующих методов.
Создание формулы, которая использует функцию RUNADDONWARGS в разделе событий фигуры
Это можно сделать в окне Таблица фигур без написания кода. Например, можно создать фигуру и вставить вызов RUNADDONWARGS в событие двойного щелчка фигуры. Пользователю потребуется только дважды щелкнуть фигуру, чтобы создать веб-страницу на основе документа. Вы также можете использовать автоматизацию для задания формул с помощью свойства Formula объекта Cell объектной модели Visio.
Дополнительные сведения о функции RUNADDONWARGS, объекте Cell или свойстве Formula см. в справочнике разработчика Visio (справка> попоиску>для разработчиков).
Дополнительные сведения об использовании функции RUNADDONWARGS с функцией Сохранить как веб-страницу см. в разделе Использование функции RUNADDONWARGS далее в этом разделе.
Написание макроса Visual Basic в Visio (или написание кода в отдельном компоненте), который запускает надстройку SaveAsWeb с помощью объектной модели службы автоматизации Visio
Используйте метод Run объекта Addon и передайте параметры командной строки, чтобы указать свойства веб-страницы.
Использование этого метода может означать, что вы напишете меньше кода, чем если бы вы использовали объектную модель Сохранить как веб-страницу для указания параметров, но для использования метода Run требуется знание параметров командной строки.
Дополнительные сведения об объекте Addon или методе Run см. в справочнике разработчика Visio (справочник попоиску>справки>для разработчиков).
Дополнительные сведения об использовании метода Run для вызова команды Сохранить как веб-страницу см. в разделе Вызов метода Run надстройки SaveAsWeb далее в этой статье.
Параметры командной строки "Сохранить как веб-страницу"
Формат параметров командной строки выглядит следующим образом: /option=value
Например, следующий код задает целевой параметр: /target=c:\temp\mypage.htm
В следующей таблице перечислены параметры командной строки для интерфейса командной строки "Сохранить как веб-страницу". В столбце Имя метода или свойства указан соответствующий метод или свойство в объектной модели. Дополнительные сведения о конкретном параметре см. в соответствующем разделе о методе или свойстве в этом справочнике.
| Вариант | По умолчанию | Тип значения | Имя метода или свойства |
|---|---|---|---|
| target | Нет. Необходимо указать целевое значение, иначе Visio создаст ошибку. | Текст | TargetPath |
| pagetitle | То же, что и имя файла документа | Текст | PageTitle |
| Prop | TRUE | Boolean | PropControl |
| altformat | TRUE | Boolean | AltFormat |
| folder | TRUE | Boolean | StoreInFolder |
| theme | Null | Текст | ThemeName |
| Начальная страница | -1 (все страницы) | Числовой | StartPage |
| конечная страница | -1 (все страницы) | Числовой | EndPage |
| openbrowser | TRUE | Boolean | OpenBrowser |
| экраны | 1024x768 | Текст/число1 | DispScreenRes |
| priformat | XAML | Текст/число1 | PriFormat |
| secformat | PNG | Текст/число1 | SecFormat |
| Молчание | FALSE | Boolean | SilentMode |
| Тихий | FALSE | Boolean | QuietMode |
| Стилей | \ your_Visio_path\your_language_ID\Default.css | Текст | Stylesheet |
| Navbar | TRUE | Boolean | NavBar |
| search | TRUE | Boolean | Поиск |
| панзум | TRUE | Boolean | PanAndZoom |
Для типа текстового или числового значения пользователь может указать текст (например, vml) для типа вывода или число (например, 1), представляющее индекс этого типа вывода. Каждый тип выходных данных будет иметь собственный уникальный индекс.
Для экранов текстовые и числовые значения определяются перечислением VISWEB_DISP_RES .
Использование функции RUNADDONWARGS
Ниже показано, как использовать функцию RUNADDONWARGS для вызова надстройки SaveAsWeb .
=RUNADDONWARGS("SaveAsWeb","/target=c:\temp\mypage.htm /quiet /prop /startpage=1 /endpage=3 /altformat /priformat=vml /secformat=jpg /openbrowser")
Сценарий, упомянутый ранее в этом разделе, описывает, что пользователь может просто дважды щелкнуть фигуру в документе, чтобы создать веб-страницу для этого документа. Чтобы продемонстрировать это, можно поместить предыдущую формулу в ячейку EventDblClick раздела События в окне Таблица фигур любой фигуры на странице документа (чтобы открыть окно Таблица фигур, выберите фигуру в окне документа, а затем на вкладке Разработчик выберите Показать таблицу фигур). После ввода формулы в ячейку Таблица фигуры можно дважды щелкнуть эту фигуру в окне документа, чтобы запустить функцию Сохранить как веб-страницу.
Дополнительные сведения о функции RUNADDONWARGS, ячейке EventDblClick и разделе События см. в справочнике разработчика Visio (справка> попоиску>для разработчиков).
Вызов метода Run надстройки SaveAsWeb
Функция Сохранить как веб-страницу устанавливается как надстройка Visio с именем SaveAsWeb. Чтобы получить ссылку на эту надстройку, используйте коллекцию Addons объекта Приложения Visio.
В следующем примере показано, как запустить надстройку SaveAsWeb путем передачи параметров командной строки в метод Run объекта Addon .
В этом примере код, запускающий надстройку, содержится в обработчике событий для события DocumentSaved . Свойство QuietMode имеет значение True , чтобы диалоговое окно Сохранить как веб-страницу не отображалось в пользовательском интерфейсе.
Private Sub Document_DocumentSaved(ByVal Document As IVDocument)
Application.Addons("SaveAsWeb").Run "/quiet=True /target=C:\temp\test.htm"
End Sub
Дополнительные сведения о коллекции Addons, объектахApplication и Addon, а также о событии DocumentSaved см. в справочнике по службе автоматизации Visio (справка> попоиску>для разработчиков).
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.