PROBLEMAS DE COLORES CON MAIL MAPI
Publicado por Nestor (3 intervenciones) el 26/04/2009 23:31:28
Mi consulta es la siguiente, tengo un programa que envia mail, el mismo funciona perfecto, el problema es que; mi msgnotetext es un richtextbox con un texto predefinido como un encabezado de pagina y lo puse en AZUL pero la persona que lo recibe, lo recibe en color negro y el tamaño es distinto tambien, y yo quiero que el mismo llegue tambien en azul y del mismo tamaño que lo configure, necesito un codigo o solucion...
desde ya agradezo su ayuda...gracias este es mi codigo pero no funciona
Private Sub Command4_Click()
MAPIMessages1.Compose
MAPIMessages1.RecipDisplayName = Text1.Text
MAPIMessages1.MsgSubject = Text2.Text
MAPIMessages1.MsgNoteText = RichTextBox1.Text
Form4.RichTextBox1.SelText = "USO CONFIDENCIAL DE LA EMPRESA (Ginfo)"
Form4.RichTextBox1.SelStart = 0
Form4.RichTextBox1.SelLength = 38
Form4.RichTextBox1.SelFontSize = 16
Form4.RichTextBox1.SelColor = vbBlue
Form4.RichTextBox1.SelBold = True
Form4.RichTextBox1.SelItalic = True
Form4.RichTextBox1.SelUnderline = True
MAPIMessages1.ResolveName
MAPIMessages1.Send
end sub
desde ya agradezo su ayuda...gracias este es mi codigo pero no funciona
Private Sub Command4_Click()
MAPIMessages1.Compose
MAPIMessages1.RecipDisplayName = Text1.Text
MAPIMessages1.MsgSubject = Text2.Text
MAPIMessages1.MsgNoteText = RichTextBox1.Text
Form4.RichTextBox1.SelText = "USO CONFIDENCIAL DE LA EMPRESA (Ginfo)"
Form4.RichTextBox1.SelStart = 0
Form4.RichTextBox1.SelLength = 38
Form4.RichTextBox1.SelFontSize = 16
Form4.RichTextBox1.SelColor = vbBlue
Form4.RichTextBox1.SelBold = True
Form4.RichTextBox1.SelItalic = True
Form4.RichTextBox1.SelUnderline = True
MAPIMessages1.ResolveName
MAPIMessages1.Send
end sub
Valora esta pregunta


0