Spammer skype:

il vous faudra 2 boutons 3 textes box 3 labels et 1 link label

code:

Imports SKYPE4COMLib

Public Class Form1

    Public WithEvents skype As New SKYPE4COMLib.Skype

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Timer1.Enabled = True

        MessageBox.Show("Spam en cours ")

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Timer1.Enabled = False

        TextBox1.Text = ""

        TextBox2.Text = ""

        TextBox3.Text = ""

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

        skype.SendMessage(TextBox1.Text, TextBox2.Text)

        Timer1.Interval = TextBox3.Text

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked

        Process.Start("http://www.tonsite.com")

    End Sub

End Class

==============================================================================

Keygen: Il vous faudra 1 text box et 1 bouton

Code: