Does the email function work?

Post here to discuss topics relate to the 4.x version for the ASP Football Pool software program. All support topics should go here.
Post Reply
indiansfanatic
Posts: 11
Joined: Wed Sep 04, 2013 2:44 pm

Does the email function work?

Post by indiansfanatic »

Does the email function work and if it does how do you turn it on?

-Ron
User avatar
raider_nation
Posts: 34
Joined: Mon Aug 26, 2013 8:10 pm

Re: Does the email function work?

Post by raider_nation »

Yes it works. You need to set the following option in config.asp:

const SERVER_EMAIL_ENABLED = true

Then you need to modify email.asp to whatever works with your email server. That is under the 'Configure the message. section of email.asp.
indiansfanatic
Posts: 11
Joined: Wed Sep 04, 2013 2:44 pm

Re: Does the email function work?

Post by indiansfanatic »

Any recommendations for a free email server?
User avatar
raider_nation
Posts: 34
Joined: Mon Aug 26, 2013 8:10 pm

Re: Does the email function work?

Post by raider_nation »

Do you have a gmail account? I set mine up this way:

'Configure the message.
set cdoMessage = Server.CreateObject("CDO.Message")
set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... /sendusing") = 2
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... smtpserver") = "smtp.gmail.com"
cdoConfig.Fields.Item("http://schemas.microsoft.com/cdo/config ... smtpusessl") = True
cdoConfig.Fields.Item("http://schemas.microsoft.com/cdo/config ... smtpserver") = "smtp.gmail.com"
cdoConfig.Fields.Item("http://schemas.microsoft.com/cdo/config ... serverport") = 465
cdoConfig.Fields.Item("http://schemas.microsoft.com/cdo/config ... thenticate") = 1
cdoConfig.Fields.Item("http://schemas.microsoft.com/cdo/config ... ndusername") = "user@gmail.com"
cdoConfig.Fields.Item("http://schemas.microsoft.com/cdo/config ... ndpassword") = "password"
cdoConfig.Fields.Update
set cdoMessage.Configuration = cdoConfig
indiansfanatic
Posts: 11
Joined: Wed Sep 04, 2013 2:44 pm

Re: Does the email function work?

Post by indiansfanatic »

Thanks raider_nation. I'll give this a try.

-Ron
User avatar
Stutgrtguy
Posts: 167
Joined: Sun Oct 20, 2013 3:54 pm
Location: Colorado

Re: Does the email function work?

Post by Stutgrtguy »

Seems my email function has quit working, anyone else having problems?
User avatar
Stutgrtguy
Posts: 167
Joined: Sun Oct 20, 2013 3:54 pm
Location: Colorado

Re: Does the email function work?

Post by Stutgrtguy »

anyone else had this quit working? I have the same script as above, last year worked great, this year...notta....
User avatar
Stutgrtguy
Posts: 167
Joined: Sun Oct 20, 2013 3:54 pm
Location: Colorado

Re: Does the email function work?

Post by Stutgrtguy »

nevermind I finally figured it out, since I had changed my password google had asked me if I wanted to enhance my security and I clicked yes, and since my server is on the east coast and i in the midwest it kept blocking the sign in attempts, thinking it was a hack attempt. Cant remember where I found the setting to change it as I was exasperated at the time, but if anyone else has this issue, look there first
holgar
Posts: 32
Joined: Fri Aug 22, 2014 5:30 pm

Re: Does the email function work?

Post by holgar »

I've attempted to get this code to work but it keeps saying it cannot connect to the email server... I'm trying the gmail route and have checked username/password, gmail settings for POP/IMAP are enabled, what else? Is there a different port to try other than 465? Thanks!

Exact error (on sign up page): 'The transport failed to connect to the server.'

---
Update: Used the regular email associated with my server and the following code (needed to use authentication).
'Configure the message.
set cdoMessage = Server.CreateObject("CDO.Message")
set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... /sendusing") = 2
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... smtpserver") = "localhost"
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... serverport") = 25
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... smtpusessl") = false
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... thenticate") = 1
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... ndusername") ="email@yoursite.com"
cdoConfig.Fields("http://schemas.microsoft.com/cdo/config ... ndpassword") ="password"
cdoConfig.Fields.Update
set cdoMessage.Configuration = cdoConfig
Post Reply