Visual Basic Skype Mass Message

Submitted by Yorkiebar on Monday, September 2, 2013 - 20:12.

Introduction: This tutorial you will learn how to create a mass message program for Skype in Visual Basic. Steps of Creation: Step One: First we need to include the Skype API so go to Project > Add Reference > COM > Skype4COM. Step Two: Now add a button to our form which will begin the mass message process and a text box to enter the message to send to everyone. Step Three: Next we need to create a variable to contain our Skype client. Put this above any Sub's so we can use it throughout our file if you want to add more features:

        Dim iSkype As New SKYPE4COMLib.Skype

Step Four: Now double click on the button. First we are going to attach our program to Skype, then we will create a msg variable to contain our message from TextBox1

        iSkype.Attach()
        Dim msg As String = TextBox1.Text

Step Five: Finally lets iterate through all of the users within our contact list and send them all the message:

    Dim msg As String = TextBox1.Text
    For Each u As SKYPE4COMLib.User In iSkype.Friends
        iSkype.SendMessage(u.Handle, msg)
    Next

Project Completed! That's as simple as it is to make a Mass Message Skype Program. Here's the finished source code:

        Public Class Form1
                Dim iSkype As New SKYPE4COMLib.Skype
                Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
                        iSkype.Attach()
                        Dim msg As String = TextBox1.Text
                        For Each u As SKYPE4COMLib.User In iSkype.Friends
                                iSkype.SendMessage(u.Handle, msg)
                        Next
                End Sub
        End Class