Hallo,
ich möchte mich erst einmal für den Titel entschuldigen, da mir kein kürzerer und aussagekräftiger Titel eingefallen ist.
Aber nun zu meinem Problem.
Ich möchte eine Podcastfunktion in meinen Skypebot implentieren, was auch an sich kein Problem ist.
Das ganze habe ich mit einer CheckedListBox gelöst, allerdings habe ich nun trotzdem ein Problem. Und zwar: Ich möchte _nicht_ die Loginnamen ich meiner CheckedListBox angezeigt bekommen, sondern die vollen Namen. Allerdings weiß ich dann nicht, wie ich das ganze losschicken soll.
Hier der ganze Code nur für den Podcaster
Spoiler anzeigen
P.S.
Der obige Code funktioniert nicht, wegen dem 'PodcastnamesList.Items.Add(name)', ansonsten wäre er schon fast fertig. Aber - wie gesagt - ich möchte dort die Anzeigenamen angezeigt haben und nicht die Loginnamen.
ich möchte mich erst einmal für den Titel entschuldigen, da mir kein kürzerer und aussagekräftiger Titel eingefallen ist.
Aber nun zu meinem Problem.
Ich möchte eine Podcastfunktion in meinen Skypebot implentieren, was auch an sich kein Problem ist.
Das ganze habe ich mit einer CheckedListBox gelöst, allerdings habe ich nun trotzdem ein Problem. Und zwar: Ich möchte _nicht_ die Loginnamen ich meiner CheckedListBox angezeigt bekommen, sondern die vollen Namen. Allerdings weiß ich dann nicht, wie ich das ganze losschicken soll.
Hier der ganze Code nur für den Podcaster
VB.NET-Quellcode
- Dim i As Integer
- Private Sub Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Skype.Attach()
- For Each Kollege As SKYPE4COMLib.User In Skype.Friends 'Für jeden Benutzer in meiner Kontaktliste
- Dim Anzeigenamen As String = Kollege.FullName 'den angezeigten Benutzernamen als String festlegen
- If name <> "Echo / Sound Test Service" And name <> "Lowfry //" Nothing Then 'Blacklisten von Persönlichkeiten wie echo123 (Echo / Sound Test Service) sowie meiner selbst
- End If
- PodcastnamesList.Items.Add(name) 'In der CheckedListBox die ganzen namen anzeigen lassenNext
- End Sub
- 'Absendebutton:
- Private Sub Podcast_send_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Podcast_send.Click
- Do While i < PodcastnamesList.CheckedItems.Count
- Skype.SendMessage(PodcastnamesList.CheckedItems.Item(i), Podcast_text.Text) 'Schickt an die angewählten Kontakte aus der CheckedListBox die Nachricht
- i = i + 1Loop
- End Sub
P.S.
Der obige Code funktioniert nicht, wegen dem 'PodcastnamesList.Items.Add(name)', ansonsten wäre er schon fast fertig. Aber - wie gesagt - ich möchte dort die Anzeigenamen angezeigt haben und nicht die Loginnamen.