Nice Tutorial Danke
AxSkype1.CurrentUserStatus = SKYPE4COMLib.TUserStatus.cusOffline
AxSkype1.CurrentUserStatus = SKYPE4COMLib.TUserStatus.cusOnline
AxSkype1.CurrentUserStatus = SKYPE4COMLib.TUserStatus.cusDoNotDisturb
Dim gruppe As SKYPE4COMLib.Group = AxSkype1.CreateGroup("Gruppe")
For Each user In CheckedListBox1.CheckedItems
gruppe.AddUser(user)
Next
Quote:
Wenn ich Skype mit meinem Visualbasic Programm im DEBUGMODUS verbinden will, blockiert Skype dieses sofort und in den Einstellungen (Aktionen > Optionen > Erweitert > Zugriffsverwaltung) kann man dies auch nicht umstellen.Starte ich das Programm in der Releaseversion, funktioniert es perfekt, aber ich will nicht jedes mal die datei als .exe erstellen sondern die Debugversion starten.
For Each Item As Object In ListBox2.Items
Skype.SendMessage(Item.ToString, RichTextBox1.Text)
Next