Ver Mensaje Individual
  #4 (permalink)  
Antiguo 08/03/2005, 08:33
Avatar de vbx3m
vbx3m
 
Fecha de Ingreso: febrero-2005
Ubicación: Venezuela
Mensajes: 524
Antigüedad: 20 años, 2 meses
Puntos: 1
Mail

Prueba poniendo este codigo:

Private Sub Enviar_Click()
EnviarEmail
End Sub

Private Sub EnviarEmail()
MAPISession1.SignOn
MAPIMessages1.SessionID = -1
MAPIMessages1.Compose
MAPIMessages1.RecipAddress = Correo
MAPIMessages1.MsgSubject = Asunto
MAPIMessages1.MsgNoteText = Mensaje
MAPIMessages1.MsgReceiptRequested = True
MAPIMessages1.Send False
MAPISession1.SignOff
End Sub

Tienes que utilizar el control MAPIMessages...Pruebalo y me dices que tal...
__________________
ホルヘ・ラファエル・マルティネス・レオン