51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3736|回复: 1
打印 上一主题 下一主题

[原创] QTP中检查是否收到邮件。

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2007-3-19 02:49:40 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
很多应用中都有发送邮件通知的动作。

但是用QTP怎样检查呢?其实很简单,其实只需要找到个控件就可以了。

QTP支持VBScript的。大家稍有基础,就应该知道VB,VBScript,ASP等概念。

说到这里,想必不用我多少,很多人就明白了,找个aspmail或者jmail之类的,完全可以解决问题。

不要说检查是否收到特定邮件了,就是运行完脚本自动给自己发送一个邮件报告都不在话下。

代码示例如下。

  ------------------------   
  EmailUserName=账号   
  EmailUserPass=密码   
  EmailUserPOP=   POP3服务器地址   
  Set   POP3   =   Server.CreateObject("JMail.POP3")   
  POP3.Connect   EmailUserName,EmailUserPass,EmailUserPOP   
  POP3.DownloadHeaders   
  if   POP3.Count=0   then   
      Response.end   
  end   if   
   
  For   I=1   To   POP3.Count   
      Subject=POP3.Messages.Item(I).Subject   
      FromAddress=POP3.Messages.Item(I).From   
      FromName=POP3.Messages.Item(I).FromName   
      Response.write   "<br>"   &   Subject       '主题   
      Response.write   "<br>"   &   FromAddress   '发件人Email   
      Response.write   "<br>"   &   FromName       '发件人姓名     
      Response.write   "<br>"   &   POP3.Messages.Item(I).Date   '邮件到达服务器的时间   
  Next   
  POP3.Disconnect

贴一个jmail的教程。供参考吧。

http://www.ajiang.net/article/artview.asp?id=175
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
 楼主| 发表于 2007-3-19 02:50:19 | 只看该作者
jmail如果有问题,参考csdn上的讨论。
http://topic.csdn.net/t/20051227/09/4483157.html
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-8 12:12 , Processed in 0.062376 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表