현재 오프라인 상태입니다. 인터넷에 다시 연결하기를 기다리고 있습니다.

HOWTO: Visual Basic 스크립트에서 보내는 SMTP 메시지에 부인 추가

이 문서의 Microsoft Visual Basic 버전에 대한 내용은 317327을 참조하십시오.

작업 내용

요약
이 문서에서는 SMTP 전송 이벤트 싱크를 사용하여 보내는 SMTP 전자 메일 메시지에 부인을 추가하는 방법을 단계별로 설명합니다.


이벤트 싱크 만들기

이벤트 싱크를 만들려면 새 파일에 다음 코드를 붙여 넣고 EventSinkScript.vbs라는 이름으로 파일을 저장하십시오.
<SCRIPT LANGUAGE="VBScript">Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus)	TextDisclaimer = vbCrLf & "DISCLAIMER:" & vbCrLf & "Sample Disclaimer added in a VBScript."	HTMLDisclaimer = "<p></p><p>DISCLAIMER:<br>Sample Disclaimer added in a VBScript."	If Msg.HTMLBody <> "" Then	       	'Search for the "</body>" tag and insert our discliamer before that tag.	        pos = InStr(1, Msg.HTMLBody, "</body>", vbTextCompare)        	szPartI = Left(Msg.HTMLBody, pos - 1)	        szPartII = Right(Msg.HTMLBody, Len(Msg.HTMLBody) - (pos - 1))        	Msg.HTMLBody = szPartI + HTMLDisclaimer + szPartII                	Msg.TextBody = Msg.TextBody & vbCrLf & TextDisclaimer & vbCrLf	 Else        	Msg.TextBody = Msg.TextBody & vbCrLf & TextDisclaimer & vbCrLf	 End If        	'Commit the content changes to the transport ADO Stream object.	 Msg.DataSource.Save ' Commit the changes into the transport Stream	pEventStatus = cdoRunNextSinkEnd Sub</SCRIPT>				

이벤트 싱크 등록

이벤트 싱크를 등록하려면 Smtpreg.vbs라는 파일을 사용하십시오. 이 파일은 Exchange SDK와 함께 설치됩니다. 명령 프롬프트에서, ...\Exchange SDK\SDK\Support\CDO\Scripts 폴더로 이동한 후 다음과 같이 입력합니다. 이때 EventSinkScript.vbs의 경로를 올바르게 입력해야 합니다.
cscript smtpreg.vbs /add 1 onarrival SMTPScriptingHost CDO.SS_SMTPOnArrivalSink "mail from=*@your-domain-here.com"
cscript smtpreg.vbs /setprop 1 onarrival SMTPScriptingHost Sink ScriptName "C:\EventSinkScript.vbs"
명령이 성공하면 스크립트에서 생성하는 성공 메시지가 표시됩니다.

이 이벤트의 등록을 취소하려면 다음과 같이 입력합니다.
cscript smtpreg.vbs /remove 1 OnArrival SMTPScriptingHost
Smtpreg.vbs를 사용한 이벤트 등록에 대한 자세한 내용은 다음 MSDN 웹 사이트에서 "Managing Event Bindings(이벤트 바인딩 관리)" 항목을 참조하십시오.

이벤트 싱크 테스트

싱크를 테스트하려면 사용자 조직 외부의 SMTP 받는 사람에게 전자 메일 메시지를 보내십시오. 받는 사람이 메시지의 끝에 거부가 추가되어 수정된 메시지를 받습니다.

참고 Microsoft Outlook 같은 MAPI 클라이언트를 사용하여 전자 메일을 보내면 받는 사람이 수정된 메시지를 받지 못합니다. 이것은 전자 메일이 SMTP 전송 이벤트를 트리거할 때 MAPI를 사용하여 제출된 메시지가 SMTP 형식으로 되어 있지 않기 때문입니다. 따라서, 해당 이벤트의 코드에서 수행한 변경 내용이 유지되지 않습니다.

참조
자세한 내용은 Microsoft 기술 자료의 다음 문서를 참조하십시오.
273233 PRB: CDOEX: CDO SMTP 이벤트 싱크의 MAPI 메시지 내용을 변경할 수 없다




Microsoft 제품 관련 기술 전문가들과 온라인으로 정보를 교환하시려면 Microsoft 뉴스 그룹에 참여하시기 바랍니다.
속성

문서 ID: 317680 - 마지막 검토: 08/24/2005 20:42:00 - 수정: 3.2

  • Microsoft Exchange Server 2000 서비스 팩 1
  • Microsoft Exchange 2000 Server 서비스 팩 2
  • Collaboration Data Objects for Exchange 2000
  • Microsoft Collaboration Data Objects 2.0
  • kbhowtomaster KB317680
피드백
Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus)..." />
Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus)..." />