보안강화를 이유로 메일서버에서 보안 연결을(SSL) 사용하게 되면 smtp에 SSL 사용을 설정해야합니다.
\Jsource\inc\smtp_info.asp에 24라인에서 61라인까지의 소스를 아래와 같이 변경하여 사용해보세요.
현재 naver 같은 경우는 메일 발송이 잘 되고 있습니다. daum은 메일서버의 보안설정 때문에 발송이 되지 않은것 같습니다. 확인되는데로 알려드리도록 하겠습니다.
\Jsource\inc\smtp_info.asp에 24라인에서 61라인까지의 소스를 아래와 같이 변경하여 사용해보세요.
현재 naver 같은 경우는 메일 발송이 잘 되고 있습니다. daum은 메일서버의 보안설정 때문에 발송이 되지 않은것 같습니다. 확인되는데로 알려드리도록 하겠습니다.
Const cdoSendUsingMethod = _
"http://schemas.microsoft.com/cdo/configuration/sendusing"
Const cdoSendUsingPort = 2
Const cdoSendUsing = 2
Const cdoSMTPServer = _
"http://schemas.microsoft.com/cdo/configuration/smtpserver"
Const cdoSMTPServerPort = _
"http://schemas.microsoft.com/cdo/configuration/smtpserverport"
Const cdoSMTPConnectionTimeout = _
"http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"
Const cdoSMTPAccountName = _
"http://schemas.microsoft.com/cdo/configuration/smtpaccountname"
Const cdoSMTPAuthenticate = _
"http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"
Const cdoBasic = 1
Const cdoSendUserName = _
"http://schemas.microsoft.com/cdo/configuration/sendusername"
Const cdoSendPassword = _
"http://schemas.microsoft.com/cdo/configuration/sendpassword"
Const cdoSmtpUseSsl = _
"http://schemas.microsoft.com/cdo/configuration/smtpusessl"
Dim objConfig
Dim Fields
Set objConfig = Server.CreateObject("CDO.Configuration")
Set Fields = objConfig.Fields
With Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPAuthenticate) = cdoBasic
.Item(cdoSMTPServerPort) = SMTPport
.Item(cdoSMTPServer) = SMTPserver
.Item(cdoSendUserName) = SMTPuserName
.Item(cdoSendPassword) = SMTPpassword
.Item(cdoSmtpUseSsl) = true
.Update
End With