QTP录制一个添加功能,运行之后如何检验一下是否添加数据成功?

moguikumogui

跑完一个QTP添加脚本之后,我如何检验添加新数据成功与否,是插入数据库检查点吗?
可是我怎么让其比较插入之后比之前多一条数据呢?

高手们,求助中.....

sterson

1.添加之后,你可以做页面上的判断,比如你加一个新闻主题为"今天的天气",加完后,在列表的页面上判断这个元素"今天的天气"是否存在于页面上...

2.你可以用vbscript链接数据库,执行SQL语句,查询是否已经添加成功


3.用以上两种方法结合一起验证..最佳最保险的做法...

moguikumogui

1.由于录制的内容一般是固定的,比如说:"今天的天气"这个新闻主题,第一次运行的时候是这个主题,第二次运行的时候也是这个主题,那如果靠检查这个元素是否存在于列表中应该是不合适的吧.


2.怎么用vbscript链接数据库啊?

sterson

Dim conStr,myCon
conStr = "Provider=Sqloledb;User ID=用户名; Password=密码; Initial CataLog =数据库名; Data Source=服务器名或IP;"
Set myCon = createobject("adodb.connection")
myCon.open conStr   '链接数据库

Dim myRS,mySql
mySql="select * from 新闻表 where 主题='今天的天气'"
Set myRS = createobject("ADODB.RecordSet")
myRS.Open mySql, myCon, 1, 1
if not myRs.eof then
   msgbox 'OK"
else
   msgbox "Error"
end if

moguikumogui

感谢,太感谢了!