You have to create text body first (as shown in the sample code)

	.Subject  = This.cSubject

	.TextBody = "..."
	.TextBodyPart.Charset = "big5"

>I try to add .TextBodyPart.Charset = "big5" (cdoBIG5) into your code as follows. However after adding the line, an error message "The requested body part was not found in this message" is got. Do I need to add another lines?
>
>

>...
>With This.oMsg
>	.From     = This.cFrom
>	.ReplyTo  = This.cReplyTo
>	.To       = This.cTo
>	.CC       = This.cCC
>	.BCC      = This.cBCC
>	.Subject  = This.cSubject
>
>	.TextBodyPart.Charset = "big5"
>
>	...
>EndWith
>...
>

>
>Ben
>