It still doesn't work. Here's the code I used:
oMessage=Createobject('CDO.Message')
oConfig=Createobject('CDO.Configuration')
oConfig.Fields.Item
("http://schemas.microsoft.com/cdo/configuration/sendusing";).value = 2
oConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport";).value
= 25
With oMessage
.From = '[EMAIL PROTECTED]'
.To = '[EMAIL PROTECTED]'
.Subject = "Reboot Notify"
.TextBody = 'Reboot - '+SYS(0)+' '+TTOC(DATETIME())
.Send()
ENDWITH
I have two computers each running XP Pro. Both on the same network. It
works on one but will not work on the other. There are no error messages,
just doesn't send the email. I know that XP doesn't ship with CDO any more
but all the literature I've found indicates that if you install Outlook it
also installs CDO. That's how I got it to work on the first computer but
now that I've installed Outlook on the second computer it doesn't work. The
version of Outlook is 2003. The computer that works may have an earlier
version of Outlook.
Ideas?
Bill
> It's a configuration of Outlook/Outlook Express on the workstation.
> You'll need to configure the configuration object just to be sure.
>
> oConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusin
> g").value = 2
>
> oConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserv
> erport").value = 25
>
> HTH,
>
> Tracy
>
>
>
> *----- Bill Kressbach wrote:
> Can someone tell me why the following code works on some XP computers but
> not on others?
>
> oMessage=Createobject('CDO.Message')
> oConfig=Createobject('CDO.Configuration')
> With oMessage
> .From = 'Wkressbach (at) adrian .DOT edu'
> .To = '[EMAIL PROTECTED]'
> .Subject = "Reboot Notify"
> .TextBody = 'Reboot - '+SYS(0)+' '+TTOC(DATETIME())
> .SmtpServer = "outgoing.adrian.edu"
> .Send()
> ENDWITH
>
>
>
[excessive quoting removed by server]
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
