CDOSYS - inviare mail in formato html.

[maximum]

Uso questo codice:

			
'spedisce la mail a chi compie gli anni
strFrom = "Intermania.it"
sBody = "<div class='linkpiccoli'>Ciao, " & objrs("Username") & ""  
sBody = sBody & "
Intermania.it e il suo Staff ti augurano buon compleanno!
"
sBody = sBody & "[img]images/regalo.gif[/img]
"			
sBody = sBody & "Torna a Trovarci!

"			
sBody = sBody & " *** L'amministratore del sito *** </div>"
	
With iMsg
   Set .Configuration = iConf
   .To = objrs("Email")
   .From = strFrom
   .Sender = objrs("Email")
   .Subject = "*** Tanti Auguri di Buon Compleanno ***"
   .HTMLBody = "" & sBody & ""
   .Send
End With
'fine mail

Vorrei inviare in formato HTML il contenuto della mail.
Però non riesco nè a fare visualizzare l'immagine, nè a formattare il testo con la classe del CSS richiamato.
Del formato HTML mi prendere solo i tag e
, perchè gli altri no? :master:

Grazie per i suggerimenti.

[maximum]

Sono riuscito a formattare il testo, mi manca solo di visualizzare l'immagine nella mail, non ci riesco, come mai?

Faccio questo:

sBody = sBody & "[img]images/regalo.gif[/img]
"

Come mai?

[maximum]

Ho risolto così:

sBody = sBody & "
"