Visual Basic y Lotus Notes
Hola, estoy haciendo una aplicación en visual que manda emails através de lotus notes. El problema es que al recibir el correo no puedo leer el fichero adjunto por que al mandarlo lo hago como richtext y al recibirlo se ha convertido en text. Alguien sabe como solucionarlo??
Gracias
Gracias
Miren con este codigo yo envio archivos adjuntos sin problema y me los recibe bien.
MAPISession1.UserName =
MAPISession1.NewSession = False
MAPISession1.DownLoadMail = False
MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.MsgIndex = -1 ' nuevo mensaje
MAPIMessages1.RecipDisplayName = destinatario
MAPIMessages1.MsgSubject = asunto
MAPIMessages1.MsgNoteText = texto1
MAPIMessages1.AttachmentIndex = 0
MAPIMessages1.AttachmentName = anexo
MAPIMessages1.AttachmentPathName = ruta
MAPIMessages1.AttachmentPosition = 0
MAPIMessages1.AttachmentType = 0
MAPIMessages1.Send False
MAPISession1.SignOff
Esto en lotus notes. de pronto si ustedes sben como envio los archivos pero en formato Zip les agradeceria.
MAPISession1.UserName =
MAPISession1.NewSession = False
MAPISession1.DownLoadMail = False
MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.MsgIndex = -1 ' nuevo mensaje
MAPIMessages1.RecipDisplayName = destinatario
MAPIMessages1.MsgSubject = asunto
MAPIMessages1.MsgNoteText = texto1
MAPIMessages1.AttachmentIndex = 0
MAPIMessages1.AttachmentName = anexo
MAPIMessages1.AttachmentPathName = ruta
MAPIMessages1.AttachmentPosition = 0
MAPIMessages1.AttachmentType = 0
MAPIMessages1.Send False
MAPISession1.SignOff
Esto en lotus notes. de pronto si ustedes sben como envio los archivos pero en formato Zip les agradeceria.
