converting cdonts to cdosys

Sharon Rothacher · August 11th, 2004, 02:06 PM

HI. I an needing some help regarding converting cdonts to cdosys, because the 2003 server does not support the cdonts. If I send you my current page of asp code, could you please assist?

happygv · August 13th, 2004, 06:26 PM

Hi Sharon,

There is not much, that could trouble you in changing that over to cdosys.

How about having a look at this - How To Migrate the CDONTS Applications to Microsoft CDOSYS for Windows 2000

We would alwasy assist, when you have problems in doing so.

Hope that helps.
Cheers!

_________________________
- Vijay G
Strive for Perfection

Sharon Rothacher · September 10th, 2004, 03:25 PM

Thanks "happygv" for the info! I've searched it over, but it is still not working...........do you see any problems with this:

Set myMail = CreateObject("CDO.Message")
myMail.From = emailfrom
myMail.BCC = emailbcc
' if requestor includes email address then send them confirm email
if trim(emailconfirm) <> "" then myMail.To = emailconfirm end if
MyMail.Body = t
MyMail.Subject = emailsubject
MyMail.Importance = 2
MyMail.BodyFormat=0
MyMail.MailFormat=0
MyMail.Send
set MyMail = nothing

response.write t

any help you could provide is greatly appreciated!

Quote:

quote:Originally posted by happygv
Hi Sharon,

There is not much, that could trouble you in changing that over to cdosys.

How about having a look at this - How To Migrate the CDONTS Applications to Microsoft CDOSYS for Windows 2000

We would alwasy assist, when you have problems in doing so.

Hope that helps.
Cheers!

_________________________
- Vijay G
Strive for Perfection

happygv · September 11th, 2004, 05:06 AM

Do you see any error? No mention about it. Was your CDONTS code working earlier?

What is there in emailfrom, emailbcc and emailconfirm?

Can you explain "but it is still not working.......?

Cheers!

_________________________
- Vijay G
Strive for Perfection

Sharon Rothacher · September 13th, 2004, 03:06 PM

Yes, the form and emails work just fine with cdonts on our company's 2000 server. but when i upload it to the customer's 2003 server, it doesn't support cdonts. then we went back and changed the cdont format to cdosys, but the emails are not processing.........they just sit in the job que. the html body that is created is an attachment on the email and it sits in the que and never delivers. we don't want it to be an attachment.

here is the coding that is not producing proper results...
'Send using the Pickup directory on the IIS server

Dim iMsg

Dim iConf

Dim Flds

Dim strHTML

Const cdoSendUsingPickup = 1

set iMsg = CreateObject("CDO.Message")

set iConf = CreateObject("CDO.Configuration")

' set the CDOSYS configuration fields to use the SMTP service pickup directory

Set Flds = iConf.Fields

With Flds

.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPickup

.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\inetpub\mailroot\pickup"

.Update

End With

' build HTML for message body

'strHTML = "<HTML>"

'strHTML = strHTML & "<HEAD>"

'strHTML = strHTML & "<BODY>"

'strHTML = strHTML & "<b>"&t&"</b></br>"

'strHTML = strHTML & "</BODY>"

'strHTML = strHTML & "</HTML>"

' apply settings to the message

With iMsg

Set .Configuration = iConf

'.To = emailbcc

.Bcc = emailbcc

.From = emailfrom

.Subject = "This is a test CDOSYS message (Pickup directory)"

.HTMLBody = t

' if requestor includes email address then send them confirm email

if trim(emailconfirm) <> "" then .To = emailconfirm end if

.Send

End With

' cleanup of variables

Set iMsg = Nothing

Set iConf = Nothing

Set Flds = Nothing

'************************************************* **************************************

response.write t

%>

================================================== ======
i just noticed this line above was commented out
'.To = emailbcc
....could that be the problem?

Sharon Rothacher · September 13th, 2004, 03:20 PM

here is the email from, confirm, etc. (listed at the beginning of the coding")

' Should be able to change these variables and not change actual Mail code at the bottom

' emailfrom is also BCC'd so Bullseye gets a copy

emailfrom = "[email protected]"

'emailfrom = "mary@"

'emailbcc = "mary@; renee@"

' comment this out when it is ready to go live

emailbcc = "[email protected]; [email protected]; [email protected]"

' comment this out when it is ready to go live

' below the requestor is the TO address if this isn't blank, the

emailconfirm = trim(Request("Contact_Email"))

emailsubject = "Bullseye Supply Order Form CONFIRMATION"

Sharon Rothacher · September 14th, 2004, 10:29 AM

we un-commented the line (I mentioned above)
" '.To = emailbcc "
but it still did not process the form or email

pkihou · September 14th, 2004, 04:48 PM

Here is the code that i am having trouble with

'Response.Write mailbody
set SMTP=Server.CreateObject("Jmail.SMTPMail")
SMTP.ServerAddress= mailserver
SMTP.Sender=anetfang2
SMTP.AddRecipient anetfang1
SMTP.Subject=blabla
SMTP.Body=mailbody
SMTP.Execute
%>

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/AppSup/ASWeb/AppSupp/ASPCard/test.asp, line 180

Invalid class string

Thanks

Quote:

quote:Originally posted by happygv
Do you see any error? No mention about it. Was your CDONTS code working earlier?

What is there in emailfrom, emailbcc and emailconfirm?

Can you explain "but it is still not working.......?

Cheers!

_________________________
- Vijay G
Strive for Perfection

happygv · September 16th, 2004, 01:01 AM

pkihou,

I have answered that in your other post, Why do you have to post that again here? If so you can always post that under a new topic, not in someone's topic.

Don't cross post.

_________________________
- Vijay G
Strive for Perfection

happygv · September 16th, 2004, 01:04 AM

Sharon,

It looks like SMTP settings need to be looked into. I am not sure what needs to be checked in that.

_________________________
- Vijay G
Strive for Perfection