RE:Enviar dw en pdf por correo
Hola mira lo primero es q el dw tienes q guardarlo en la extencio que quieres
por ejemplo
C:ARCHIVO.PDF
luego haria este proceso
mailSession mSes
mailReturnCode mRet
mailMessage mMsg
// aca se crea la sesion
mSes = create mailSession
// inicia la session
mRet = mSes.mailLogon(mailNewSession!)
//pregunta que si al iniciar la sesion hubo un problema
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail", 'Logon failed.')
RETURN
END IF
mMsg.Subject = mle_subject.Text
mMsg.NoteText = 'ACA VA UNA NOTA QUE IRA EN EL CORREO'
mMsg.Recipient[1].name = 'DIRECCION DE CORREO 1 '
mMsg.Recipient[2].name = 'DIRECCION DE CORREO 2 '
// ACA ESTA EL ARCHIVO A ADJUNTAR
mMsg.AttachmentFile = "C:ARCHIVO.PDF"
// ACA ENVIA EL EMAIL
mRet = mSes.mailSend(mMsg)
// SI OCURRIO UN ERROR TE MANDA EL MENSAJE
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail Send", 'Mail not sent')
RETURN
END IF
// ACA CIERRA TU SESSION
mSes.mailLogoff()
ACA DESTRUYE LA INSTANCIA
DESTROY mSes
PDT. TIENES Q TENER UN USUARIO CONFIGURADO PARA PODER ENVIARLO
POR EJEMPLO OUTLOOK
ESPERO HABERTE AYUDADO
Saludos
Luis Mota
Lima - Peru