Freigeben über

Programmgesteuertes Festlegen von Optionen in Visio 2010 für die Veröffentlichung in SharePoint Server 2010 (maschinell übersetzt)

  • Artikel

Wichtig

Dieser Artikel wurde maschinell übersetzt. Bitte beachten Sie den Haftungsausschluss. Die englische Version des Artikels ist als Referenz hier verfügbar: here.

Zusammenfassung: Informationen zum programmgesteuerten Speichern von Microsoft Visio 2010-Diagrammen als Webzeichnungen (VDW-Dateien) für die Verwendung mit Visio Services in Microsoft SharePoint Server 2010 mit Lizenz für den Zugriff auf den Enterprise-Client. Auf diese Weise können Benutzer Visio-Diagramme in SharePoint anzeigen und damit interagieren, ohne Visio 2010 auf dem Computer zu installieren.

Letzte Änderung: Donnerstag, 7. April 2011

Gilt für: Office 2010 | SharePoint Server 2010 | Visio 2010 | Visio Premium 2010

Inhalt dieses Artikels
Einführung
Erstellen eine Visio-Datei für die Verwendung mit Codebeispiele
Speichern eines Visio-Diagramms 2010 als Web-Zeichnung (.vdw File) programmgesteuert
Festlegen von Optionen für die Seite veröffentlichen
Festlegen von Optionen für die Recordset-Daten-Veröffentlichung
Schluss
Zusätzliche Ressourcen

Inhalt

  • Einführung

  • Erstellen eine Visio-Datei für die Verwendung mit Codebeispiele

  • Speichern eines Visio-Diagramms 2010 als Web-Zeichnung (.vdw File) programmgesteuert

  • Festlegen von Optionen für die Seite veröffentlichen

  • Festlegen von Optionen für die Recordset-Daten-Veröffentlichung

  • Schluss

  • Zusätzliche Ressourcen

Einführung

Können Sie das Visual Basic für Applikationen (VBA)-Objektmodell verfügbar gemacht werden, indem Microsoft Visio 2010Visio 2010 Diagramme speichern als web-Zeichnungen (.vdw-Dateien). Verwenden Sie dazu die SaveAs-Methode des Objekts Document, der Datei die Erweiterung .vdw zuweisen.

Hinweis

Diese Funktion steht nur im Microsoft Visio Professional 2010 und Microsoft Visio Premium 2010.

Darüber hinaus können Sie Optionen für das Veröffentlichen von diesen Dateien programmgesteuert Visio Services in Microsoft SharePoint Server 2010 mit Lizenz für den Zugriff auf den Enterprise-Client festlegen. In diesem Artikel wird erläutert, wie mit den Methoden und Eigenschaften des neuen Objekts ServerPublishOptions Veröffentlichungsoptionen für aktiven Visio-Dokument festgelegt werden. Die ServerPublishOptions-Eigenschaft des Objekts Document können Sie ServerPublishOptions-Objekt für jedes Dokument, einschließlich der Dokumente außer dem aktiven Dokument abgerufen.

Hinweis

Sie können auch Optionen für die Veröffentlichung auf Visio Services in der Benutzeroberfläche Visio 2010 durch Klicken Sie auf die Registerkarte Datei, klicken Sie auf Speichern unter, Web zeichnen (*.vdw) in der Liste Dateityp auf und dann auf Optionen festlegen.

Erstellen eine Visio-Datei für die Verwendung mit Codebeispiele

Aus Gründen der Einfachheit halber in den Codebeispielen in diesem Artikel sollen verwendet werden, mit einer Visio 2010 Datei mit vier Seiten mit jeweils eine einzelne geometrische Form die Daten in einer Zeile in einer Kalkulationstabelle Microsoft Excel verknüpft ist. Sie können natürlich die Beispiele als erforderlich, arbeiten mit Dateien und Datenquellen ändern.

Eine Visio 2010-Datei erstellen, die mit diesen Beispielen ohne weitere Änderungen und zum Erstellen einer Excel Arbeitsmappe als Datenquelle für die Datei verwenden, verwenden Sie die folgenden allgemeinen Verfahren. (Ausführliche Informationen zu jedem Schritt Gegenstand dieses Artikels sind, finden Sie im Endbenutzer-Hilfe und den Verknüpfungen am Ende dieses Artikels Einzelheiten zu jedem bestimmten Schritt.)

So erstellen Sie eine Visio-Datei mit den Codebeispielen

  1. Erstellen Sie eine neue Visio 2010-Datei aus der Vorlage für Allgemeine Diagramme

  2. Fügen Sie drei Seiten in die Datei.

  3. Fügen Sie eine einzelne Form auf jeder Seite: ein Achteck eine, einen Kreis in einen anderen, einen Stern, um eine dritte und ein Fünfeck um eine vierte. Die Seitenreihenfolge ist unwichtig, ebenso wie die Position von Shapes auf der Seite.

  4. Benennen Sie jede Seite der Form entspricht es enthält.

  5. Verwenden Sie Assistenten für die Datenauswahl, um die Zeichnung an Daten in einer Kalkulationstabelle Excel verknüpfen. Im nächste Verfahren erläutert, wie diese Tabelle erstellen.

    Hinweis

    Klicken Sie zum Starten der Assistenten für der Datenauswahl auf der Registerkarte Daten auf Daten mit Shapes verknüpfen.

  6. Verknüpfen Sie jedes Shape mit der entsprechenden Datenzeile im Fenster für Externe Daten.

  7. Fügen Sie dem Projekt ThisDocument im Visual Basic-Editor-Fenster in der Datei in den Codebeispielen in diesem Artikel.

  8. Optional können Sie das Bearbeiten der Datengrafik angewendet wird, um die Formen können Sie ein neues Farbe nach Wert-Datenfeld jeden Farbe-Wert die entsprechende Farbe zuordnen.

  9. Speichern Sie die Datei an den Speicherort Ihrer Wahl, die Sie beliebig benennen.

So erstellen Sie eine Excel-Arbeitsmappe als Datenquelle für die 2010 Visio-Datei

  1. Erstellen Sie eine neue Excel-Datei.

  2. Fügen Sie den folgenden Text, um die ersten fünf Zeilen der ersten beiden Spalten in Sheet1.

    Shape

    Farbe

    Kreis

    Rot

    Stern

    Blau

    Achteck

    Grün

    Richtungspfeil

    Gelb

  3. Speichern Sie die Datei benennen es, an eine Dokumentbibliothek auf der Website SharePoint Server 2010 beliebig Ihrer Visio-Zeichnung angezeigt werden soll.

Hinweis

Verbinden Sie Ihre Visio-Zeichnung in eine Excel Arbeitsmappe an einem Speicherort gespeichert. Allerdings soll das Diagramm Visio 2010 in Visio Services, um Änderungen an den Daten in der Arbeitsmappe Excel wiederzugeben, wenn das Diagramm aktualisiert wird, speichern Sie Excel Arbeitsmappe in einer SharePoint-Dokumentbibliothek zu, verknüpfen Sie Ihr Diagramm mit Excel Arbeitsmappe in der SharePoint-Bibliothek und speichern Sie das Diagramm in der gleichen SharePoint-Bibliothek.

Speichern eines Visio-Diagramms 2010 als Web-Zeichnung (.vdw File) programmgesteuert

Der folgende Code zeigt, wie das aktive Visio 2010 Diagramm als Zeichnung (.vdw-Datei) für die Verwendung mit Visio Services Web gespeichert wird. Ändern Sie den Namen der Datei und den Speicherort, an dem die Datei gespeichert werden soll.

Public Sub SaveAsVDW()

    Visio.ActiveDocument.SaveAs ("C:\WebDrawingName.vdw")
    
End Sub

Festlegen von Optionen für die Seite veröffentlichen

Wenn das Dokument, das Sie als Web zeichnen (.vdw-Datei) speichern möchten mehr als eine Seite verfügt, können Sie angeben, genau die Seiten in der Publikation enthalten sein sollen. SetPagesToPublish-Methode können Sie entweder alle Seiten im Dokument oder der ausgewählten Seiten, die den Seitennamen der angeben, veröffentlichen. GetPagesToPublish-Methode können Sie bestimmen, welche Seiten derzeit gesetzten veröffentlicht werden soll. IncludePage-Methode enthält eine bestimmte Seite in die Gruppe von Seiten veröffentlicht werden sollen, und die Methode ExcludePage schließt eine bestimmte Seite. Die Eigenschaft IsPublishedPage teilt Ihnen mit, wenn eine bestimmte Seite veröffentlicht werden soll, bereits festgelegt ist.

Angeben der Seiten veröffentlichen

Sie können einen Satz von Seiten veröffentlicht werden sollen, angeben. Das folgende Codebeispiel veranschaulicht die SetPagesToPublish-Methode verwenden, um genau welche Seiten veröffentlicht werden sollen. Der Code erstellt ein Array von Zeichenfolgen, die den Namen einer Seite veröffentlichen entspricht, und dann an die Methode array übergeben. Weitere Parameter, die an die Methode übergeben werden nur markierte Seiten veröffentlicht werden sollen und dass Seite im Array universellen Namen werden angeben.

Public Sub SetPagesToPublish_Example()

    Dim aryNamesArray() As String
    ReDim aryNamesArray(1 To 2)
    aryNamesArray(1) = "Octagon"
    aryNamesArray(2) = "Circle"

    Visio.ActiveDocument.ServerPublishOptions.SetPagesToPublish visPublishPageSelect, aryNamesArray, visLangUniversal
    
End Sub

Bestimmen die Seiten für die veröffentlichte werden Schritte sind

GetPagesToPublish-Methode können Sie ermitteln, welche Seiten festgelegt sind, veröffentlicht werden. Der folgende Code zeigt, wie Sie diese Methode verwenden, um diese Seiten zu erhalten. Die Methode nimmt einen konstanten Wert VisLangFlags-Enumeration, die angibt, ob die Namen der Seiten in das zurückgegebene Array lokal oder universell. Es gibt zwei Werte in Form von den beiden out-Parameter, die übergeben werden:

  • Ein konstanter Wert VisPublishPages-Enumeration, der angibt, ob alle Seiten oder nur auf ausgewählten Seiten veröffentlicht werden.

  • Ein Array von Zeichenfolgen, die aufgefüllt wird mit den Namen der zu veröffentlichenden Seiten.

Public Sub GetPagesToPublish_Example()

    Dim aryNamesArray() As String
    Dim cnstLangFlag As VisLangFlags
    Dim cnstPagesToPublish As VisPublishPages

    cnstLangFlag = visLangUniversal
    Visio.ActiveDocument.ServerPublishOptions.GetPagesToPublish cnstLangFlag, cnstPagesToPublish, aryNamesArray
    
    Dim intCounter As Integer    
    For intCounter = LBound(aryNamesArray) To UBound(aryNamesArray)
        Debug.Print aryNamesArray(intCounter)
    Next intCounter    
    
    If cnstPagesToPublish = visPublishPageAll Then
        Debug.Print "Print all pages"
    Else: Debug.Print "Print selected pages"
    End If
            
End Sub

Einschließen und Ausschließen von bestimmte Seiten

Der folgende Code veranschaulicht die IncludePage-Methode verwenden, um eine bestimmte Seite in der Gruppe der zu veröffentlichenden Seiten umfassen. Außerdem wird gezeigt, wie Sie die IsPublishedPage-Eigenschaft verwenden, um zu bestimmen, ob die Seite, die Sie einschließen möchten, bereits enthalten ist.

Public Sub IncludePage_Example()

    If Not Visio.ActiveDocument.ServerPublishOptions.IsPublishedPage("Star", visLangUniversal) Then
        Visio.ActiveDocument.ServerPublishOptions.IncludePage "Star", visLangUniversal
    Else
        Debug.Print "Star is already set to be published."
    End If
    
End Sub

Der folgende Code veranschaulicht die ExcludePage-Methode verwenden, um eine bestimmte Seite ausgeschlossen werden, die Gruppe von Seiten veröffentlicht werden sollen.

Public Sub ExcludePage_Example()

    Visio.ActiveDocument.ServerPublishOptions.ExcludePage "Circle", visLangUniversal

End Sub

Festlegen von Optionen für die Recordset-Daten-Veröffentlichung

Wenn das Dokument, das Sie als Zeichnung (.vdw-Datei) mit Visio Services Web speichern möchten Daten in Form von Datenrecordsets enthält, können Sie genau welche Datenrecordsets angeben, mit der Web-Zeichnungsdatei verbunden werden soll, so, dass die Zeichnung im Browser als Datenänderungen aktualisiert wird. Die SetRecordSetsToPublish-Methode können Sie alle Datensätze im Dokument, oder ausgewählte Datenrecordsets, die Sie angeben, durch ID veröffentlichen GetRecordSetsToPublish-Methode können Sie bestimmen, welche Datenrecordsets aktuell festgelegt sind, veröffentlicht werden.

Angeben des Datenrecordsets veröffentlichen

Der folgende Code veranschaulicht die SetRecordSetsToPublish-Methode verwenden, um anzugeben, welche Datenrecordsets im aktiven Dokument beim Speichern des Dokuments als Zeichnung Web veröffentlicht werden. Der Code übergibt ein Array von Long-Werten, die die IDs der Datenrecordsets enthalten sein sollen.

Public Sub SetRecordsetsToPublish_Example()

    Dim aryDataRecordsetIDs() As Long
    ReDim aryDataRecordsetIDs(1 To ActiveDocument.DataRecordsets.Count)
    aryDataRecordsetIDs(1) = 1
        
    Visio.ActiveDocument.ServerPublishOptions.SetRecordsetsToPublish visPublishDataRecordsetSelect, aryDataRecordsetIDs
    
End Sub

Bestimmen der Daten Recordsets sind Schritte zur veröffentlicht werden

Der folgende Code veranschaulicht die GetRecordSetsToPublish-Methode verwenden, um zu bestimmen, welche Datenrecordsets im aktiven Dokument aktuell festgelegt sind, zu veröffentlichen. Die Methode gibt zwei out-Parameter, die angeben, ob keine Datenrecordsets alle Datenrecordsets oder Recordsets ausgewählten Daten veröffentlicht werden soll; und in allen außer den ersten Fall, welche Datenrecordsets werden nur veröffentlicht werden.

Public Sub GetRecordSetsToPublish_Example()

    Dim aryDataRecordsetIDs() As Long
    Dim cnstPublishFlag As VisPublishDataRecordsets
    Dim vsoDataRecordsets As DataRecordsets
    
    Visio.ActiveDocument.ServerPublishOptions.GetRecordsetsToPublish cnstPublishFlag, aryDataRecordsetIDs
    
    If Not cnstPublishFlag = visPublishDataRecordsetNone Then
    
        Dim intCounter As Integer
        
        For intCounter = LBound(aryDataRecordsetIDs) To UBound(aryDataRecordsetIDs)
            Debug.Print ActiveDocument.DataRecordsets.ItemFromID(aryDataRecordsetIDs(intCounter)).Name
        Next intCounter
    
    Else
        Debug.Print "No data recordsets are set to be published."
    End If
    
End Sub

Schluss

Dieser Artikel beschreibt, wie mit VBA-Code zum Festlegen von Optionen programmgesteuert für das Speichern von Visio 2010 Zeichnungen als Web-Zeichnungen (.vdw-Dateien) für Visio Services in Microsoft SharePoint Server 2010 verwenden. Mithilfe von VBA-Code können Sie angeben, die zu veröffentlichenden Seiten und Datenrecordsets, die Sie einschließen möchten.

Zusätzliche Ressourcen

Visio Developer Center

Blog von Visio Einblicke

About Connecting to Data in Visio

About Linking Shapes to Data

About Displaying Data Graphically

Hinweis

Haftungsausschluss für maschinelle Übersetzungen: Dieser Artikel wurde mithilfe eines Computersystems und ohne jegliche Bearbeitung durch Personen übersetzt. Microsoft bietet solche maschinellen Übersetzungen als Hilfestellung für Benutzer ohne Englischkenntnisse an, damit Sie von den Informationen zu Produkten, Diensten und Technologien von Microsoft profitieren können. Da es sich bei diesem Artikel um eine maschinelle Übersetzung handelt, enthält er möglicherweise Fehler in Bezug auf (Fach-)Terminologie, Syntax und/oder Grammatik.