원격 서버의 SMTP 사용하기 [출처] 원격 서버의 SMTP 사용하기|작성자 항해자  

아래의 소스를 참조하세요..

www.asper.pe.kr 소스를 참고 했습니다.

<%
    Dim iMsg, iConf, Flds

    Set iMsg  CreateObject("CDO.Message")
    Set iConf CreateObject("CDO.Configuration")
    Set Flds  iConf.Fields
    iConf.Load 1    ' IIS에 있는 기본 설정을 가지고 온다.

    Set Flds iConf.Fields
    With Flds
        ' 메일 서버를 지정
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver""mail.asper.pe.kr"
        ' 메일 서버의 포트를 지정
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport"25
        ' 로컬이 아닌 네트워크로 통해 다른 컴퓨를 이용
        .Item("http://schemas.microsoft.com/cdo/configuration/sendusing"2
        .UpDate
    End With

    With iMsg
    Set .Configuration iConf
        .To         "asper@asper.pe.kr"
        .From       "bighead@test.com"
        .Subject    "Test Mail Title"
        .HTMLbody   "<b>Test</b>"
        .Send
    End With
%>

+ Recent posts