Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 2
Ir a la página 1, 2  Siguiente
 
La Clase SMTP
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje La Clase SMTP 
 
Esta clase sirve para enviar email mediante SMTP.

Requiere GB.NET.SMTP

Propiedades

from
Indica el email origen. Debe ser por tanto un string con un email válido para admitir respuesta.

Host
El servidor SMTP que recibirá el email

Port
El puerto SMTP a utilizar. Por defecto es el 25.

Subject
El asunto del email

to
La lista dedestinatarios del mensaje. Utiliza el método add para añadir destinatarios
MiMail.to.add="direccion@dominio.com"

cc
Funciona igual que la propiedad to. Contiene direcciones que recibirán el email pero que no son parte directamente interesada. Es como enviar una copia al jefe de lo que se ha dicho en el email.

bcc
Igual que cc pero sin dejar registro alguno. Los destinatarios normales no sabrán que también el email llegó a los destinatarios bcc.

Métodos
add
Para añadir destinatarios al mensaje, a bcc o a cc.
El contenido es un string que contiene el email válido del destinatario.

También se utiliza para añadir adjuntos al email. En este caso los parámetros son:
add(cuerpo_del_email,Tipomime, Nombre_archivo).
Si no se ponde Tipomime se utiliza "text/plain".
Nombre_archivo es el adjunto que se desea enviar y es obviamente opcional.
El cuerpo del email es un string donde dice lo que el email debe decir.
gambas no soporta todos los mime-types.
Esta es la lista de mime-types
Lista de mime-types

send
Hacer efectiva la orden de enviar el email

Ejemplo
Enviar un email con un adjunto a las direcciónes destino1 y . Llegará también una copia a la dirección y se adjuntará el archivo.txt

sub Enviar()
Dim Correo as smtpclient, CRLF as string, CuerpoEmail as string
Dim EmailOrigen as string, EmailDestino1 as string, EmailDestino2 as string,EmailJefe as string
Dim Host as string, Puerto as string, Asunto as string, Mime as string, Cuerpo as string, Adjunto as string

EmailOrigen="EmailDelSistema@aplicación.com"
Host="localhost"
Puerto="25"
CRLF=chr(13) & chr(10)
Asunto="este es el asunto del email"
Mime="text/plain"
EmailDestino1="Destino1@aplicacion.com"
EmailDestino2="Destino2@aplicacion.com"
EmailJefe="Jefe@aplicacion.com"
Adjunto="Archivo.txt"

Correo=new smtpclient
correo.from=EmailOrigen
correo.host=host
correo.port=puerto
correo.subject=asunto
Correo.to.add=EmailDestino1
Correo.to.add=EmailDestino2
Correo.cc.add=EmailJefe

Cuerpo="*****************************" & CRLF
Cuerpo &= "" & CRLF
Cuerpo &="" & format(now,"dd/mm/yyyy") & CRLF
Cuerpo & = "" & CRLF
Cuerpo &="*****************************" & CRLF
Cuerpo &="Este es un emal automático. No lo responda pues nadie lo leerá." & CRLF
Cuerpo &= "Adjunto se encuentra el informe correspondiente" & CRLF
Cuerpo &= "Un saludo"
Correo.add(Cuerpo,mime,adjunto)

try correo.send

catch
message.error("No se pudo enviar el mensaje")

end

 



 
última edición por soplo el Sabado, 28 Noviembre 2009, 14:57; editado 1 vez 
soplo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
Hola he intentado implementar este fragmento de código en mi programa y me da error sistemáticamente, trabajo con gambas 2.23

Es posible que falten parámetros??? no sé... alguna pista? Gracias
 



 
sasogu - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
¿que error obtienes?
 



 
soplo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
De momento he deshechado la opción, voy a complicarme por otro lado  
 



 
sasogu - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
si no me dices el error no te puedo ayudar. A mi me funciona perfectamente.
 



 
soplo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
Soplo, antes que nada quiero agradecer el instructivo, excelente como todos los que escribiste y que son de tremenda ayuda!!!!
Estuve intentando enviar un mail mediante la clase SMTP pero solo recibo el mensaje de error.
Mi pregunta es, para poder utilizar el código que exponés como ejemplo es necesario instalar algún tipo de servidor local?
Funciona tal cual y como lo pones? me refiero a "LOCALHOST"y puerto 25. Puedo hacer el envio con un smtp de yahoo, gmail, etc? ya que no lo logé de ninguna manera.
Estoy usando Gambas3.
 



 
Marcelo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
Hola.

Estoy intentando usar esta clase para el envio de emails. Casi todo funciona correctamente, el envío se realiza sin errores desde una cuenta gmail, pero lo único que no puedo es agregar un fichero adjunto.
Lo he intentado con un fichero .txt y un .pdf y ninguno me aparece en el email como fichero adjunto.

No creo que se trate de un problema de permisos, pues el fichero lo creo con la misma aplicación.

¿Alguien ha logrado enviar ficheros adjuntos con éxito usando esta clase?.

Por cierto, uso gambas3 y Ubuntu.
 



 
Litoman - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
estoy tratando de usar algo parecido a eso codigo y me tira este error:
 enviarcorreo_error

que estoy haciendo mal?





Public Sub Form_Open()

End

Public Sub btnEnviar_Click()

Dim Correo As Smtpclient, CuerpoEmail As String
Dim EmailOrigen As String, EmailDestino1 As String
Dim Host As String, Puerto As String, Asunto As String, Mime As String, Cuerpo As String, Adjunto As String

EmailOrigen = txtDE.Text
Host = "smtp.live.com"
Puerto = "587"
Asunto = txtAsunto.Text
Mime = "text/plain"
EmailDestino1 = "uno.cero@live.com"


Correo = New Smtpclient
correo.from = EmailOrigen
correo.host = host
correo.port = puerto
correo.subject = asunto
Correo.to.add = EmailDestino1
Adjunto = "Archivo.txt"

Cuerpo = TextArea1.Text

Correo.add(Cuerpo, mime, Adjunto)

Try correo.send

Catch
message.error("No se pudo enviar el mensaje: " & Error.Text)

End
 

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
v3ctor:

Shordi ha comentado en este hilo ( http://www.gambas-es.org/viewtopic.php?t=524&p=20869#p20869) como lo hace.

Y con lo que ha explicado, he montado un ejemplo en mi blog: http://jsbsan.blogspot.com.es/2014/...icos-desde.html

Saludos

Julio
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
última edición por jsbsan el Miercoles, 12 Marzo 2014, 16:00; editado 1 vez 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: La Clase SMTP 
 
jsbsan escribió: [Ver mensaje]
v3ctor:

Shordi ha comentado en este hilo ( http://www.gambas-es.org/viewtopic.php?t=524&p=20869#p20869) como lo hace.

Y con lo que ha explicado, he montado un ejemplo en mi blog: http://jsbsan.blogspot.com.es/2014/...icos-desde.html

Saludos

Julio


todo bien pero los novatos necesitamos ejemplos SUPER SIMPLES, cosas muy básicas y muy bien explicadas, lo complejo se hace después de entender los conceptos básicos de la clase smtp  
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
última edición por v3ctor el Viernes, 14 Marzo 2014, 15:46; editado 1 vez 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 

Publicar nuevo tema  Responder al tema  Página 1 de 2
Ir a la página 1, 2  Siguiente

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario