article id #74
categorized under HP QTP & written by _PaDo
categorized under HP QTP & written by _PaDo
QTP 테스트 결과를 이메일로 전송을 해야 하는 경우가 있는데요 QC와의 연동이 되어 있지 않은 경우 VBScript로 직접 구현을 해야 합니다.
Windows의 CDO.Message 개체를 활용하여 메일을 보낼 수가 있고요 아래와 같이 세팅하면 GMail 계정을 이용해서 메일을 보낼 수 있습니다. (CDO.Message에 대한 자세한 정보는 http://www.wssplex.net/TipnTech.aspx?Seq=400 )
Public Function SendMail
Const cdoSendUsingPickup = 1
Const cdoSendUsingPort = 2
Const cdoAnonymous = 0
Const cdoBasic = 1
Const cdoNTLM = 2
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "[테스트결과공지]"
objMessage.From = "your-address@gmail.com"
objMessage.To = "whoever@anywhere.com"
objMessage.TextBody = "이것은 테스트 메시지"
'objMessage.HTMLBody = 'HTML 메시지의 경우 사용
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPort
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "your-email-address@gmail.com"
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "your-password"
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
objMessage.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objMessage.Configuration.Fields.Update
objMessage.Send
Set objMessage = Nothing
End Function
'HP QTP' 카테고리의 다른 글
| [QTP] QTP에서 이메일 전송하기 (GMail 활용) (0) | 2010/06/09 |
|---|---|
| [QTP] 결과리포트에 HTML 사용하기 (0) | 2010/06/09 |
| [QTP] QTP로 안드로이드 테스트 하기 (0) | 2010/06/07 |
| [QTP 10] 한글언어팩 설치 에러 (0) | 2010/04/15 |
| [QTP] QTP 9.2 -> IE7 사용 시 설정해 주어야 하는 것들 (0) | 2009/08/17 |
| [QTP] SAP 환경변수의 활용 (0) | 2008/12/02 |
TRACKBACK ADDRESS
http://bmyluv.tistory.com/trackback/74
http://bmyluv.tistory.com/trackback/74
