[原创]自动点击outlook中安全页面中yes按钮的方法

上一篇 / 下一篇  2008-11-15 18:54:58 / 个人分类：QTP

查看( 620 ) / 评论( 0 ) / 评分( 0 / 0 )

以前写过一个方法，使用在QTP中OUTLOOK自动发邮件，但是大家在使用的时候经常会发现OUTLOOK会弹出一个安全确认的窗口，以前我们的解决方法是自己写个工具来解决，这次我们用ＱＴＰ脚本来实现：

我们可以使用以下的脚本来实现自动处理该页面．

Setfso = CreateObject("Wscrīpt.Shell")
 
Whilefso.AppActivate("Microsoft Outlook") =FALSE
wscrīpt.sleep 1000
Wend
 
fso.SendKeys"a",True
fso.SendKeys"y",True
 
wscrīpt.sleep 7000
 
Whilefso.AppActivate ("Microsoft Outlook") =FALSE
wscrīpt.sleep 1000
Wend
 
fso.SendKeys"y",True

当然我们可以放在ＶＢＳ里引用这方法．

收藏 举报

TAG: QTP

 

评分：0

我来说两句

Open Toolbar