|
We just switched from Charter Cable to Verizon DSL and the Verizon Mail Servers Requier authentication. How can I edit this contact from code to send the right authentication. Login and pass.
Here is the code:
<% End If
Function SendEmail(strBody, strSubject, strFrom, strTo)
bSuccess = True
set iconf=server.createobject("cdo.configuration")
set flds=iconf.Fields
with flds
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "outgoing.verizon.net"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10
.Update
End With
set objCDO=server.createobject("CDO.Message")
With objCDO
set .configuration=iConf
.To=strTo
.From="El_dorado@Verizon.com"
.Subject=StrSubject
.TextBody=StrBody
.Send
end with
set objCDO = nothing
sendEmail=bSuccess
End Function
%>
|
