Welcome Guest ( Log In | Register)



 
Reply to this topicStart new topic
> Inc_mail.asp
alexviii
post 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
Go to the top of the page
 
+Quote Post

Reply to this topicStart new topic

Collapse

> Similar Topics

Topics Topics


 



- Lo-Fi Version Time is now: 25th July 2008 - 10:32 AM