Freigeben über

VisWebPageSettings-Objekt (Visio Save As Web)

Enthält die Einstellungen für die Webseite.

Hinweise

Das VisWebPageSettings-Objekt dient als Container für die Eigenschaften einer Webseite.

Viele der Eigenschaften des VisWebPageSettings-Objekts entsprechen den Einstellungen, die im Dialogfeld Speichern unter verfügbar sind, wenn ein Benutzer auf die RegisterkarteDatei die Dateiregisterkarte >>Webseite "Dateityp> ändern"(.htm)Speichern unter> auswählt.

Beispielsweise entspricht die PageTitle-Eigenschaft, die den Titel enthält, der in der Titelleiste angezeigt wird, wenn eine Webseite in einem Browser angezeigt wird, dem Wert im Feld Seitentitel im Dialogfeld Seitentitel festlegen (Dialogfeld Speichern >unterTitel ändern).

Außerdem entspricht die DispScreenRes-Eigenschaft dem Wert, der in der Liste Zielmonitor auf der Registerkarte Erweitert des Dialogfelds Als Webseite speichern ausgewählt wurde (Dialogfeld Speichern >unterListenwebseite speichern als Typ (*.htm;*.html)>Veröffentlichen).>

Wenn Sie eine Webseite erstellen möchten, verwenden Sie die WebPageSettings-Eigenschaft des VisSaveAsWeb-Objekts , um einen Verweis auf das VisWebPageSettings-Objekt abzurufen, mit dem Sie die Eigenschaften der Webseite festlegen können, wie im folgenden Beispiel gezeigt.

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

Hinweis

Um die VisWebPageSettings-Klasse im Objektbrowser anzuzeigen, stellen Sie sicher, dass In Ihrem Projekt ein Verweis auf die DLL Zum Speichern als Webseite vorhanden ist (wählen Sie im Visual Basic-Editor-Fenster im Menü Extrasdie Option Verweise aus, und aktivieren Sie dann das Kontrollkästchen Microsoft Visio 15.0 Als Webtypbibliothek speichern in der Liste Verfügbare Verweise).

Methoden

Eigenschaften

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

  • Last updated on