Visual Basic - Correo no envía imagenes

Hola a todos.
Estoy haciendo un programa para enviar archivos html como e-mails y no me envía las imagenes de archvio, solo me envía el texto y en las imagenes deja el sitio vacio.
Si ese archivo lo envio directamente desde Outlock me lo envía perfectamente.
Os adjunto la rutina para ver si me podeis decir cual es el fallo.
Muchas gracias a todos

Private Sub enviaremail(x As String)
'On Error GoTo ErrorPreparar

With MAPISession1
.DownLoadMail = False 'para que no comience a decargar los mails
.LogonUI = True
.SignOn
.NewSession = False ' para que no abra otro cliente de correo si ya tenes uno abierto
MAPIMessages1.SessionID = MAPISession1.SessionID
End With
With MAPIMessages1
.Compose
.RecipAddress = x 'direccion de correo
.AddressResolveUI = True
.ResolveName

.MsgSubject = "PLAN RENOVE " ' asunto del mensaje

.AttachmentPathName = "C:\pyme.htm" 'esta es la pagina que envío
.Send False ' para que no lo envie ahora
End With
MAPISession1.SignOff 'cierra la sesion
'End If

Exit Sub

las imagenes de html son referencias, archivos a parte. si no los mandas tambien no los verás.

un saludo

Si, las imagenes son referencias, pero cuando envío un correo desde el outlock, solo envío la pagina y el propio outlock se encarga de enviar todo y yo quiero hacerlo así, porque cuando envío una pagina no se las imágenes que hay en ellas. Tiene que haber una opcion para decirle que envíe la pagina con todas las imágenes que tiene.

Solo quiero Preguntar que control usas para enviar los e-mail estoy desarrollando una app, y quiero enviar un e-mail desde alli y no he podido Gracias un saludo