RST Mail Bomber

[Zaraky]

Image:

http://imageshack.us/f/217/rstmailbomber.png/

Download Link: Download RST.Mail.Bomber.rar @ UppIT

Archive Password: rstcenter.com

[StrXt]

Eu vad ca e un mail sender nu un mail bomber.

[Zaraky]

L-ai incercat? ai vazut tu ca e sender? incearca si taci.

[sandabot]

Mail sender bagat intr-un timer.

Daca avea vreun SMTP era mai bun da asa mai mult de 10 nu se duc .

Si unde e posibilitatea de destinatari multipli ?

[nSnoopy]

Program facut dupa tutoriale si pus numele RST acolo, urat

[mad93]

e de apreciat ca omul a incercat ceva ... cel putin asta e parerea mea

[Zaraky]

nu e facut dupa tutoriale. in fine o sa fac unul mai avansat ca sa se simta nSnoopy bine

[unu_1234567]

nu e facut dupa tutoriale. in fine o sa fac unul mai avansat ca sa se simta nSnoopy bine

Nu cred ca e nevoie ... Adica fa-l si pastreaza-l pentru tine.. nSnoopu e invidios ca nu stie decat sa umble in paint si pe un browser cu prima pagina REDTUBE.

Nu le da atentie oricum...

[IdiotMan]

Multumesc Zaraky pentru program

[Guest Kovalski]

uh.. un prototip as putea spune.. mie nu mi-ar fi trecut prin cap niciodata sa fac asa ceva..

sincer, niciodata nu mi-ar fi trecut prin cap sa fac asa ceva.

[me.mello]

Mail sender bagat intr-un timer.

Daca avea vreun SMTP era mai bun da asa mai mult de 10 nu se duc .

Si unde e posibilitatea de destinatari multipli ?

Timer1..din codul tau.

VB:

Private Sub [COLOR="#FF0000"]Timer1_Tick[/COLOR](ByVal sender As Object, ByVal e As EventArgs)
        Dim message As New MailMessage
        Try 
            message.From = New MailAddress(Me.TextBox1.Text)
            message.To.Add(Me.TextBox3.Text)
            message.Subject = Me.TextBox5.Text
            message.Body = Me.TextBox4.Text
            New SmtpClient("smtp.gmail.com") With { _
                .Port = &H24B, _
                .EnableSsl = True, _
                .Credentials = New NetworkCredential(Me.TextBox1.Text, Me.TextBox2.Text) _
            }.Send(message)
        Catch exception1 As Exception
            ProjectData.SetProjectError(exception1)
            Dim exception As Exception = exception1
            ProjectData.ClearProjectError
        End Try
    End Sub

IL:

 .method private instance void Timer1_Tick(object sender, class [mscorlib]System.EventArgs e) cil managed
    {
        .maxstack 3
        .locals init (
            [0] class [System]System.Net.Mail.MailMessage message,
            [1] class [System]System.Net.Mail.SmtpClient client,
            [2] class [mscorlib]System.Exception exception)
        L_0000: nop 
        L_0001: newobj instance void [System]System.Net.Mail.MailMessage::.ctor()
        L_0006: stloc.0 
        L_0007: nop 
        L_0008: ldloc.0 
        L_0009: ldarg.0 
        L_000a: callvirt instance class [System.Windows.Forms]System.Windows.Forms.TextBox RST_Mail_Bomber.Form1::get_TextBox1()
        L_000f: callvirt instance string [System.Windows.Forms]System.Windows.Forms.TextBox::get_Text()
        L_0014: newobj instance void [System]System.Net.Mail.MailAddress::.ctor(string)
        L_0019: callvirt instance void [System]System.Net.Mail.MailMessage::set_From(class [System]System.Net.Mail.MailAddress)
        L_001e: nop 
        L_001f: ldloc.0 
        L_0020: callvirt instance class [System]System.Net.Mail.MailAddressCollection [System]System.Net.Mail.MailMessage::get_To()
        L_0025: ldarg.0 
        L_0026: callvirt instance class [System.Windows.Forms]System.Windows.Forms.TextBox RST_Mail_Bomber.Form1::get_TextBox3()
        L_002b: callvirt instance string [System.Windows.Forms]System.Windows.Forms.TextBox::get_Text()
        L_0030: callvirt instance void [System]System.Net.Mail.MailAddressCollection::Add(string)
        L_0035: nop 
        L_0036: ldloc.0 
        L_0037: ldarg.0 
        L_0038: callvirt instance class [System.Windows.Forms]System.Windows.Forms.TextBox RST_Mail_Bomber.Form1::get_TextBox5()
        L_003d: callvirt instance string [System.Windows.Forms]System.Windows.Forms.TextBox::get_Text()
        L_0042: callvirt instance void [System]System.Net.Mail.MailMessage::set_Subject(string)
        L_0047: nop 
        L_0048: ldloc.0 
        L_0049: ldarg.0 
        L_004a: callvirt instance class [System.Windows.Forms]System.Windows.Forms.TextBox RST_Mail_Bomber.Form1::get_TextBox4()
        L_004f: callvirt instance string [System.Windows.Forms]System.Windows.Forms.TextBox::get_Text()
        L_0054: callvirt instance void [System]System.Net.Mail.MailMessage::set_Body(string)
        L_0059: nop 
        L_005a: ldstr "smtp.gmail.com"
        L_005f: newobj instance void [System]System.Net.Mail.SmtpClient::.ctor(string)
        L_0064: stloc.1 
        L_0065: ldloc.1 
        L_0066: ldc.i4 0x24b
        L_006b: callvirt instance void [System]System.Net.Mail.SmtpClient::set_Port(int32)
        L_0070: nop 
        L_0071: ldloc.1 
        L_0072: ldc.i4.1 
        L_0073: callvirt instance void [System]System.Net.Mail.SmtpClient::set_EnableSsl(bool)
        L_0078: nop 
        L_0079: ldloc.1 
        L_007a: ldarg.0 
        L_007b: callvirt instance class [System.Windows.Forms]System.Windows.Forms.TextBox RST_Mail_Bomber.Form1::get_TextBox1()
        L_0080: callvirt instance string [System.Windows.Forms]System.Windows.Forms.TextBox::get_Text()
        L_0085: ldarg.0 
        L_0086: callvirt instance class [System.Windows.Forms]System.Windows.Forms.TextBox RST_Mail_Bomber.Form1::get_TextBox2()
        L_008b: callvirt instance string [System.Windows.Forms]System.Windows.Forms.TextBox::get_Text()
        L_0090: newobj instance void [System]System.Net.NetworkCredential::.ctor(string, string)
        L_0095: callvirt instance void [System]System.Net.Mail.SmtpClient::set_Credentials(class [System]System.Net.ICredentialsByHost)
        L_009a: nop 
        L_009b: ldloc.1 
        L_009c: ldloc.0 
        L_009d: callvirt instance void [System]System.Net.Mail.SmtpClient::Send(class [System]System.Net.Mail.MailMessage)
        L_00a2: nop 
        L_00a3: leave.s L_00b4
        L_00a5: dup 
        L_00a6: call void [Microsoft.VisualBasic]Microsoft.VisualBasic.CompilerServices.ProjectData::SetProjectError(class [mscorlib]System.Exception)
        L_00ab: stloc.2 
        L_00ac: nop 
        L_00ad: call void [Microsoft.VisualBasic]Microsoft.VisualBasic.CompilerServices.ProjectData::ClearProjectError()
        L_00b2: leave.s L_00b4
        L_00b4: nop 
        L_00b5: nop 
        L_00b6: ret 
        .try L_0008 to L_00a5 catch [mscorlib]System.Exception handler L_00a5 to L_00b4
    }

Nu e vorba ca nu te respectam, insa mie unul mi-ai atras atentia numele acestui articol, si imi amintesc ca flux a patit acelasi lucru la inceput si i s-a atras atentia, iar programelul tau pe langa proiectele lui sunt cam nimic...un sfat ar fi sa folosesti multi-thread sau async, sa scoti timerul....ca nu da deloc bine, si oprtiti-va dreq cu invidia...nu e vorba de invidie la mijloc, ABSOLUT ORICINE poate face asa ceva cu NICI UN FEL DE CUNOSTINTA, decat un amarat de video dupa youtube din alte sute despre acest subiect poate face astfel de program, eu unul cred ca mai mult mi-a luat sa scriu asta decat sa fac unul in power shell(c#), sau chiar vb script.

Tot ce spun este, bravo tie, sunt guri rele stai tu calm.. eu unul sunt multumit ca incercati, dar ca sa-ti mearga treaba mai bine, eu zic sa iti mentii glasul la acelasi volum cu proiectele pe care le intitulezi, si le publici pe RST, astfel vei ocoli altercatiile de gen.

Bravo tie, continua tot asa, poate iti iese mai bine sau pe PLACUL publicului:))

Edited June 22, 2012 by me.mello