asp 웹 페이지에서 CDO 참조를 추가하는 방법

Question

ASP에서 새 전자 메일을 만들고 CDO를 사용하여 메일 서버로 보내려고합니다. CDO 또는 전자 메일 보내기 기능에 대한 참조가 필요하다고 생각합니다.

Set objNewMail = Server.CreateObject("CDONTS.NewMail")

는 불행하게도 지금은 ASP에서 오류로 일하고있다 :이 책에서는이를 사용했다. 이제 asp를 사용하여 iis를 통해 작동하도록 참조 또는 com 객체를 추가하는 방법을 확인하십시오. 내가 말하는 책은 다음과 같다. "CDO 개체 모델"나는 윈도우 XP 또는 Windows Server 2003

Answer 1

사용을 사용하고 대신 CDONTS이

<!-- 
    METADATA   
    TYPE="typelib"   
    UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"   
    NAME="CDO for Windows 2000 Library" 
--> 

<% 
Function SendMail(sFrom, ToA, Subject, Mybody) 

    Dim iMsg,iConf  
    Set iMsg = CreateObject("CDO.Message")   
    Set iConf = CreateObject("CDO.Configuration") 

    Dim Flds   
    Set Flds = iConf.Fields  
    With Flds  
     ' assume constants are defined within script file  
     .Item(cdoSendUsingMethod) = cdoSendUsingPort   
     .Item(cdoSMTPServer)  = MAILSERVER   
     .Item(cdoSMTPConnectionTimeout) = 60    
     .Item(cdoURLGetLatestVersion) = True   
     .Update   
    End With 

    With iMsg  
     Set .Configuration = iConf   
      .To  = ToA    
      .From  = sFrom    
      .Subject = Subject    
      .TextBody = Mybody    
      .Send    
    End With 

    Set iConf = nothing   
    Set iMsg = nothing 

    If Err.Number = 0 Then  
     SendMail = True   
    Else   
    SendMail = Err.Number&":"&Err.Description   
    End If 
    On Error Goto 0  
    set objSendMail = Nothing  
End Function  

%>