Freigeben über


Gewusst wie: Anpassen von Besprechungsarbeitsbereichen mit dem Meetings-Webdienst

Letzte Änderung: Mittwoch, 7. Juli 2010

Gilt für: SharePoint Foundation 2010

Der Meetings-Webdienst unterstützt Sie beim Erstellen und Verwalten von Besprechungsarbeitsbereich-Websites. Im vorliegenden Thema wird beschrieben, wie Sie mit den Webdiensten die folgenden Aufgaben ausführen können:

  • Bestimmen vorhandener Besprechungsarbeitsbereich-Websites

  • Erstellen von neuen Besprechungsarbeitsbereich-Websites und Hinzufügen von Besprechungen

  • Löschen von Besprechungsarbeitsbereich-Websites

  • Aktualisieren von Besprechungsinformationen auf einer Besprechungsarbeitsbereich-Website

Verfahren

Erstellen Sie zuerst in Microsoft Visual Studio eine Windows Forms-Anwendung. Weitere Informationen zum Festlegen eines Webverweises auf einen Microsoft SharePoint Foundation-Webdienst finden Sie unter Richtlinien für Webdienste.

So bestimmen Sie vorhandene Besprechungsarbeitsbereich-Websites

  • Im folgenden Codebeispiel sind die Besprechungsarbeitsbereich-Websites aufgelistet, die auf dem Server vorhanden sind.

    HinweisHinweis

    Dabei wird angenommen, dass es sich bei ServerURLTextBox um ein Schnittstellenelement handelt, das einem Formular im Projekt hinzugefügt wurde.

    Dim ws As New mywss001.Meetings()
    Dim myCache As New System.Net.CredentialCache()
    
    Private Sub ListMWS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListMWS.Click
     ws.Credentials = myCache.DefaultCredentials()
     ws.Url = ServerURLTextBox.Text
     If (ws.Url.EndsWith("/")) Then
      ws.Url = ws.Url.Remove(ws.Url.Length - 1, 1)
     End If
     ws.Url = ws.Url + "/_vti_bin/meetings.asmx"
     Dim GetMeetingWorkspacesResponse As System.Xml.XmlNode
     If (ws.Url <> "") Then
      GetMeetingWorkspacesResponse = ws.GetMeetingWorkspaces(True)
     End If
     Dim OuterXml As String
     OuterXml = GetMeetingWorkspacesResponse.OuterXml()
     MsgBox("OuterXml")
    End Sub
    
    mywss001.Meetings ws = new mywss001.Meetings();
    System.Net.CredentialCache myCache = new System.Net.CredentialCache();
    
    private void ListMWS_Click(System.Object sender, System.EventArgs e)
    {
        ws.Credentials = myCache.DefaultCredentials();
        ws.Url = ServerURLTextBox.Text;
        if ((ws.Url.EndsWith("/"))) {
            ws.Url = ws.Url.Remove(ws.Url.Length - 1, 1);
        }
        ws.Url = ws.Url + "/_vti_bin/meetings.asmx";
        System.Xml.XmlNode GetMeetingWorkspacesResponse = default(System.Xml.XmlNode);
        if ((!string.IsNullOrEmpty(ws.Url))) {
            GetMeetingWorkspacesResponse = ws.GetMeetingWorkspaces(true);
        }
        string OuterXml = null;
        OuterXml = GetMeetingWorkspacesResponse.OuterXml();
        Interaction.MsgBox("OuterXml");
    }
    

So erstellen Sie eine neue Besprechungsarbeitsbereich-Website und fügen dieser eine Besprechung hinzu

  • Im folgenden Codebeispiel wird eine Besprechungsarbeitsbereich-Website erstellt, der eine Besprechung hinzugefügt wird.

    HinweisHinweis

    Für das Beispiel wird angenommen, dass es sich bei ServerURLTextBox, MeetingSubjectTextBox, MeetingLocationTextBox, DTSTARTTextBox, DTENDTextBox und CreateWorkspaceButton um Schnittstellenelemente handelt, die einem Formular im Projekt hinzugefügt wurden.

    Dim ws As New mywss001.Meetings()
    Dim tz As New mywss001.TimeZoneInf()
    Dim myCache As New System.Net.CredentialCache()
    Dim UID As Integer
    Dim Sequence As UInt32
    
    Private Sub CreateWorkspaceButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CreateWorkspaceButton.Click
     ws.Credentials = myCache.DefaultCredentials()
     ws.Url = ServerURLTextBox.Text
     If (ws.Url.EndsWith("/")) Then
      ws.Url = ws.Url.Remove(ws.Url.Length - 1, 1)
     End If
     ws.Url = ws.Url + "/_vti_bin/meetings.asmx"
     Dim CreateWorkspaceResponse As System.Xml.XmlNode
     If (ws.Url <> "") Then
      CreateWorkspaceResponse = ws.CreateWorkspace(MeetingSubjectTextBox.Text, "MPS#0", System.UInt32.Parse("1033"), tz)
     End If
     Dim OuterXml As String
     OuterXml = CreateWorkspaceResponse.OuterXml()
     Dim MWSURL As String
     Dim Start As Integer
     Dim Finish As Integer
     Start = OuterXml.IndexOf("""")
     Finish = OuterXml.IndexOf("""", Start + 1)
     MWSURL = OuterXml.Substring(Start + 1, Finish - Start - 1)
     Dim MyRand As New System.Random()
     UID = MyRand.Next(100, 10000)
     Sequence.ToString("0")
     ws.Url = MWSURL + "/_vti_bin/meetings.asmx"
     ws.AddMeeting("", UID.ToString, Sequence, "2003-03-27T15:00:00-08:00", MeetingSubjectTextBox.Text, MeetingLocationTextBox.Text, DTSTARTTextBox.Text, DTENDTextBox.Text, False)
     MWSURLLink.Text = MWSURL
    End Sub
    
    mywss001.Meetings ws = new mywss001.Meetings();
    mywss001.TimeZoneInf tz = new mywss001.TimeZoneInf();
    System.Net.CredentialCache myCache = new System.Net.CredentialCache();
    int UID;
    UInt32 Sequence;
    
    private void CreateWorkspaceButton_Click(System.Object sender, System.EventArgs e)
    {
        ws.Credentials = myCache.DefaultCredentials();
        ws.Url = ServerURLTextBox.Text;
        if ((ws.Url.EndsWith("/"))) {
            ws.Url = ws.Url.Remove(ws.Url.Length - 1, 1);
        }
        ws.Url = ws.Url + "/_vti_bin/meetings.asmx";
        System.Xml.XmlNode CreateWorkspaceResponse = default(System.Xml.XmlNode);
        if ((!string.IsNullOrEmpty(ws.Url))) {
            CreateWorkspaceResponse = ws.CreateWorkspace(MeetingSubjectTextBox.Text, "MPS#0", System.UInt32.Parse("1033"), tz);
        }
        string OuterXml = null;
        OuterXml = CreateWorkspaceResponse.OuterXml();
        string MWSURL = null;
        int Start = 0;
        int Finish = 0;
        Start = OuterXml.IndexOf("\"");
        Finish = OuterXml.IndexOf("\"", Start + 1);
        MWSURL = OuterXml.Substring(Start + 1, Finish - Start - 1);
        System.Random MyRand = new System.Random();
        UID = MyRand.Next(100, 10000);
        Sequence.ToString("0");
        ws.Url = MWSURL + "/_vti_bin/meetings.asmx";
        ws.AddMeeting("", UID.ToString, Sequence, "2003-03-27T15:00:00-08:00", MeetingSubjectTextBox.Text, MeetingLocationTextBox.Text, DTSTARTTextBox.Text, DTENDTextBox.Text, false);
        MWSURLLink.Text = MWSURL;
    }
    

So löschen Sie eine Besprechungsarbeitsbereich-Website

  • Im folgenden Codebeispiel wird eine angegebene Besprechungsarbeitsbereich-Website gelöscht.

    HinweisHinweis

    Für das Beispiel wird angenommen, dass MWSURLLink die URL der Besprechungsarbeitsbereich-Website enthält.

    Private Sub DeleteWorkspaceButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DeleteWorkspaceButton.Click
     ws.Credentials = myCache.DefaultCredentials()
     ws.Url = MWSURLLink.Text + "/_vti_bin/meetings.asmx"
     ws.DeleteWorkspace()
    End Sub
    
    private void DeleteWorkspaceButton_Click(System.Object sender, System.EventArgs e)
    {
        ws.Credentials = myCache.DefaultCredentials();
        ws.Url = MWSURLLink.Text + "/_vti_bin/meetings.asmx";
        ws.DeleteWorkspace();
    }
    

So aktualisieren Sie Besprechungsinformationen auf einer Besprechungsarbeitsbereich-Website

  • Im folgenden Codebeispiel wird eine Besprechung aktualisiert, die sich auf einer Besprechungsarbeitsbereich-Website befindet.

    HinweisHinweis

    Für das Beispiel wird angenommen, dass es sich bei MWSURLLink, MeetingSubjectTextBox, MeetingLocationTextBox, DTSTARTTextBox, DTENDTextBox und CreateWorkspaceButton um Schnittstellenelemente handelt, die einem Formular im Projekt hinzugefügt wurden.

    Private Sub UpdateMeetingButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UpdateMeetingButton.Click
     ws.Credentials = myCache.DefaultCredentials()
     ws.Url = MWSURLLink.Text + "/_vti_bin/meetings.asmx"
     Sequence.ToString("0")
     ws.UpdateMeeting(UID, Sequence, "2003-03-27T15:00:00-08:00", MeetingSubjectTextBox.Text, MeetingLocationTextBox.Text, DTSTARTTextBox.Text, DTENDTextBox.Text, False)
    End Sub
    
    private void UpdateMeetingButton_Click(System.Object sender, System.EventArgs e)
    {
        ws.Credentials = myCache.DefaultCredentials();
        ws.Url = MWSURLLink.Text + "/_vti_bin/meetings.asmx";
        Sequence.ToString("0");
        ws.UpdateMeeting(UID, Sequence, "2003-03-27T15:00:00-08:00", MeetingSubjectTextBox.Text, MeetingLocationTextBox.Text, DTSTARTTextBox.Text, DTENDTextBox.Text, false);
    }
    

Siehe auch

Referenz

[Meetings Web service]

Weitere Ressourcen

SharePoint Foundation 2010-Webdienste