GeneXus - ENVIAR MAIL

Buenas

Mi consulta era para saber como enviar mail mediante genexus, probe con lo siguiente y no funciono, no se si falta algo. Por ejemplo, no se donde ubicar el SMTP: que seria mail.speedy.com.ar

________________________________________________________
&MailRecipient.Address = '[email protected]'
&MailRecipient.Name = 'Diego'
&SMTP.Login()
&SMTP.Password = '111111111'
&SMTP.Sender = &MailRecipient
&MailRecipient.Address = '[email protected]'
&SMTP.Port = 25

&to.Address = '[email protected]'
&to.Name = 'Die'

&Message.To.Add(&to)
&Message.Text = 'Prueba del envio de mail'
&Message.Subject = 'Prueba'
&SMTP.Send(&Message)
msg('Envio correctamente')
msg(&SMTP.ErrCode)
msg(&SMTP.ErrDescription)
msg(&SMTP.ErrDisplay)
&SMTP.Logout()
________________________________________________________

Visual Basic, Gx 8
Gracias

Proba de agregarle un punto y coma al final del address (;)

Saludos PF

Hola ! Tengo una rutina de envío de emails HTTP Genexus 7.5 foxpro 6.0 vía Citrix que funcionó sin problemas durante años pero ahora... No corre más. El error que devuelve es Not Logged In
No podemos identificar qué lo está frenando. La misma rutina corriendo en la red Windows funciona sin errores

Saludos

Virginia

Ok, pruebo con eso, Pero para darte otro dato, Cuando muestro &smtp.errDescription en un msg me dice NOT LOGGED IN, Como puedo solucionar eso?, gracias

Creo que te falta poner los datos en el SMTP antes de hacer login(). Tienes que poner el user y el password y luego hacer login.

Hola... tengo el siguiente error "19.00 Invalid attach" esto sucede cuando adjunto un archivo. el codigo q manejo es el sisguiente:

&SmtpSession.AttachDir = 'D:\'
&PathAdjunto = "prueba.txt"

&Attach = &PathAdjunto
&FileExist = FileExist(&Attach)
If &FileExist = 0
&Mensajes1 =&Attach.ToString() + ' - ' + 'el archivo no existe'
Else
&Mensajes1 = 'el archivo existe' + newline()
&MailMessage.Attachments.Add(&Attach)
EndIf

estoy trabajando en genexus x .