Spence,



Would you please explain how you ran the function against the text 

beforehand?



Thanks,



A Learning Novice









> That did it Patrick.

> 

> I had to stuff the problematic record from the DB into a variable- then 

run

> theFIX function on that- all before the info was sent to the email 

template.

> 

> SO the fix function was actually being run on the wrong template all

> together.

> 

> Thanks for the advice

> 

> spence

> ----- Original Message -----

> From: <patrick.frenette@s...>

> To: Access ASP <access_asp@p...>

> Sent: August 30, 2001 12:35 PM

> Subject: [access_asp] Re: apostrophe fix for email- resend

> 

> 

> > Hi,

> >

> > Try to run theFix function before assigning your text to your 

mail.body. I

> > already had some errors like this. This might help or it might not. 

Good

> > luck, let me know if it works...

> >

> > Patrick

> >

dude. This may sound crazy but I can't find in my code where I actually 

did what the conversation below says I did. I remember writing the code 

in the manner described but for some reason it doesn't seem to exist in 

my templates as I remember it and my application is running perfectly. 

So I will describe to you how my app is working with the assumption that 

it should work just fine for you as well





Basically on the page that the "mailto a friend" was operating on I had 

a hidden form field containing the body text for the email:



**Form page**  

DIM vartitle

vartitle=RS("title")



response.write="<input type='text' name='emailto'>"

response.write="<input type='text' name='txtbody' 

value='Somebody has sent you an Article: & vbCrLf & _

vartitle & vbCrLf & _

"Author: "& getdata("author") & vbCrLf & _

" URL:"& vbCrLf & _>"

response.write="<input type='submit' value='send'>"



** on the process mail page**





DIM thebody

thebody=Request.form("txtBody")





  Set iConf = CreateObject _

    ("CDO.Configuration")

  Set Flds = iConf.Fields 



  'Set and update fields properties

  Flds(cdoSendUsingMethod) = cdoSendUsingPort

  Flds(cdoSMTPServer) = "mail.server.com"

  Flds.Update 



  Set iMesg = CreateObject("CDO.Message")

  Set iMesg.Configuration = iConf 



  'Format and send message

  Err.Clear 



  iMesg.To = Request.Form("emailto")

  iMesg.From = Autoreply@s...

iMesg.Subject = "Somebody sent you something"

  iMesg.TextBody = thebody

  iMesg.Send 





And that's what I have and that's what is working. I can't see anywhere 

where I am running that FIX function that I wrote about below. Strange. 

I swear I used it before. But like I said- it's currently working.





Hope this helps./ Let me know how it works out just to see if I'm losing 

my mind:)





spence



----- Original Message -----

From: Matthew F. Davis <matt@m...>

To: Access ASP <access_asp@p...>

Sent: September 10, 2001 8:26 PM

Subject: [access_asp] Re: apostrophe fix for email- resend





> Spence,

>

> Would you please explain how you ran the function against the text

> beforehand?

>

> Thanks,

>

> A Learning Novice

>

>

>

>

> > That did it Patrick.

> >

> > I had to stuff the problematic record from the DB into a variable- 

then

> run

> > theFIX function on that- all before the info was sent to the email

> template.

> >

> > SO the fix function was actually being run on the wrong template all

> > together.

> >

> > Thanks for the advice

> >

> > spence

> > ----- Original Message -----

> > From: <patrick.frenette@s...>

> > To: Access ASP <access_asp@p...>

> > Sent: August 30, 2001 12:35 PM

> > Subject: [access_asp] Re: apostrophe fix for email- resend

> >

> >

> > > Hi,

> > >

> > > Try to run theFix function before assigning your text to your

> mail.body. I

> > > already had some errors like this. This might help or it might 

not.

> Good

> > > luck, let me know if it works...

> > >

> > > Patrick

> > >

>