'用法：'准备好自动化测试脚本，'例如，'case1 放在路经 D:\Tracking\setObj下'case2 放在路径**下'准备一个test suite 文件，专门存放当个case 的路径'执行function ReadconfFile,参数是test suite的路径'Call ReadconfFile("c:\\CaseList.txt")Call ReadconfFile("c:\\CaseList.txt")Function ReadconfFile(path)Set fso=CreateObject("Scripting.FileSystemObject")Set f=fso.OpenTextFile(path,1,False)While Not f.AtEndOfLinetemp=f.ReadLine()Call RunMutiTest(temp)WendEnd fun.

这是我录制的window("SunSystems 5").WinTab("Short Heading").Select "Currency"以下是自己写的Dim tabNameiCount=window("SunSystems 5").WinTab("Short Heading").GetItemsCountFor j=0 to iCount-1tabname= window("SunSystems 5").WinTab("Short Heading").GetItem(j)window("SunSystems 5").WinTab("Short Heading").Select tabnameNext在循环里面 tabname 能够获得每一个tab的名字可是在运行的时候（包括录制的那句），总是告诉我：Object not visible加了wait 也不行鼠标已经移动到那个tab上.

读《移山之道》后有感--------------------------------------------------------------------------------来源：博客堂　　最近不断有猎头联系我，问我有没有兴趣看看其他的机会，其中包括AutoDesk，Morgan Stanley（软件研发部门），等等。职位都是QA Lead/Manager一类的。不是没有考虑过去微软外面看看。自从2004年秋天离开上海去北京的工程院开始正式作SDE/T（以及现在的测试主管）至今，已经三年了。这三年里面，一直是埋头做公司里面的产品，埋头做自己的事情，埋头学习，从我所在组积累的方法和经验里学习，从接触到.

如附件中所示明明选中的是录制web的脚本生成的却是window对象：Window("Microsoft Internet Explorer").WinEdit("Edit").SetSelection 0,11插件都没有问题不知道怎么解决

脚本中调用Word，Excel对象Excel中：Dim fileXlsfileXls="c:\aa.xls"Set xlapp=createObject("excel.application")Set wkBook=xlapp.workbooks.open (fileXls)xlapp.visible=falseWord中：Set oWord = CreateObject("Word.Application")oWord.DisplayAlerts = FalseoWord.Visible = FalseoWord.documents.open "c:\testWordDoc1.doc"发现这样的问题：如果调用的文件不存在（c:\aa.xls，c:\testWordDoc1.doc）就会报错。有没有相关的方法，如果发现文件不存在，就自动生成新的相应文件名.

很多网页的链接都是直接跳转，有没有提供相关的例子能够实现"在新窗口中打开"无论是鼠标右键还是Shift+Click

兴建一个记事本，记录输入“HAPPY” 然后保存SystemUtil.Run "C:\WINDOWS\system32\notepad.exe","","C:\Documents and Settings\jie.wu","open"Set WshShell = CreateObject("WScript.Shell")WshShell.AppActivate "无标题 - 记事本"wait 2WshShell.SendKeys "{ENTER}"WshShell.SendKeys "H"wait 1WshShell.SendKeys "a"wait 1WshShell.SendKeys "p"wait 1WshShell.SendKeys "p"wait 1WshShell.SendKeys "y"wait 5WshShell.SendKeys "%FS"模拟键盘操作“ALT+F”,在菜单里选择S.

有一个论坛。打开之后有这么一些板块：自动化测试测试&灌水环境搭建疑难杂症行业领域业务知识软件测试外语版我怎么样才能同时打开每一个板块，各自独立一个页面？考虑过用鼠标右键，然后"在新窗口打开"：Function RightMouseAction( UI_object, Menu_index)Set obj = CreateObject("Mercury.DeviceReplay")Set WshShell = CreateObject("WScript.Shell")Dim i'Get the absolute coordinates of the ibjectabsx = UI_object.abs_xabsy = UI.

尝试封装一些经常要用到的制程序和函数：1. 创建一个vbs文件：TestVbs.vbs内容如下：'##################################################################################'##################################################################################Sub CloseWeb()'此处可以用到描述性编程，把先期打开的IE窗口全关闭Dim WinIe,Ie,i,mSet WinIe=description.Create()WinIe("regexpwndtitle").value=" Microsoft Internet Explorer"'所有页面的regexpwndtitle属性值都是" Microsoft Inter.

上传视频，选择视频路径，出现错误：代码：'点击ActiveX控件 openBrowser("Browser").Page("都视网 www.dusee.cn 上传视频_2").WinObject("MacromediaFlashPlayerActiveX").Click 353,46wait 1Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinComboBox("查找范围(I):").Select "本地磁盘 (E:)"wait 1itemRange=Browser("Browser").Dialog("选择要上载的挡案自 vcupload.dusee.cn").WinComboBox("查找范围(I):").GetROProperty("text")'Browser("Browser").Dialog("选择要上载的挡案.

安装完后，在使用QTP的时候，如果我点对象库或者OBJECT SPY抓属性的就不能使用TAB+ALT了。。。不知道为什么，我身边的同事都不会有这样的情况呀.有没有人有碰到过这样的问题呀？怎么解决呀，急呀~~~不能使用就不能学啦~~

比方说：参数化 用户名:user_a,user_b,user_c,user_d登录每个用户都要上传文件参数化 上传文件：file_a,file_b,file_c那样一来，这两个行为（登录，上传）就只能放在同一个Action中进行？能不能根据不同的业务逻辑分开Action？dataTable 里的参数量就是 4*3=12个了如果还有其他事件呢，就只能穷举法，几何累积？这里讨论的纯粹是QTP脚本开发，不涉及测试方法（正交分析）请问：有没有相关的技术，或者技巧来减少数据量？

转载自 http://www.17testing.com'UI_object : The object on UI which you want to right click the mouse.'Menu_index : the menu's index, which one you want to selectFunction RightMouseAction( UI_object, Menu_index)Set obj = CreateObject("Mercury.DeviceReplay")Set WshShell = CreateObject("WScript.Shell")'Get the absolute coordinates of the ibjectabsx = UI_object.QueryValue("abs_x")absy = UI_object.QueryValue("abs_y").

按照QTP 的tutorial 上的作法：In the Active Screen, scroll up and highlight the date for the outbound flight, New York to San Francisco (12/29/2004). Right-click the highlighted string and select Insert Text Checkpoint. The Text Checkpoint Properties dialog box opens.In the Checked Text area, click the Constant Value Options button. The Constant Value Options dialog box opens.In the Value box, replace the current date with [0-1][0-9]/[0-3][0-9]/200[0-9]. This instructs Quick.

我大概是这么写的：Dim tMonth,tDayBrowser("Find a Flight: Mercury").Page("Welcome: Mercury Tours").SyncBrowser("Find a Flight: Mercury").Page("Welcome: Mercury Tours").WebEdit("userName").Set "jie.wu"Browser("Find a Flight: Mercury").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "46443445ec2b560857053112a57f709c01cd4e25fbf4"Browser("Find a Flight: Mercury").Page("Welcome: Mercury Tours").Image("Sign-In").Click 26,4Browser("Find a Flight: Mercury").Page("Welco.

Text Checkpoint "[0-1][0-9]/[0-3][0-9]/200[0-9]": FailedDetailsText Checkpoint: captured "2/30/2007" between Frankfurt to London and SELECT , expected "[0-1][0-9]/[0-3][0-9]/200[0-9]"Regular Expression : ONMatch case: OFFExact match: OFFIgnore spaces: ON参数化，Iteration 2：DetailsText Checkpoint: captured "" between Frankfurt to London and SELECT , expected "[0-1][0-9]/[0-3][0-9]/200[0-9]"Regular Expression : ONMatch case: OFFExact match: OFFIgnore spaces.

回放脚本的时候，突然发现报错原来是事先多开了个"Google" 的IE窗口代码里面，原本填写的数据，都填在google上了而后面的操作，就进行不下去了。曾经有过这样的想法：打开Browser之前，先把任务栏上的所有IE窗口全部关闭，听说 “描述性编程” 能够实现，不知道有没有可能？循环不知道怎么写，所有IE窗口 的集合？set b=？ChildObjects()?希望教我

请问一下，为什么我回放脚本的时候，旁边标识不见了？我记得以前回放脚本的时候，代码旁边中有个黄色的箭头，指名当前运行到什么地方重新按装后，仅然没有了，用起来很不习惯会不会是脚本调试器的问题（安装的时候选择“不安装”）？可是后来我又手动安装过了呀搞不懂

在安装的过程中：准确说是在：正在注册模块QuickTest Professional 错误：无法注册模块 C:\Program Files\Mercury Interactive\QuickTest Professional\bin\ACXSnapshotViewer.dll 。HRESULT-2147024770请与技术支持人员联系os:xp有没有方法解决？谢谢！！！

要验证识别码的安全性，希望找到相关的软件，模拟恶意用户从来没有接触过这样的软件，有谁熟悉的？