Envia a Email con Vb 6.0

ferock
25 de Mayo del 2006
Saludos
esta vez necesito saber como puedo hacer para mandar un email a un correo determinado, si es ke se puede con visual basic 6.0?

agradeciendo de antemano su pronta respuesta

carlozano13
25 de Mayo del 2006
Private Sub Command3_Click()
MAPISession1.NewSession = False
MAPISession1.UserName = " "
MAPISession1.Password = " "
MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.Compose
' MAPIMessages1.MsgIndex = -1 ' nuevo mensaje
MAPIMessages1.MsgSubject = asunto
MAPIMessages1.MsgNoteText = texto1
MAPIMessages1.RecipDisplayName = destinatario
' MAPIMessages1.AttachmentIndex = 0
' MAPIMessages1.AttachmentName = anexo
MAPIMessages1.AttachmentPathName = ruta
' MAPIMessages1.AttachmentPosition = 0
' MAPIMessages1.AttachmentType = 0
MAPIMessages1.Send
' MAPIMessages1.Action = 3
MAPISession1.SignOff
Command3.Enabled = False
End Sub

Lo tengo implementado y funciona. se debe agregar los dos controles MAPI