hola a todos, estoy creando un aplicación y dentro de sus funciones es la de adjuntar archivos para enviar por mail, pero no veo la forma atraves de estos dos MAPIs de abrir el compositor de mensaje nuevos del Outlook Express?? Mi idea es que se abra el compositor con los adjuntos agregados!!!.-
El condigo que encontré en internet fue este pero como ya dije antes no me abre el compositor de mail, como puedo modifcarlo para que lo haga???
'================================================= ======
MAPISession1.UserName = "nombre del remitente"
MAPISession1.NewSession = True
MAPISession1.DownLoadMail = False
' o false si no deseas recibir
MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.MsgIndex = -1
' nuevo mensaje
MAPIMessages1.RecipDisplayName = "
[email protected]"
MAPIMessages1.ResolveName ' esto comprueba que el destinatario exista en las direcciones
MAPIMessages1.MsgSubject = "texto del asunto"
MAPIMessages1.MsgNoteText = "texto del mensaje"
' si deseas anexar algun archivo al mail:
MAPIMessages1.AttachmentIndex = 0
' numero del anexo, 0,1,2,3....
MAPIMessages1.AttachmentName = "muc.zip"
MAPIMessages1.AttachmentPathName = "c:\muc.zip"
MAPIMessages1.AttachmentPosition = 1
' numero del anexo, 0,1,2,3...
MAPIMessages1.AttachmentType = 0
' archivo de datos ' (puedes anexar varios archivos, incrementando el numero 0,1,2,3....) ' Y por fin, enviarlo:
MAPIMessages1.Send
' Cuando ya no tengas que enviar ningun mail más:
MAPISession1.SignOff
'================================================= ======
Saludos a todos y espero su ayuda!.. Gracias por todo desde ya!