CDO Message Problem

[9ntw9]

I'm having trouble with an html formatted email that is being delivered

to a client. Every 80 characters there is a forced space being added
to the emails (by the server? by cdo Message?) and it's causing the
html tags to be broken. The unusual thing is that I cannot replicate
the error locally in Outlook, or @ gmail or @ hotmail. Only the client

is having the issue (Using Outlook Express).

Is this an issue that most mail clients have resolved, or is this
something that I will have to take care of from my side?


Thanks!

[Anthony Jones]

"9ntw9" <nathaniel.williams@gmail.com> wrote in message
news:1167834352.020953.260230@k21g2000cwa.googlegr oups.com...

> I'm having trouble with an html formatted email that is being delivered
>
> to a client. Every 80 characters there is a forced space being added
> to the emails (by the server? by cdo Message?) and it's causing the
> html tags to be broken. The unusual thing is that I cannot replicate
> the error locally in Outlook, or @ gmail or @ hotmail. Only the client
>
> is having the issue (Using Outlook Express).
>
> Is this an issue that most mail clients have resolved, or is this
> something that I will have to take care of from my side?
>

Sounds like the body is not being formatted as quoted-printable. Can you
show some code you are using to create the email?
Can you change the configuration object to use a temporary folder as a
pickup folder instead of port 25? you can then examine the exact EML file
being created.

>
> Thanks!
>

[9ntw9]

Thanks for your time,

Here is the code being used to send the mail:

Set objMail = Server.CreateObject("CDO.Message")
objMail.MIMEFormatted=true
objMail.From = sFrom
objMail.To = sTo
objMail.Subject= sSubject
objMail.HTMLBody = sTextBody
objMail.Send

I set the MIMEFormatted = True after reading an article that suggested
it would fix the problem, but no luck. (There was no apparent change)

sTextBody (the contents being afftected by the issue) is derived from a
chunk of code that pulls various items out of a db and builds them into
an html table for viewing (6 cols wide, N cols long) ... the html being
written is standard, and there's nothing too fancy going on. The
contents of sTextBody are not being prepped for email (do they need to
be, if so, in what fashion?), the html inside sTextBody are written as
though for a standard webpage (although without opening html tags,
basically written to be dropped into the body section of a website).

Thanks again,

Nathaniel


Anthony Jones wrote:

> "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> news:1167834352.020953.260230@k21g2000cwa.googlegr oups.com...

> > I'm having trouble with an html formatted email that is being delivered
> >
> > to a client. Every 80 characters there is a forced space being added
> > to the emails (by the server? by cdo Message?) and it's causing the
> > html tags to be broken. The unusual thing is that I cannot replicate
> > the error locally in Outlook, or @ gmail or @ hotmail. Only the client
> >
> > is having the issue (Using Outlook Express).
> >
> > Is this an issue that most mail clients have resolved, or is this
> > something that I will have to take care of from my side?
> >

>
> Sounds like the body is not being formatted as quoted-printable. Can you
> show some code you are using to create the email?
> Can you change the configuration object to use a temporary folder as a
> pickup folder instead of port 25? you can then examine the exact EML file
> being created.
>
>

> >
> > Thanks!
> >

[9ntw9]

Just to add, I recently added the 1st function on this page to my mail:

[url]http://www.motobit.com/tips/detpg_quoted-printable-encode/[/url]

so now the line reads : objMail.HTMLBody =
QuotedPrintableEncode(sTextBody, "") instead of objMail.HTMLBody =
sTextBody

I am not sure if this is what you were referring to originally, but
after a quick look at the results I've found that it does a pretty good
job of destroying the formatting of the html (squishes it), and it
renders images a small black squares.


9ntw9 wrote:

> Thanks for your time,
>
> Here is the code being used to send the mail:
>
> Set objMail = Server.CreateObject("CDO.Message")
> objMail.MIMEFormatted=true
> objMail.From = sFrom
> objMail.To = sTo
> objMail.Subject= sSubject
> objMail.HTMLBody = sTextBody
> objMail.Send
>
> I set the MIMEFormatted = True after reading an article that suggested
> it would fix the problem, but no luck. (There was no apparent change)
>
> sTextBody (the contents being afftected by the issue) is derived from a
> chunk of code that pulls various items out of a db and builds them into
> an html table for viewing (6 cols wide, N cols long) ... the html being
> written is standard, and there's nothing too fancy going on. The
> contents of sTextBody are not being prepped for email (do they need to
> be, if so, in what fashion?), the html inside sTextBody are written as
> though for a standard webpage (although without opening html tags,
> basically written to be dropped into the body section of a website).
>
> Thanks again,
>
> Nathaniel
>
>
> Anthony Jones wrote:

> > "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> > news:1167834352.020953.260230@k21g2000cwa.googlegr oups.com...

> > > I'm having trouble with an html formatted email that is being delivered
> > >
> > > to a client. Every 80 characters there is a forced space being added
> > > to the emails (by the server? by cdo Message?) and it's causing the
> > > html tags to be broken. The unusual thing is that I cannot replicate
> > > the error locally in Outlook, or @ gmail or @ hotmail. Only the client
> > >
> > > is having the issue (Using Outlook Express).
> > >
> > > Is this an issue that most mail clients have resolved, or is this
> > > something that I will have to take care of from my side?
> > >

> >
> > Sounds like the body is not being formatted as quoted-printable. Can you
> > show some code you are using to create the email?
> > Can you change the configuration object to use a temporary folder as a
> > pickup folder instead of port 25? you can then examine the exact EML file
> > being created.
> >
> >

> > >
> > > Thanks!
> > >

[elesus@gmail.com]

I was searching the web for quite some time trying to solve pretty same
problem.
My script is the same as yours Nathaniel. Since last month or so I
started to get wrapped html mails, before that everything was just
fine. May it be some ms update to the cdosys component?

In my case I get html mails where some characters disappear or spaces
are added, so it breaks the html structure.

Have not found solution yet. Will post here if found.

Alex

9ntw9 raše:

> Just to add, I recently added the 1st function on this page to my mail:
>
> [url]http://www.motobit.com/tips/detpg_quoted-printable-encode/[/url]
>
> so now the line reads : objMail.HTMLBody =
> QuotedPrintableEncode(sTextBody, "") instead of objMail.HTMLBody =
> sTextBody
>
> I am not sure if this is what you were referring to originally, but
> after a quick look at the results I've found that it does a pretty good
> job of destroying the formatting of the html (squishes it), and it
> renders images a small black squares.
>
>
> 9ntw9 wrote:

> > Thanks for your time,
> >
> > Here is the code being used to send the mail:
> >
> > Set objMail = Server.CreateObject("CDO.Message")
> > objMail.MIMEFormatted=true
> > objMail.From = sFrom
> > objMail.To = sTo
> > objMail.Subject= sSubject
> > objMail.HTMLBody = sTextBody
> > objMail.Send
> >
> > I set the MIMEFormatted = True after reading an article that suggested
> > it would fix the problem, but no luck. (There was no apparent change)
> >
> > sTextBody (the contents being afftected by the issue) is derived from a
> > chunk of code that pulls various items out of a db and builds them into
> > an html table for viewing (6 cols wide, N cols long) ... the html being
> > written is standard, and there's nothing too fancy going on. The
> > contents of sTextBody are not being prepped for email (do they need to
> > be, if so, in what fashion?), the html inside sTextBody are written as
> > though for a standard webpage (although without opening html tags,
> > basically written to be dropped into the body section of a website).
> >
> > Thanks again,
> >
> > Nathaniel
> >
> >
> > Anthony Jones wrote:

> > > "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> > > news:1167834352.020953.260230@k21g2000cwa.googlegr oups.com...
> > > > I'm having trouble with an html formatted email that is being delivered
> > > >
> > > > to a client. Every 80 characters there is a forced space being added
> > > > to the emails (by the server? by cdo Message?) and it's causing the
> > > > html tags to be broken. The unusual thing is that I cannot replicate
> > > > the error locally in Outlook, or @ gmail or @ hotmail. Only the client
> > > >
> > > > is having the issue (Using Outlook Express).
> > > >
> > > > Is this an issue that most mail clients have resolved, or is this
> > > > something that I will have to take care of from my side?
> > > >
> > >
> > > Sounds like the body is not being formatted as quoted-printable. Canyou
> > > show some code you are using to create the email?
> > > Can you change the configuration object to use a temporary folder as a
> > > pickup folder instead of port 25? you can then examine the exact EML file
> > > being created.
> > >
> > >
> > > >
> > > > Thanks!
> > > >

[9ntw9]

I've tried another approach now:

function tester (sBody)
Dim iMsg
Dim iBp1
Dim iBp3
Dim Stm

Set iMsg = CreateObject("CDO.Message")

With iMsg
.From = sFrom
.To = sTo
.Subject = sSubject
End With

Set iBp1 = iMsg.BodyPart
iBp1.ContentMediaType = "multipart/mixed"

Set iBp3 = iBp1.AddBodyPart
With iBp3
.ContentMediaType = "text/html"
.ContentTransferEncoding = "quoted-printable"
Set Stm = .GetDecodedContentStream
Stm.WriteText sBody
Stm.Flush
End With

Stm.Close
Set Stm = Nothing
iMsg.Send
end function





---------
i then wrote iMsg.GetStream.ReadText to the screen and got this:

thread-index: AccwS7JFFUXwh40fTiWWguVEYVtupw== Thread-Topic: A html and
text message with attachment. From: To: Subject: A html and text
message with attachment. MIME-Version: 1.0 Content-Type: text/html
Content-Transfer-Encoding: 7bit Content-Class:
urn:content-classes:message Importance: normal Priority: normal
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.3790.2757


followed by an output of the actual message.

Is there anything in this header info that stands out as being the
problem to anyone?

I've implemented this new mail function and I'm waiting to here back
from my client (as I've enver been able to reproduce the error myself).

Thanks again everyone!






[email]elesus@gmail.com[/email] wrote:

> I was searching the web for quite some time trying to solve pretty same
> problem.
> My script is the same as yours Nathaniel. Since last month or so I
> started to get wrapped html mails, before that everything was just
> fine. May it be some ms update to the cdosys component?
>
> In my case I get html mails where some characters disappear or spaces
> are added, so it breaks the html structure.
>
> Have not found solution yet. Will post here if found.
>
> Alex
>
> 9ntw9 raše:

> > Just to add, I recently added the 1st function on this page to my mail:
> >
> > [url]http://www.motobit.com/tips/detpg_quoted-printable-encode/[/url]
> >
> > so now the line reads : objMail.HTMLBody =
> > QuotedPrintableEncode(sTextBody, "") instead of objMail.HTMLBody =
> > sTextBody
> >
> > I am not sure if this is what you were referring to originally, but
> > after a quick look at the results I've found that it does a pretty good
> > job of destroying the formatting of the html (squishes it), and it
> > renders images a small black squares.
> >
> >
> > 9ntw9 wrote:

> > > Thanks for your time,
> > >
> > > Here is the code being used to send the mail:
> > >
> > > Set objMail = Server.CreateObject("CDO.Message")
> > > objMail.MIMEFormatted=true
> > > objMail.From = sFrom
> > > objMail.To = sTo
> > > objMail.Subject= sSubject
> > > objMail.HTMLBody = sTextBody
> > > objMail.Send
> > >
> > > I set the MIMEFormatted = True after reading an article that suggested
> > > it would fix the problem, but no luck. (There was no apparent change)
> > >
> > > sTextBody (the contents being afftected by the issue) is derived froma
> > > chunk of code that pulls various items out of a db and builds them into
> > > an html table for viewing (6 cols wide, N cols long) ... the html being
> > > written is standard, and there's nothing too fancy going on. The
> > > contents of sTextBody are not being prepped for email (do they need to
> > > be, if so, in what fashion?), the html inside sTextBody are written as
> > > though for a standard webpage (although without opening html tags,
> > > basically written to be dropped into the body section of a website).
> > >
> > > Thanks again,
> > >
> > > Nathaniel
> > >
> > >
> > > Anthony Jones wrote:
> > > > "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> > > > news:1167834352.020953.260230@k21g2000cwa.googlegr oups.com...
> > > > > I'm having trouble with an html formatted email that is being delivered
> > > > >
> > > > > to a client. Every 80 characters there is a forced space being added
> > > > > to the emails (by the server? by cdo Message?) and it's causing the
> > > > > html tags to be broken. The unusual thing is that I cannot replicate
> > > > > the error locally in Outlook, or @ gmail or @ hotmail. Only the client
> > > > >
> > > > > is having the issue (Using Outlook Express).
> > > > >
> > > > > Is this an issue that most mail clients have resolved, or is this
> > > > > something that I will have to take care of from my side?
> > > > >
> > > >
> > > > Sounds like the body is not being formatted as quoted-printable. Can you
> > > > show some code you are using to create the email?
> > > > Can you change the configuration object to use a temporary folder as a
> > > > pickup folder instead of port 25? you can then examine the exact EML file
> > > > being created.
> > > >
> > > >
> > > > >
> > > > > Thanks!
> > > > >

[9ntw9]

Forgot to mention in my previous post that the function i posted is
based off of the code example found on the following page:

[url]http://msdn2.microsoft.com/en-us/library/aa581351.aspx[/url]


9ntw9 wrote:

> I've tried another approach now:
>
> function tester (sBody)
> Dim iMsg
> Dim iBp1
> Dim iBp3
> Dim Stm
>
> Set iMsg = CreateObject("CDO.Message")
>
> With iMsg
> .From = sFrom
> .To = sTo
> .Subject = sSubject
> End With
>
> Set iBp1 = iMsg.BodyPart
> iBp1.ContentMediaType = "multipart/mixed"
>
> Set iBp3 = iBp1.AddBodyPart
> With iBp3
> .ContentMediaType = "text/html"
> .ContentTransferEncoding = "quoted-printable"
> Set Stm = .GetDecodedContentStream
> Stm.WriteText sBody
> Stm.Flush
> End With
>
> Stm.Close
> Set Stm = Nothing
> iMsg.Send
> end function
>
>
>
>
>
> ---------
> i then wrote iMsg.GetStream.ReadText to the screen and got this:
>
> thread-index: AccwS7JFFUXwh40fTiWWguVEYVtupw== Thread-Topic: A html and
> text message with attachment. From: To: Subject: A html and text
> message with attachment. MIME-Version: 1.0 Content-Type: text/html
> Content-Transfer-Encoding: 7bit Content-Class:
> urn:content-classes:message Importance: normal Priority: normal
> X-MimeOLE: Produced By Microsoft MimeOLE V6.00.3790.2757
>
>
> followed by an output of the actual message.
>
> Is there anything in this header info that stands out as being the
> problem to anyone?
>
> I've implemented this new mail function and I'm waiting to here back
> from my client (as I've enver been able to reproduce the error myself).
>
> Thanks again everyone!
>
>
>
>
>
>
> [email]elesus@gmail.com[/email] wrote:

> > I was searching the web for quite some time trying to solve pretty same
> > problem.
> > My script is the same as yours Nathaniel. Since last month or so I
> > started to get wrapped html mails, before that everything was just
> > fine. May it be some ms update to the cdosys component?
> >
> > In my case I get html mails where some characters disappear or spaces
> > are added, so it breaks the html structure.
> >
> > Have not found solution yet. Will post here if found.
> >
> > Alex
> >
> > 9ntw9 raše:

> > > Just to add, I recently added the 1st function on this page to my mail:
> > >
> > > [url]http://www.motobit.com/tips/detpg_quoted-printable-encode/[/url]
> > >
> > > so now the line reads : objMail.HTMLBody =
> > > QuotedPrintableEncode(sTextBody, "") instead of objMail.HTMLBody =
> > > sTextBody
> > >
> > > I am not sure if this is what you were referring to originally, but
> > > after a quick look at the results I've found that it does a pretty good
> > > job of destroying the formatting of the html (squishes it), and it
> > > renders images a small black squares.
> > >
> > >
> > > 9ntw9 wrote:
> > > > Thanks for your time,
> > > >
> > > > Here is the code being used to send the mail:
> > > >
> > > > Set objMail = Server.CreateObject("CDO.Message")
> > > > objMail.MIMEFormatted=true
> > > > objMail.From = sFrom
> > > > objMail.To = sTo
> > > > objMail.Subject= sSubject
> > > > objMail.HTMLBody = sTextBody
> > > > objMail.Send
> > > >
> > > > I set the MIMEFormatted = True after reading an article that suggested
> > > > it would fix the problem, but no luck. (There was no apparent change)
> > > >
> > > > sTextBody (the contents being afftected by the issue) is derived from a
> > > > chunk of code that pulls various items out of a db and builds them into
> > > > an html table for viewing (6 cols wide, N cols long) ... the html being
> > > > written is standard, and there's nothing too fancy going on. The
> > > > contents of sTextBody are not being prepped for email (do they needto
> > > > be, if so, in what fashion?), the html inside sTextBody are writtenas
> > > > though for a standard webpage (although without opening html tags,
> > > > basically written to be dropped into the body section of a website).
> > > >
> > > > Thanks again,
> > > >
> > > > Nathaniel
> > > >
> > > >
> > > > Anthony Jones wrote:
> > > > > "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> > > > > news:1167834352.020953.260230@k21g2000cwa.googlegr oups.com...
> > > > > > I'm having trouble with an html formatted email that is being delivered
> > > > > >
> > > > > > to a client. Every 80 characters there is a forced space beingadded
> > > > > > to the emails (by the server? by cdo Message?) and it's causingthe
> > > > > > html tags to be broken. The unusual thing is that I cannot replicate
> > > > > > the error locally in Outlook, or @ gmail or @ hotmail. Only the client
> > > > > >
> > > > > > is having the issue (Using Outlook Express).
> > > > > >
> > > > > > Is this an issue that most mail clients have resolved, or is this
> > > > > > something that I will have to take care of from my side?
> > > > > >
> > > > >
> > > > > Sounds like the body is not being formatted as quoted-printable. Can you
> > > > > show some code you are using to create the email?
> > > > > Can you change the configuration object to use a temporary folderas a
> > > > > pickup folder instead of port 25? you can then examine the exact EML file
> > > > > being created.
> > > > >
> > > > >
> > > > > >
> > > > > > Thanks!
> > > > > >

[Anthony Jones]

"9ntw9" <nathaniel.williams@gmail.com> wrote in message
news:1167944823.401987.233270@42g2000cwt.googlegro ups.com...

> Thanks for your time,
>
> Here is the code being used to send the mail:
>
> Set objMail = Server.CreateObject("CDO.Message")
> objMail.MIMEFormatted=true
> objMail.From = sFrom
> objMail.To = sTo
> objMail.Subject= sSubject
> objMail.HTMLBody = sTextBody
> objMail.Send
>
> I set the MIMEFormatted = True after reading an article that suggested
> it would fix the problem, but no luck. (There was no apparent change)
>

Try this:-

Create an empty folder E.g. c:\temp\pickup

Now add this code after creating objMail :-

Dim oConf: Set oConf = objMail.Configuration
oConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing")= 1
'Use pickup folder
oConf.Fields([url]http://schemas.microsoft.com/cdo/configuration/smtpserverpickup[/url]
directory") = _
"c:\temp\pickup"
oConf.Update

Now when you execute your code you should get an .eml file appear in pickup
folder. You can open this file in outlook express to see if it is mangled
before it's ever passed through a SMTP server. You can also open it in
notepad to see exactly what has been generated.

The header to the HTML body part should look something like this:-

------_=_NextPart_003_01C657E9.493172D2
Content-Type: text/html;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

[9ntw9]

I used the code to send it to a directory, and checked the files ...

I had set ContentTransferCoding = "quoted-printable" in iBp3 (an
additional body part of my base iBp1), but had never set iBp1, so it
was sending in 7bit.

Hopefully this has fixed my problem!

p.s. to anyone attempting to use the code in the previous msg, I had to
change oConf.Update to oConf.Fields.Update to get it running.

I'll run some tests (with fingers crossed) and let everyone know if
this fixed it.

Thanks!

Anthony Jones wrote:

> "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> news:1167944823.401987.233270@42g2000cwt.googlegro ups.com...

> > Thanks for your time,
> >
> > Here is the code being used to send the mail:
> >
> > Set objMail = Server.CreateObject("CDO.Message")
> > objMail.MIMEFormatted=true
> > objMail.From = sFrom
> > objMail.To = sTo
> > objMail.Subject= sSubject
> > objMail.HTMLBody = sTextBody
> > objMail.Send
> >
> > I set the MIMEFormatted = True after reading an article that suggested
> > it would fix the problem, but no luck. (There was no apparent change)
> >

>
> Try this:-
>
> Create an empty folder E.g. c:\temp\pickup
>
> Now add this code after creating objMail :-
>
> Dim oConf: Set oConf = objMail.Configuration
> oConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing")= 1
> 'Use pickup folder
> oConf.Fields([url]http://schemas.microsoft.com/cdo/configuration/smtpserverpickup[/url]
> directory") = _
> "c:\temp\pickup"
> oConf.Update
>
> Now when you execute your code you should get an .eml file appear in pickup
> folder. You can open this file in outlook express to see if it is mangled
> before it's ever passed through a SMTP server. You can also open it in
> notepad to see exactly what has been generated.
>
> The header to the HTML body part should look something like this:-
>
> ------_=_NextPart_003_01C657E9.493172D2
> Content-Type: text/html;
> charset="us-ascii"
> Content-Transfer-Encoding: quoted-printable

[elesus@gmail.com]

Addition of the "tester" function alone did not work for me.
However when I modified the script to attach the file with the same
html content I send, everything worked fine.

I added the following code:

Set fso = CreateObject("Scripting.FileSystemObject")
Set testfile= fso.CreateTextFile("main.html", True)
testfile.Write VBody
testfile.Close
objMessage.AddAttachment "C:\MyPath\main.html"

It is at least strange. Fortunately, this work around suits me :)


9ntw9 raše:

> I used the code to send it to a directory, and checked the files ...
>
> I had set ContentTransferCoding = "quoted-printable" in iBp3 (an
> additional body part of my base iBp1), but had never set iBp1, so it
> was sending in 7bit.
>
> Hopefully this has fixed my problem!
>
> p.s. to anyone attempting to use the code in the previous msg, I had to
> change oConf.Update to oConf.Fields.Update to get it running.
>
> I'll run some tests (with fingers crossed) and let everyone know if
> this fixed it.
>
> Thanks!
>
> Anthony Jones wrote:

> > "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> > news:1167944823.401987.233270@42g2000cwt.googlegro ups.com...

> > > Thanks for your time,
> > >
> > > Here is the code being used to send the mail:
> > >
> > > Set objMail = Server.CreateObject("CDO.Message")
> > > objMail.MIMEFormatted=true
> > > objMail.From = sFrom
> > > objMail.To = sTo
> > > objMail.Subject= sSubject
> > > objMail.HTMLBody = sTextBody
> > > objMail.Send
> > >
> > > I set the MIMEFormatted = True after reading an article that suggested
> > > it would fix the problem, but no luck. (There was no apparent change)
> > >

> >
> > Try this:-
> >
> > Create an empty folder E.g. c:\temp\pickup
> >
> > Now add this code after creating objMail :-
> >
> > Dim oConf: Set oConf = objMail.Configuration
> > oConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing")= 1
> > 'Use pickup folder
> > oConf.Fields([url]http://schemas.microsoft.com/cdo/configuration/smtpserverpickup[/url]
> > directory") = _
> > "c:\temp\pickup"
> > oConf.Update
> >
> > Now when you execute your code you should get an .eml file appear in pickup
> > folder. You can open this file in outlook express to see if it is mangled
> > before it's ever passed through a SMTP server. You can also open it in
> > notepad to see exactly what has been generated.
> >
> > The header to the HTML body part should look something like this:-
> >
> > ------_=_NextPart_003_01C657E9.493172D2
> > Content-Type: text/html;
> > charset="us-ascii"
> > Content-Transfer-Encoding: quoted-printable

[elesus@gmail.com]

One more interesting thing.

When I changed the "sendusing" attribute to "1" (pickup folder) the
generated eml message was NOT garbled (when opened with Outlook it
looked correct).

However changing the "sendusing" attribute to "2" (smtp server) the
message got corrupted.

I tried different smtp server to eliminate the server from possible
causes of the problem but it did not help. So, I assume, the CDOSYS is
the problem.


9ntw9 raše:

> I used the code to send it to a directory, and checked the files ...
>
> I had set ContentTransferCoding = "quoted-printable" in iBp3 (an
> additional body part of my base iBp1), but had never set iBp1, so it
> was sending in 7bit.
>
> Hopefully this has fixed my problem!
>
> p.s. to anyone attempting to use the code in the previous msg, I had to
> change oConf.Update to oConf.Fields.Update to get it running.
>
> I'll run some tests (with fingers crossed) and let everyone know if
> this fixed it.
>
> Thanks!
>
> Anthony Jones wrote:

> > "9ntw9" <nathaniel.williams@gmail.com> wrote in message
> > news:1167944823.401987.233270@42g2000cwt.googlegro ups.com...

> > > Thanks for your time,
> > >
> > > Here is the code being used to send the mail:
> > >
> > > Set objMail = Server.CreateObject("CDO.Message")
> > > objMail.MIMEFormatted=true
> > > objMail.From = sFrom
> > > objMail.To = sTo
> > > objMail.Subject= sSubject
> > > objMail.HTMLBody = sTextBody
> > > objMail.Send
> > >
> > > I set the MIMEFormatted = True after reading an article that suggested
> > > it would fix the problem, but no luck. (There was no apparent change)
> > >

> >
> > Try this:-
> >
> > Create an empty folder E.g. c:\temp\pickup
> >
> > Now add this code after creating objMail :-
> >
> > Dim oConf: Set oConf = objMail.Configuration
> > oConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing")= 1
> > 'Use pickup folder
> > oConf.Fields([url]http://schemas.microsoft.com/cdo/configuration/smtpserverpickup[/url]
> > directory") = _
> > "c:\temp\pickup"
> > oConf.Update
> >
> > Now when you execute your code you should get an .eml file appear in pickup
> > folder. You can open this file in outlook express to see if it is mangled
> > before it's ever passed through a SMTP server. You can also open it in
> > notepad to see exactly what has been generated.
> >
> > The header to the HTML body part should look something like this:-
> >
> > ------_=_NextPart_003_01C657E9.493172D2
> > Content-Type: text/html;
> > charset="us-ascii"
> > Content-Transfer-Encoding: quoted-printable