Below is a prg that I am using to try and get CDO e-mailing working on a Windows 2000 server. This works fine and is able to send mail out on my development computer.

On the target server, it runs without error, but does not send the mail. The server has latest service packs etc. on it and IIS configured.

In fact, the default configuration object, from what I could tell, seemed to have everything it needed. I have tried creating my own CDO configuration object as below, and it works on the development machine but not on the target machine, same as before.

Any insight is welcome :)

thanks,

Local i, nflds
Clear

objEmail = Createobject("CDO.Message")
objMyConfig = Createobject("CDO.Configuration")
oDefaultConfig = objEmail.Configuration

objEmail.Configuration = objMyConfig

objMyConfig.Fields( "http://schemas.microsoft.com/cdo/configuration/sendusing").value = 1
objMyConfig.Fields( "http://schemas.microsoft.com/cdo/configuration/smtpserver").value = 'mail.cst.net'
objMyConfig.Fields( "http://schemas.microsoft.com/cdo/configuration/smtpserverport").value = 25
objMyConfig.Fields( "http://schemas.microsoft.com/cdo/configuration/sendusername").value = 'jnewsom2'
objEmail.From = ["Jim Newsom" <jnewsom@icgtax.com>]
objEmail.To = ["Jim Newsom" <jnewsom@icgtax.com>]
objEmail.Subject = " test msg"
objEmail.Textbody = "test "
objEmail.Send



Close Databases All
Close Tables All
Clear All
Release All
Set Classlib To