I never did this myself but maybe it helps to set the content language
also like this:

Flds("urn:schemas:mailheader:content-language") =3D "de"

<Siegfried />

> -----Original Message-----
> From: Robert van der Kooij [mailto:rvanderkooij@h...]
> Sent: Thursday, May 30, 2002 8:24 PM
> To: ASP CDO
> Subject: [asp_cdo] Sending Japanese emails via CDOSYS using Oracle
utf8 db
>
> Hi,
>
> Using to code below I'm able to send email's with Japanese characters
if I
> use an access 2000 db. If I try to do the same but then using a
Oracle8
> (utf8) database it fails. I'm getting only scrambled content.
> Does anybody have any idea / experience in sending emails with
mulitbyte
> characters using CDOSYS and Oracle?
>
> Thanks,
> Robert
>
>
> Set objConfig =3D CreateObject("CDO.Configuration")
>
>       objConfig.Fields.Item(cdoSendUsingMethod) =3D cdoSendUsingPort
>         objConfig.Fields.Item(cdoSMTPServer) =3D "mailserver"
>         objConfig.Fields.Item(cdoSMTPConnectionTimeout) =3D 30
>         objConfig.Fields.Item(cdoSMTPServerPort) =3D 25
>         objConfig.Fields.Update
>
> Set iMsg =3D CreateObject("CDO.Message")
>         Set iMsg.Configuration =3D objConfig
>
> With iMsg
> 	.From    =3D "name@m..."
> 	.To      =3D "name@m..."
> 	.Subject =3D "A Japanese text message."
> End With
>
>
> Set iBp =3D iMsg.BodyPart
> With iBp
>    .Charset =3D "iso-2022-jp"
>    .ContentMediaType        =3D "text/plain"
>    .ContentTransferEncoding =3D "uuencode"
>
>    Set Stm =3D .GetDecodedContentStream
>    Stm.WriteText  rs3(1) & vbCrLf
>    Stm.Flush
>
> End With
>
> iMsg.Send
>

Also you might want to try "quoted-printable" instead of "uuencode".

<Siegfried />

> -----Original Message-----
> From: Robert van der Kooij [mailto:rvanderkooij@h...]
> Sent: Thursday, May 30, 2002 8:24 PM
> To: ASP CDO
> Subject: [asp_cdo] Sending Japanese emails via CDOSYS using Oracle
utf8 db
>
> Hi,
>
> Using to code below I'm able to send email's with Japanese characters
if I
> use an access 2000 db. If I try to do the same but then using a
Oracle8
> (utf8) database it fails. I'm getting only scrambled content.
> Does anybody have any idea / experience in sending emails with
mulitbyte
> characters using CDOSYS and Oracle?
>
> Thanks,
> Robert
>
>
> Set objConfig =3D CreateObject("CDO.Configuration")
>
>       objConfig.Fields.Item(cdoSendUsingMethod) =3D cdoSendUsingPort
>         objConfig.Fields.Item(cdoSMTPServer) =3D "mailserver"
>         objConfig.Fields.Item(cdoSMTPConnectionTimeout) =3D 30
>         objConfig.Fields.Item(cdoSMTPServerPort) =3D 25
>         objConfig.Fields.Update
>
> Set iMsg =3D CreateObject("CDO.Message")
>         Set iMsg.Configuration =3D objConfig
>
> With iMsg
> 	.From    =3D "name@m..."
> 	.To      =3D "name@m..."
> 	.Subject =3D "A Japanese text message."
> End With
>
>
> Set iBp =3D iMsg.BodyPart
> With iBp
>    .Charset =3D "iso-2022-jp"
>    .ContentMediaType        =3D "text/plain"
>    .ContentTransferEncoding =3D "uuencode"
>
>    Set Stm =3D .GetDecodedContentStream
>    Stm.WriteText  rs3(1) & vbCrLf
>    Stm.Flush
>
> End With
>
> iMsg.Send
>