Propiedad VisWebPageSettings.SecFormat

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

Sintaxis

más sencilla.Formato de seguridad

expresión Una expresión que devuelve un objeto VisWebPageSettings .

Valor devuelto

Cadena

Comentarios

El formato de salida secundaria 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 utiliza el formato secundario.

El formato de salida principal se especifica mediante la propiedad PriFormat . 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 (Portable Network Graphics), 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 un formato alternativo para exploradores más antiguos (si está activada) en la pestaña Avanzadas del cuadro de diálogo Guardar como página web (pestaña >BackstageButton)Guardar como Guardar como> lista > detiposPágina web (*.htm;*.html)>Publicar>Avanzado).

Ejemplo

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

Antes de ejecutar esta macro, reemplace path\filename.htm por 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.