io uso questa struttura

codice:
DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")

With iMsg
	Set .Configuration = iConf
	.To = "DESTINATARIO"
	.From = "MITTENTE"  'mittente esistente nel dominio
	.BCC="COPIA CARBONE NASCOSTA"
	.Subject = "OGGETTO
	.HTMLBody = "MESSAGGIO"
	.Send
End With
con .htmlbody stabilisco che invio una pagina html