|
|
|
|
![]() ![]() |
Sep 19 2006, 12:31 PM
Post
#1
|
|
|
Member [Level 1] ![]() ![]() ![]() ![]() Group: Members Posts: 70 Joined: 5-August 06 From: Rome (born only) Member No.: 27,852 |
Hi everyones,
I have been trying to set up my email notification settings for a weeks, and I'm stumped. I even found a solution that helped me before.. but now I can't seem to get this right. I'm trying to use CDOSYS, as I did in the past. Here's the code I replaced in the inc_mail.asp file: CODE case "cdosys" Set objNewMail = Server.CreateObject("CDO.message") objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "sendmail2.brinkster.com" objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername")="2boobs@davemadethis.com" objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") ="XXXX" objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 objNewMail.Configuration.Fields.Update 'Format and send message Err.Clear objNewMail.To = strRecipients objNewMail.From = strSender objNewMail.Subject = strSubject objNewMail.TextBody = strMessage On Error Resume Next objNewMail.Send If Err <> 0 Then Err_Msg = Err_Msg & "Your request was not sent due to the following error: " & Err.Description & "" End if 10x This post has been edited by alexviii: Nov 8 2006, 03:13 PM |
|
|
|
![]() ![]() |
Similar Topics
| Topics | Topics | |
|---|---|---|
|
|
|
Lo-Fi Version | Time is now: 25th July 2008 - 10:32 AM |