Project.DeliverablesGetByProject-Methode (Project)

Artikel
04/07/2023

Ruft eine Liste aller Lieferumfänge für das angegebene Enterprise-Projekt im XML-Member des zurückgegebenen Objekts ab. Nur in Project Professional.

Syntax

Ausdruck. DeliverablesGetByProject( _ProjectGuid_ )

Ausdruck Eine Variable, die ein Project-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
ProjectGuid	Erforderlich	String	GUID des Enterprise-Projekt.

Rückgabewert

Object

Hinweise

Verwenden von VBA zum Verarbeiten des XML -Elements des DeliverablesGetByProject Ergebnis-Objekts ist komplexer und nicht intuitive Code erforderlich. Es wird empfohlen, Sie verwenden die Office- und SharePoint-Entwicklungstools in Visual Studio 2012 um ein Add-In für Projekt erstellen, bei der Verwendung von Project Server und SharePoint-Features. Der einfachste Ansatz für die Verarbeitung von XML ist die Verwendung die LINQ to XML-Methoden in der .NET Framework 4.

Beispiel

Im folgenden Beispiel enthält das Enterprise-Projekt mit dem Namen einfacher einen Lieferumfang, die für einen Meilenstein mit dem Namen M1 festgelegt ist. Die Url der Projektwebsite, die die Liste Lieferumfang für das Einfache Projekt enthält, lautet https://ServerName/PWA/Simple. Das TestDeliverables -Makro zeigt eine Meldung angezeigt, die Teil der XML-Ergebnis enthält.

Der von der GetServerProjectGuid -Methode zurückgegebene ProjectGuid Wert enthält geschweiften Klammern sein, um die GUID, beispielsweise "{1b14e65c-5601-4565-acb9-3822078a17fb}". Verwenden Sie einen GUID-Wert entweder mit oder ohne die geschweiften Klammern.

Option Explicit 
 
Sub TestDeliverables() 
    Dim projectGuid As String 
    Dim ds As Object 
 
    projectGuid = ActiveProject.GetServerProjectGuid 
 
    ' Optional: Removing the braces on the GUID value makes no difference. 
    ' projectGuid = Mid(projectGuid, 2, 36) 
 
    Set ds = ActiveProject.DeliverablesGetByProject(projectGuid) 
 
    MsgBox ds.XML 
 
    Debug.Print ds.XML 
End Sub

Hinweis

[!HINWEIS] Um die Mitglieder einer Variablen vom Typ Object, wie die Variable ds finden legen eine Überwachung für das Objekt, und legen Sie einen Haltepunkt fest, nachdem Sie das Objekt einen Wert zuzuweisen. Erweitern Sie die Variable im Bereich Überwachung, und sehen Sie das XML -Element.

Das Meldungsfeld zeigt nur die ersten 1024 Zeichen der insgesamt 17,295 Zeichen des XML-Ergebnisses (in diesem Beispiel). Im folgenden XML-Ergebnis werden Attribute in separaten Zeilen aufgeteilt. Das eigentliche XML-Ergebnis wird in einer Zeile, die Sie sehen können, wenn Sie das Ergebnis in den Bereich direkt im VBE drucken. Im Beispiel wird das XML-Schema Großteil des Inhalts werden, nicht angezeigt.

Die Ows_ Felder sind in der SharePoint-Liste definiert. Einige Felder, die Sie extrahieren möchten gehören DeliverableUid, WorkspaceUri, LinkedTaskUid (GUID des Vorgangs in Project Server), Ows_LinkTitle (der Name der Aufgabe, die den Lieferumfang wurde), Ows_Created, Ows_Modified, Ows_Author, Ows_CommitmentStart und Ows_CommitmentFinish.

<DeliverableMasterDocument> 
 <Deliverables> 
 <Deliverable deliverableUid="6f8cb9a5-d9b8-496d-af90-1e88dc57f46a" projectUid="1b14e65c-5601-4565-acb9-3822078a17fb" 
 type="1" tpId="1" workspaceUri="https://ServerName/PWA/Simple" workspaceName="PWA/Simple" workspaceVServerUri="https://ServerName" 
 listUid="168a6e6f-6993-4315-a593-7ffa21683e57" state="1"> 
 <Client linkedTaskUid="d3eaf532-9ab9-4eb2-8f85-fd41a1b5db0c" ows_ID="1" 
 ows_ContentTypeId="0x010074416DB49FB844B99C763FA7171E7D1F00001031A192BFCA4D83CA160D2BCAB735" 
 ows_ContentType="Project Site Deliverable" ows_Title="M1" ows_Modified="2010-02-19 13:30:19" 
 ows_Created="2010-02-19 13:29:45" ows_Author="1073741823;#System Account" 
 ows_Editor="1073741823;#System Account" ows_owshiddenversion="2" ows_WorkflowVersion="1" 
 ows__UIVersion="512" ows__UIVersionString="1.0" ows_Attachments="0" ows__ModerationStatus="0" 
 ows_LinkTitleNoMenu="M1" ows_LinkTitle="M1" ows_LinkTitle2="M1" ows_SelectTitle="1" 
 ows_Order="100.000000000000" ows_GUID="{FFA3E0F9-DBB4-44B6-B09D-1C2AB7A9EF92}" 
 ows_FileRef="1;#PWA/Simple/Lists/Deliverables/1_.000" ows_FileDirRef="1;#PWA/Simple/Lists/Deliverables" 
 ows_Last_x0020_Modified="1;#2010-02-19 13:29:45" ows_Created_x0020_Date="1;#2010-02-19 13:29:45" 
 ows_FSObjType="1;#0" ows_SortBehavior="1;#0" ows_PermMask="0x7fffffffffffffff" ows_FileLeafRef="1;#1_.000" 
 ows_UniqueId="1;#{29AF34EA-EA27-48C7-80A6-83B0A95DB9BD}" ows_ProgId="1;#" 
 ows_ScopeId="1;#{73C1A12E-DBA2-4BE2-87EE-1FF5EF1494DD}" ows__EditMenuTableStart="1_.000" 
 ows__EditMenuTableStart2="1" ows__EditMenuTableEnd="1" ows_LinkFilenameNoMenu="1_.000" 
 ows_LinkFilename="1_.000" ows_LinkFilename2="1_.000" ows_ServerUrl="/PWA/Simple/Lists/Deliverables/1_.000" 
 ows_EncodedAbsUrl="https://jc2vm1/PWA/Simple/Lists/Deliverables/1_.000" ows_BaseName="1_" ows_MetaInfo="1;#" 
 ows__Level="1" ows__IsCurrentVersion="1" ows_ItemChildCount="1;#0" ows_FolderChildCount="1;#0" 
 ows_CommitmentStart="2010-02-02 00:00:00" ows_CommitmentFinish="2010-02-02 00:00:00" ows_SuppressCreateEvent="1"/> 
 </Deliverable> 
 </Deliverables> 
 <Schemas> 
 <Schema . . . 
 . . . > 
 <Fields> 
 <Field . . . /> 
 . . . 
 </Fields> 
 </Schema> 
 </Schemas> 
</DeliverableMasterDocument>

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.

Freigeben über