CDO email in Windows 2003

[pilot]

I am having trouble sending a form email on a remote W 2003 server.

The test script I am using is as follows
<%@ Language=VBScri pt %>
<% Set objMessage = CreateObject("C DO.Message")
objMessage.From = "me"
objMessage.Subj ect = "test"
objMessage.To = "[e-mail]"
objMessage.Text Body = "testing"
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/configuration/sendusing")
= 2
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/configuration/smtpserver")
= "mySMTPserv er"
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/configuration/smtpserverport" )
= 25
objMessage.Conf iguration.Field s.Update
objMessage.Send
%>

I have been on this all morning and i'm well fed up.

Is there something staring me in the face??

[McKirahan]

<pi***@smorley. co.uk> wrote in message
news:11******** **************@ o13g2000cwo.goo glegroups.com.. .

I am having trouble sending a form email on a remote W 2003 server.

The test script I am using is as follows
<%@ Language=VBScri pt %>
<% Set objMessage = CreateObject("C DO.Message")
objMessage.From = "me"
objMessage.Subj ect = "test"
objMessage.To = "[e-mail]"
objMessage.Text Body = "testing"
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/confi
guration/sendusing") = 2
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/confi
guration/smtpserver") = "mySMTPserv er"
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/confi
guration/smtpserverport" ) = 25
objMessage.Conf iguration.Field s.Update
objMessage.Send
%>

I have been on this all morning and i'm well fed up.

Is there something staring me in the face??

Is "mySMTPserv er" actually the name of your SMTP server?

[pilot]

'course it aint! it's mail.whatever.c o.uk I checked it with my
service provider.

[Paxton]

pi***@smorley.c o.uk wrote:

'course it aint! it's mail.whatever.c o.uk I checked it with my
service provider.

When you say you can't get it to work properly, what happens? What
error messages do you get?

[pilot]

On my service provider, I merely get the "computer says no" message -
ie This page cannot be displayed - no explanation.

However, when I try it on my IIS server on my PC where I test sites, I
get the following:-
Error Type:
(0x8004020E)
Cannot modify or delete an object that was added using the COM+ Admin
SDK
/mepdynamic/test.asp, line 11

Line 11 being "objMessage.Sen d"

[Kyle Peterson]

http://www.powerasp.com/content/new/...ail_cdosys.asp

<pi***@smorley. co.uk> wrote in message
news:11******** **************@ o13g2000cwo.goo glegroups.com.. .

I am having trouble sending a form email on a remote W 2003 server.

The test script I am using is as follows
<%@ Language=VBScri pt %>
<% Set objMessage = CreateObject("C DO.Message")
objMessage.From = "me"
objMessage.Subj ect = "test"
objMessage.To = "[e-mail]"
objMessage.Text Body = "testing"
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/configuration/sendusing")
= 2
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/configuration/smtpserver")
= "mySMTPserv er"
objMessage.Conf iguration.Field s.Item("http://schemas.microso ft.com/cdo/configuration/smtpserverport" )
= 25
objMessage.Conf iguration.Field s.Update
objMessage.Send
%>

I have been on this all morning and i'm well fed up.

Is there something staring me in the face??

[pilot]

Kyle. Thanks. I have emailed the service provider to find out if they
require outgoing authentication. What a pain. I am developing this
for a client and all the passwords, SMTP settings etc will have to be
changed once it goes up on their site.

Grrrrr!

[pilot]

Well it turns out that CDO is hugely variable!

My service providers have provided me with a CDO script that works as
follows:-

<%

Set objMessage = CreateObject("C DO.Message")
objMessage.Subj ect = "Example CDO Message"
objMessage.Send er = "go************ ***@goodairfiel dguide.co.uk"
objMessage.To = "di************ **@hostway.co.u k" objMessage.Text Body =
"This is some sample message text."

'==This section provides the configuration information for the remote
SMTP server. '==Normally you will only change the server name or IP.

objMessage.Conf iguration.Field s.Item _
("http://schemas.microso ft.com/cdo/configuration/sendusing") = 2

'Name or IP of Remote SMTP Server objMessage.Conf iguration.Field s.Item
_
("http://schemas.microso ft.com/cdo/configuration/smtpserver") =
"localhost"

'Server port (typically 25) objMessage.Conf iguration.Field s.Item _
("http://schemas.microso ft.com/cdo/configuration/smtpserverport" ) = 25

objMessage.Conf iguration.Field s.Update

'==End remote SMTP server configuration section==

objMessage.Send

%>

You will see that the remote config is set to "localhost" - this can
also be the URL.

BUT. you need a working email address at objMessage.send er in order
for it to work.

Why are there so many different ways none of which work on my server?

Microsoft, are you not supposed to make things easier?

Anyway, I still can't get it to work with my form emailer script. Has
anyine got one that works with CDO?

[Mark Schupp]

I just had to deal with CDO on XP and 2003 because increased security
stopped the way I was using it from working. However, I've come in the
middle of this thread and don't know what your original problem was. What
error messages are you getting?

--
Mark Schupp

<pi***@smorley. co.uk> wrote in message
news:11******** ************@g4 4g2000cwa.googl egroups.com...

Well it turns out that CDO is hugely variable!

My service providers have provided me with a CDO script that works as
follows:-

<%

Set objMessage = CreateObject("C DO.Message")
objMessage.Subj ect = "Example CDO Message"
objMessage.Send er = "go************ ***@goodairfiel dguide.co.uk"
objMessage.To = "di************ **@hostway.co.u k" objMessage.Text Body =
"This is some sample message text."

'==This section provides the configuration information for the remote
SMTP server. '==Normally you will only change the server name or IP.

objMessage.Conf iguration.Field s.Item _
("http://schemas.microso ft.com/cdo/configuration/sendusing") = 2

'Name or IP of Remote SMTP Server objMessage.Conf iguration.Field s.Item
_
("http://schemas.microso ft.com/cdo/configuration/smtpserver") =
"localhost"

'Server port (typically 25) objMessage.Conf iguration.Field s.Item _
("http://schemas.microso ft.com/cdo/configuration/smtpserverport" ) = 25

objMessage.Conf iguration.Field s.Update

'==End remote SMTP server configuration section==

objMessage.Send

%>

You will see that the remote config is set to "localhost" - this can
also be the URL.

BUT. you need a working email address at objMessage.send er in order
for it to work.

Why are there so many different ways none of which work on my server?

Microsoft, are you not supposed to make things easier?

Anyway, I still can't get it to work with my form emailer script. Has
anyine got one that works with CDO?

[pilot]

It's sorted now as far as the CDO part is concerned but I am still
having problems merging it with a form emailer script.

My service providers are being very helpful as I don't get a detailed
error message from the remote server and I cannot test it on mine as
all te settings are different for a local server.

This makes testing scripts very difficult and time consuming for
everyone.

I really think a company as big as Microsoft could come up with a CDO
mailer which would work the same on different computers using the same
platform.

GRRRR!!!!!