脚本回放，button点击一次，查看结果，却添加了2条记录

迷眼了 · 发表于 2010-4-12 18:56:34

录制代码，调试以后脚本是这样的：
Browser("link").Page("link").WebEdit("comment").Click
Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys DataTable("Comment", dtGlobalSheet)（此处之所以用这种方法，是因为add按钮需要enable）
wait(5)
Browser("link").Page("link").WebElement("Add").Click

运行，查看结果，发现comments添加了2条，于是单步调试，奇怪，一步步调试，添加就只有一条数据（这是我需要的结果）

看了半天，也没有循环嵌套，但是全部运行和单步运行得出的结果就是不一样，同志们有遇到过这种情况么？

TIB · 发表于 2010-4-12 22:05:26

估计是这一句有问题：
WshShell.SendKeys DataTable("Comment", dtGlobalSheet)

单步调试时，这一句应该不会作用于Add按钮，因为出于调试状态，被QTP窗口挡住了

迷眼了 · 发表于 2010-4-13 10:00:31

可是，这一句只是sendkeys，把我需要的comments打出来，可能我还不太了解这句的作用，本来只是把webedit.set 就可以了，但是这样的话add按钮不会被激活，因为没有感应到输入字符，所以我就用了sendkeys，难道这个sendkey还有其他用途？

TIB · 发表于 2010-4-13 10:54:02

改成这样试试：
Browser("link").Page("link").WebEdit("comment").Click
Browser("link").Page("link").WebEdit("comment").Set "comments"
Browser("link").Page("link").WebElement("Add").Object.disabled = 0
Browser("link").Page("link").WebElement("Add").Click

迷眼了 · 发表于 2010-4-13 11:06:13

这样不行，因为这个add按钮吧，它一定是要感应到key键入了才能enable，气煞我也，不能人为的去把它enable，一下子set，这个按钮感应不到，很是顽固，呵呵，所以我只能用sendkey，好不容易招到这个sendkeys了吧，问题又来了，这个sendkey难道会自己去再次激发add？set nothing也不行，但是我不知道这个跟单步调试为啥就不一样呢？你说他屏蔽了窗口，屏蔽了哪个窗口？：（