>Hello sergey,
>Can you please tell me How to send an email with the To: and CC: both at same time.
>
>Thank you.

Try

  .RecipIndex = .RecipCount
  .RecipDisplayName = "<  TO email address >"
  .RecipIndex = .RecipCount
  .RecipDisplayName = "<  CC email address >"
  .RecipType = 2

Even better, download MAPIMAIL class from http://milan.jikos.cz/FoxPro/mapimail.zip