Ayuda con SMTPServer y MessageBox.Show :)

Iniciado por hotlip1, 16 Diciembre 2009, 19:39 PM

0 Miembros y 1 Visitante están viendo este tema.

hotlip1

Bueno, estoy haciendo una app. para mandar mails (con SMTP), con un ProgressBar.
Tengo 2 dudas:
1)Cómo hago para mostrar una MessageBox.Show  cuando ProgressBar1 está al 100%?
Esto es lo que intenté. Sé que lo que está en rojo está mal pero no se que poner para reemplazarlo:
    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.[color=red]Click[/color]
        If ProgressBar1.Value = ProgressBar1.Maximum Then
            MessageBox.Show("", "", MessageBoxButtons.OK, MessageBoxIcon.Exclamation
    End Sub


2)Cómo hago para mandar un mail? Además, dónde debo poner el código?
Estos son los códigos que intenté:
            Dim from As String
            Dim To As String
            Dim subject As String
            Dim messageText As String
            SmtpMail.Send(from, To, subject, messageText)

            Private mailMsg As MailMessage = New MailMessage()
            Private mailMsg.From = smtp.live.com
            Private mailMsg.To = pepe@hotmail.com
            Private mailMsg.Subject = "lalala"
            Private mailMsg.Body = "lalala"
            SmtpMail.Send(mailMsg)



Desde ya, muchas gracias.

raul338