11/08/2003, 22:54
|
 | | | Fecha de Ingreso: mayo-2002 Ubicación: Lima, Peru
Mensajes: 4.619
Antigüedad: 22 años, 9 meses Puntos: 7 | |
| Ok. Entonces puedes usar los controles MAPI: MAPISession y MAPIMessage
Un ejemplo simple:
Sesion.LogonUI = True
Sesion.SignOn
Mensaje.SessionID = Sesion.SessionID
´mensajes no leidos
Mensaje.FetchUnreadOnly = True
´Crea un conjunto de mensajes a partir de los mensajes seleccionados en la Bandeja de entrada.
Mensaje.Fetch
If Mensaje.MsgCount 0 Then
For i = 0 To Mensaje.MsgCount - 1
Mensaje.MsgIndex = i
If Mensaje.AttachmentCount 0 Then
For X = 0 To Mensaje.AttachmentCount - 1
Mensaje.AttachmentIndex = X
FileCopy Mensaje.AttachmentPathName, App.Path ...
Next
End If
Next
´ borro el mensaje
Mensaje.Delete
End If
Sesion es un MAPISession
Mensaje es un MAPIMessage
te sirve?
__________________
No tengo firma ahora... :( |