VB6을 사용하여 전자 메일 보내기용 프로그램을 작성하세요. MAPIMessages, IIS4.0에 포함된 CDONTS(NTSCollaborationDataObjects), 많은 타사 제조업체에서 개발한 전자 메일 소프트웨어 등 선택할 수 있는 다양한 전자 메일 구성 요소가 있습니다. 이 기사에서는 CDONTS를 사용하여 VB에서 메일 프로그램을 개발하는 방법을 소개합니다.
1. SMTP 서버가 설치되어 있는지 확인하세요
먼저 IIS 서버에 SMTP 서버가 설치되어 있는지 확인해야 합니다. OptionPack 설치 시 기본적으로 설치되는 옵션입니다. SMTP 서버가 설치된 경우 System32 디렉터리에 cdonts.dll이라는 파일이 있습니다.
2. 가장 간단한 이메일 전송 프로그램
다음은 [email protected]에서 [email protected]으로 제목이 "제목"이고 내용이 "Hello"인 전자 메일을 보내는 가장 간단한 전자 메일 보내기 프로그램입니다.
PRivateSubcmdSendMail_Click()
Dimobjmailas객체
SetobjMail=CreateObject("CDFONTS.DLL")
ObjMail.Send"[email protected]","[email protected]","제목","안녕하세요"
SetobjMail=아무것도 없음
EndSub
3. 이메일 첨부파일 보내기
이메일과 함께 전송해야 하는 첨부 파일이 있는 경우 CDONTS의 AttachFile 메소드를 사용할 수 있습니다.
PrivateSubcmdSendMail_Click()
DimobjMailas객체
SetobjMail=CreateObject("CDFONTS.DLL")
ObjMail로
.From="[email protected]"
.To="[email protected]"
.Subject="제목"
.Body="안녕하세요"
.AttachFile"c:/document/sample.doc","sample.doc"
.보내다
끝
SetobjMail=아무것도 없음
EndSub
4.CDONTS 구성 요소의 일반적으로 사용되는 속성 및 방법
일반적으로 사용되는 CDONTS 구성 요소의 속성과 방법은 다음과 같습니다.
재산:
버전: CDONTS 구성 요소의 버전 번호를 반환합니다.
MailFormat: 이메일 형식, 1-일반 텍스트 유형, 0-MIME 유형;
참조: 참조용으로 하나 이상의 이메일 주소를 설정하세요.
보낸 사람: 이메일을 보낸 사람의 주소
받는 사람: 이메일 수신자의 주소
제목: 제목
본문: 내용
BodyFormat: 콘텐츠 형식, 1-일반 텍스트, 0-하이퍼텍스트
방법:
AttachFile : 파일을 첨부합니다.
AttachURL: 주소를 첨부하세요
보내기: 이메일을 보내다
5.하이퍼텍스트 형식으로 이메일 보내기
그림, 소리뿐 아니라 애니메이션도 포함할 수 있는 하이퍼텍스트 형식을 사용하는 이메일을 많이 보셨을 것입니다. 이러한 이메일을 친구에게 보내면 분명 그 사람은 예상치 못한 놀라움을 느낄 것입니다. 이는 일반 이메일 전송 프로그램으로는 할 수 없는 일이기 때문입니다. 다음은 CDONTS 구성 요소를 사용하여 Sample.gif라는 그림이 포함된 HTML 형식의 이메일을 보냅니다.
PrivateSubcmdSendMail_Click()
DimobjMailas객체
SetobjMail=CreateObject("CDFONTS.DLL")
DimstrHTMLasString
StrHTML="〈html〉〈head〉"
StrHTML=StrHTML "〈title〉이메일〈/title〉〈/head〉 하이퍼텍스트 형식 사용
StrHTML=StrHTML "〈body〉〈p〉〈strong〉CDONTS를 이용한 이메일 전송 예"
StrHTML=StrHTML "〈imgsrc=sample.gif〉〈/strong〉〈/p〉"
StrHTML=StrHTML "〈p〉위의 예에는 이미지가 삽입되어 있습니다.sample.gif〈/p〉"
StrHTML=StrHTML "〈/body〉〈/html〉"
ObjMail로
.From="[email protected]"
.To="[email protected]"
.Subject="제목"
.Body=strHTML
.AttachURL"c:/mydata/sample.gif","sample.gif"
.BodyFormat=0
.이메일 형식=0
.보내다
끝
SetobjMail=아무것도 없음
EndSub
이 시점에서 귀하는 SMTP 이메일 처리에 결함이 있음을 발견하셨을 것입니다. SMTP 서버는 출력 메시지를 수신하지만 보낸 사람의 이름과 주소를 확인하지 않습니다. 이는 SMTP의 비동기 전송 메커니즘에 의해 결정되지만 누군가가 다른 사람인 것처럼 가장하여 이메일을 보낼 수 있습니다. 이 기사에서는 ISP가 귀하의 행동을 알게 되면 귀하의 계정이 즉시 삭제될 가능성이 높으므로 쉽게 시도하지 말 것을 강력히 권장합니다. ->