Compartir a través de

Propiedad VisWebPageSettings.SecFormat

  • Artículo

Especifica el formato de salida secundario de la página web. Lectura y escritura.

Sintaxis

expresión. SecFormat

Expresión Expresión que devuelve un objeto VisWebPageSettings .

Valor devuelto

Cadena

Comentarios

El formato de salida secundario se usa si el explorador no admite el formato de salida principal. Por ejemplo, si el formato principal es XAML y el complemento de explorador silverlight necesario no está instalado, la salida de la página web usa el formato secundario.

La propiedad PriFormat especifica el formato de salida principal. Para obtener información sobre qué exploradores son compatibles con los formatos seleccionados, vea la propiedad AltFormat .

Los valores posibles para la propiedad SecFormat son los siguientes:

  • PNG (gráficos de red portátiles), el valor predeterminado
  • JPG (formato de intercambio de archivos JPEG)
  • GIF (formato de intercambio de gráficos)

Este valor corresponde al valor seleccionado en la lista debajo de la casilla Proporcionar formato alternativo para exploradores anteriores (si está seleccionado) en la pestaña Avanzadas del cuadro de diálogo Guardar como página web (ficha >BackstageButtonGuardar como>guardar como tipo lista >Página web (*.htm;*.html)>Publicar>avanzado).

Ejemplo:

En la macro siguiente se muestra cómo usar la propiedad SecFormat para establecer el valor de formato secundario en JPG para los exploradores que no admiten el formato principal de XAML (valor predeterminado).

Antes de ejecutar esta macro, reemplace por path\filename.htm una ruta de acceso de destino válida en el equipo y el nombre de archivo que desea asignar a la página web.

Public Sub SecFormat_Example() 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 Dim vsowebSettings As VisWebPageSettings 
 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 With vsoWebSettings 
 .AltFormat = True 
 .SecFormat = "JPG" 
 .TargetPath = "path\filename.htm" 
 End With 
 
 vsoSaveAsWeb.CreatePages 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.