内存不能为"read”
上一篇 / 下一篇 2011-09-23 14:31:31 / 个人分类：未解决问题
Dim ObjOutlook
Dim ObjMailItem
Dim ObjMailItem
Set bjOutlook=CreateObject("Outlook.Application")
Set bjMailItem=objOutlook.CreateItem(0)
Set bjMailItem=objOutlook.CreateItem(0)
objMailItem.To="liulan_wx@nfschina.com"
objMailItem.CC="liulan_wx@nfschina.com"
objMailItem.BCC="913740598@qq.com"
objMailItem.CC="liulan_wx@nfschina.com"
objMailItem.BCC="913740598@qq.com"
objMailItem.Subject="outlook is install"
objMailItem.Body="This is a test mail"
objMailItem.Body="This is a test mail"
objMailItem.Display
objMailItem.Send
objOutlook.Quit
Set bjOutlook=Nothing
'Reporter.ReportEvent micPass,"成功","邮件发送成功"
objMailItem.Send
objOutlook.Quit
Set bjOutlook=Nothing
'Reporter.ReportEvent micPass,"成功","邮件发送成功"
我想在qtp中编辑这一段代码，每当写到Set bjMailItem=objOutlook.CreateItem(是就会出现内存不能读，如下图
相关阅读:
- QTP中innertext和innerhtml属性的区别 (senseflower, 2011-8-30)
- 循环所有航班的脚本 (ll7140042511, 2011-8-31)
- link对象的双击操作 (senseflower, 2011-9-13)
- win7下安装QTP10出现的问题 (amychen2011, 2011-9-20)
