Visual Basic.NET - Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

   
Vista:

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 23/07/2017 22:00:59
Hola!

Esto as algo similar a lo que pregunte anteriormente pero algo mas complejo, seria lo mismo pero enviándolo a un correo electrónico.


Escribo un texto en un TextBox y al presionar el botón quiero que ese texto se envie a un correo electrónico
lo mas sencillo posible, es para unas practicas para aprender y entenderlo luego, creo que hay un código que utiliza el servidor de correo de gmail , pero no lo encuetro, ¿lo conocéis?

Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 24/07/2017 18:02:04
Hola Michael, te paso este codigo con el que yo hago envios desde mis programas, funciona. Deberias colocar los datos correctos y adaptarlo a tu programa, ahi va...

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
'Esta linea al comienzo de tu form
Imports System.Net.Mail
 
'De aqui en adelante donde proceses el texto....
Dim _Mensaje As New MailMessage
Dim _SMTP As New SmtpClient
 
Dim clave as string = "TuPasswordDeCorreo"
 
Dim cuerpoDelMensaje as string = "La cadena de texto que querés enviar"
Dim Origen as string = "[tu nombre de usuario]@gmail.com"
Dim Origen_Detalle as string = "Un nombre amigable para que vean del otro lado"
Dim Asunto as string = "El asunto del correo"
 
'CONFIGURACIÓN DEL STMP
_SMTP.Credentials = New System.Net.NetworkCredential(Origen, Clave)
_SMTP.Host = "smtp.google.com"
_SMTP.Port = 587
_SMTP.EnableSsl = True
 
' CONFIGURACION DEL MENSAJE
_Mensaje.From = New System.Net.Mail.MailAddress(Origen, Origen_Detalle, System.Text.Encoding.UTF8) 'Quien lo envía
_Mensaje.Subject = Asunto 'Asunto del e-mail
_Mensaje.SubjectEncoding = System.Text.Encoding.UTF8 'Codificacion
 
 
_Mensaje.Body = cuerpoDelMensaje 'contenido del mail
_Mensaje.BodyEncoding = System.Text.Encoding.UTF8
_Mensaje.Priority = System.Net.Mail.MailPriority.Normal
_Mensaje.IsBodyHtml = True
 
_SMTP.Send(_Mensaje)

Espero te sirva, saludos y +Bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 25/07/2017 23:49:54
Muchas gracias!

me da error la importación

Imports System.Net.Mail

thump_9772906gmail1

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 26/07/2017 00:14:56
Esa linea, tiene que estár antes de...

1
Public Class Form1

Saludos y +Bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 26/07/2017 00:52:08
Ok ahora si , perfecto!, perdona por el fallo es que soy muy novato,

una ultima cosa, teniendo en cuenta que lo que quiero es enviar el contenido de un textobox a un email y el textbox tiene el nombre "tbMensaje" y el botón para realizar el envio " btEnviar" , como lo añado estos dos a tu código, es que en tu código no veo ningún botón ni textbox, pido perdón de nuevo por pedir tantas cosas es que estoy aprendiendo

Mil gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 26/07/2017 00:57:38
Ningun problema, en la linea 10 del codigo, donde está la variable cuerpoDelMensaje lo igualas al contenido de tu textbox, asi....

1
Dim cuerpoDelMensaje as string = tbMensaje.text

Y todo ese codigo, lo pones dentro del evento click de tu botón, btEnviar.

Espero haber sido claro, saludos y +Bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 26/07/2017 01:11:19
ok! lo tengo casi! veo donde añadir mi email y contraseña, pero no veo donde se añade el email que recibirá el mensaje, ¿que linea es?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 26/07/2017 18:51:50
Si, es verdad, se me olvidó agregar una linea entre la 22 y la 23, podrías agregarla en cualquier orden pero siempre antes de _SMTP.send, solo para facilitar la lectura del codigo. Agrega lo siguiente....

1
_Mensaje.[To].Add("destino@sudominio.com") 'Pone la direccion donde querés enviarlo

Espero te sirva.
Saludos y +Bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 26/07/2017 23:30:53
Añadí la linea con el correo de destino pero al darle al botón de enviar , me da este error, seguí todos los pasos, creo que esta muy cerca pero algo falla

thump_9773442error1
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 27/07/2017 01:10:39
si quieres pongo el codigo completo, pero segui aqui todos los pasos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 27/07/2017 03:26:29
Hola, no hace falta, por el momento, pero la imagen es muy pequeña, no veo cual es el error.... Podrías reenviarlo?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 27/07/2017 16:05:43
Aquí la tienes! pulsa en la imagen

b751b5ddaa7f884f56f8d0be0ecbbabeo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 27/07/2017 19:05:55
Hola, suponiendo que has puesto todos los datos como corresponde, otra cosa que tenes que hacer es habilitar el inicio de sesión en tu cuenta google para "aplicaciones menos seguras", de ese modo google, permitirá el acceso del modo que intentas hacerlo.

Podés seguir el siguiente link para informarte:
https://support.google.com/accounts/answer/6010255?hl=es-419

Fijate si así se resuelve, en mi caso, ese mismo código, me funciona perfecto.
Contanos como te fue.
Saludos y +Bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 27/07/2017 20:39:59
Sigue sin funcionar , te paso todo el codigo

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
Imports System.Net.Mail
 
Public Class Form1
 
 
 
 
    Private Sub btEnviar_Click(sender As Object, e As EventArgs) Handles btEnviar.Click
        'De aqui en adelante donde proceses el texto....
 
        Dim _Mensaje As New MailMessage
 
        Dim _SMTP As New SmtpClient
 
 
 
        Dim clave As String = "123456Abv"
 
 
 
        Dim cuerpoDelMensaje As String = tbMensaje.Text
 
        Dim Origen As String = "michael_89@gmail.com"
 
        Dim Origen_Detalle As String = "Michael"
 
        Dim Asunto As String = "asunto del correo"
 
 
 
        'CONFIGURACIÓN DEL STMP
 
        _SMTP.Credentials = New System.Net.NetworkCredential(Origen, clave)
 
        _SMTP.Host = "smtp.google.com"
 
        _SMTP.Port = 587
 
        _SMTP.EnableSsl = True
 
 
 
        ' CONFIGURACION DEL MENSAJE
 
        _Mensaje.From = New System.Net.Mail.MailAddress(Origen, Origen_Detalle, System.Text.Encoding.UTF8) 'Quien lo envía
 
 
        _Mensaje.[To].Add("maria_gutierrez_92@hotmail.com") 'Pone la direccion donde querés enviarlo
 
        _Mensaje.Subject = Asunto 'Asunto del e-mail
 
        _Mensaje.SubjectEncoding = System.Text.Encoding.UTF8 'Codificacion
 
 
 
 
 
        _Mensaje.Body = cuerpoDelMensaje 'contenido del mail
 
        _Mensaje.BodyEncoding = System.Text.Encoding.UTF8
 
        _Mensaje.Priority = System.Net.Mail.MailPriority.Normal
 
        _Mensaje.IsBodyHtml = True
 
 
 
        _SMTP.Send(_Mensaje)
    End Sub
End Class
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 29/07/2017 04:08:02
¿Has probado si te funciona poniendo tu email?, el que puse aqui es el el verdadero esta claro, era para que vieras como tengo puesto el codido

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 31/07/2017 04:20:22
Hola Michael, si, con mi correo funciona bien, no veo en el código ningun error, una sugerencia es... para revisar de que se trata el error....
Escribe la linea del Send de la siguiente manera

1
2
3
4
5
Try
_SMTP.Send(_Mensaje)
Catch ex as exception
   MsgBox ex.innerexception.tostring
end Try

Eso te dará información adicionar sobre el error, al momento de procesar la solicitud.
Un abrazo y +Bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 31/07/2017 15:23:02
ok! lo hago y te comento muchas gracias por todo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 31/07/2017 22:29:03
me da esta linea como error
0ae0ab769bfaece923239bdb08491912o
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Yamil Bracho (588 intervenciones) el 31/07/2017 22:40:15
ex.InnerException.ToString()
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 31/07/2017 22:50:04
de la unica manera que mee dejo de marcar error fue asi

MsgBox(ex.InnerException.ToString)

este es el mensaje que da al enviar el mail

695a457fc5f8aa779d7a5098908ac8bco
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 01/08/2017 10:18:09
Hola Michael, perfecto, faltaban los parentesis del MsgBox(), es que a veces el código lo escribo directamente aqui y puede haber algún error de tipeo. Bueno, por lo que veo la computadora donde estás intentando hacer el envío está bloqueando de alguna manera la comunicacion directa con el "sitio" smtp.google.com, si tienes un firewall deberías probar a darle acceso a tu programa o directamente desactivarlo.

Una pregunta además, ¿hiciste lo de activar desde tu cuenta de google el acceso a "aplicaciones menos seguras"?

Bueno, espero haberte podido orientar.
Saludos y +Bytes.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 01/08/2017 20:48:33
Hola!

Si activé lo de aplicaciones menos seguras, luego he desactivado el Firewall, y nada, luego lo he vuelto a activar pero dándole permisos de entrada y salida al ejecutable, y sigue el mismo error, luego probé con otra computadora y lo mismo, no me funciona, :(, pensé que sería mas fácil, ¿conoces otro codigo para otro correo,hotmail, yahoo, etc..? este no voy a conseguir hacerlo funcionar nunca :(
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael! (38 intervenciones) el 02/08/2017 00:26:36
Lo tengo amigo! era tan facil como cambiar _SMTP.Host = "smtp.google.com" por _SMTP.Host = "smtp.gmail.com", muchas gracias por todo!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Diego (128 intervenciones) el 02/08/2017 02:08:32
Bien!!!!, ya te estaba enviando el programa "terminado" para que no te desanimaras. Lo mejor de la programación creo que es esto, "los problemas" que se van presentando, si buscas la vuelta, aprendes muchisimo.

De todos modos ya lo había hecho, así que, lo envío, por si alguien lo necesita.
ME alegro que lo hayas podido solucionar.
Saludos y +Bytes.

P.D.: Cree un módulo donde se ubican las constantes que contienen la dirección de correo propia, la clave y un mail destino, para probar el programita. Solo tienen que reemplazar esos valores.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Enviar el contenido de un textbox a un correo electrónico al pulsar un boton

Publicado por Michael (38 intervenciones) el 02/08/2017 02:38:10
Gracias! lo probaré también

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar