How To Send Name Of Email Sender Using CDONTS.

I'm not new about send email with CDONTS. But one thing I don't
know.. How to send name of email sender with email. As All command
I used to use is as follow.

Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From="tom@hotmail.com"
myMail.To="paul@hotmail.com"
myMail.Subject="Hello :-)"
myMail.BodyFormat=0
myMail.MailFormat=0
myMail.Body=HTML
myMail.Send

when the reciever recieve email. Such as in hotmail box. It will show
tom@hotmail.com as sender. But I want it to show name such as
...Tom Hariton not tom@hotmail.com But I don't know that command
to add in the script.