【正文】 NextFor j=0 to iBrowser(Browser).Page(軟件測試論壇).Link([ 版主討論區(qū) ]).SetTOProperty Text，arr(j)Browser(Browser).Page(軟件測試論壇).Link([ 版主討論區(qū) ]).ClickBrowser(Browser).BackNext或者：Browser(Browser).Page(Page).SyncBrowser(Browser).Navigate Browser(Browser).Page(軟件測試論壇).SyncDim arr arr = Array([軟件質(zhì)量管理] ，[軟件需求管理] )Dim ii = 0For i=0 to 1Browser(Browser).Page(軟件測試論壇).Link([軟件測試論壇公告]).SetTOProperty Text，arr(i)Browser(Browser).Page(軟件測試論壇).Link([軟件測試論壇公告]).Click micPass，click links，arr(i)Browser(Browser).Page(51Testing軟件測試論壇 [軟件測試論壇公告]).SyncBrowser(Browser).BackNextBrowser(Browser).Page(軟件測試論壇).Sync27. 數(shù)據(jù)自動導(dǎo)出當(dāng)運行到表中的某一行，自動導(dǎo)出表中的所有數(shù)據(jù)row=if row=5 then (d:\)end if 28. QTP加密Description ‘Encrypts a string. Syntax (Data)Argument Type Description ‘Data String The string to encrypt. Return Value String Example ‘In the following example， a password is taken from a database and encrypted using the Encrypt method， and then placed in the password edit box using the SetSecure method. pwd = GetPasswordfromSomewhere e_pwd = (pwd) Browser(dfgd).Dialog(pass).WinEdit(pwd).SetSecure e_pwd29. 參數(shù)表操作由QTP自動生成的語句是這樣的：DataTable(Col，dtLocalSheet)DataTable(Col，dtGlobalSheet)其中，dtLocalSheet就是當(dāng)前Action的DataTable，dtGlobalSheet就是Global的DataTable，Col是列名還有很多寫法，比如DataTable(Col， Action2)就是讀取Action2的Col列。你完全可以讀取另一個Action的DataTable，而不需要跨Action傳遞變量，使用DataTable比變量更方便，因為結(jié)束后能在Result里看到運行時的值你可以在一個Action里讀取另外一個Action的列，但是要注意另外一個Action的當(dāng)前行，比如你在Action1里讀取Action2的某列，如果Action1運行到第二行，你讀取的Action2還是第一行的數(shù)據(jù)，解決辦法就是寫上這句：(Action2).SetCurrentRow(2)你也可以用GetCurrentRow來獲取Action1的行，然后再用SetCurrentRow來保持兩個Action的當(dāng)前行一致：CurrRow = (Action1).GetCurrentRow(Action2).SetCurrentRow(CurrRow)還有一種寫法：DataTable(1， Action2)這樣就是讀取Action2的第一列，不管第一列叫什么名字，都能讀這樣就很方便，比如：For i = 1 To 10 MsgBox DataTable(i， Action2)Next這樣就能循環(huán)讀取Action2的1~10列了同樣，表也可以用數(shù)字代替：DataTable(1， 2)這樣就是讀取第二個Action表的第一列兩個頁面的輸入數(shù)據(jù)都放在Local DataTable里面后運行，運行結(jié)果是： 只有第一行的數(shù)據(jù)都被訪問到。 其中的進行參數(shù)化的代碼是 Browser(Login Page).Page(Page_4).WebButton(Create).Click Browser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo，dtLocalSheet) Browser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo，dtLocalSheet) Browser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo，dtLocalSheet) Browser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo，dtLocalSheet) Browser(Login Page).Page(Page_5).WebButton(Save).Click 一次登陸，讀取到Local DataTable里的每個數(shù)據(jù)，然后退出。 下面是讀取第一列的數(shù)據(jù)的代碼 ： Dim i i = 1While i= 3 currentValue = (Action1).GetParameter(LProductInfo).ValueByRow(i)Browser(Login Page).Page(Page_4).WebButton(Create).ClickBrowser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo，dtLocalSheet)Browser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo，dtLocalSheet)Browser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo，dtLocalSheet)Browser(Login Page).Page(Page_5).WebEdit().Set DataTable(LProductInfo,dtLocalSheet)Browser(Login Page).Page(Page_5).WebButton(Save).Clicki = i +1 Wend 讀取第2列的數(shù)據(jù)的代碼也可以如此修改，只是不用忘記寫i = 1 進行初始化 i 的值，因為運行上面的代碼后 i 的值 是 3了。 dim countNum countNum = (Global).GetRowCountfor i=0 to countNum1(i)Browser(Login Page).Page(Page_5).WebEdit().set DataTable((， dtLocalSheet)...............End30. Action的設(shè)置和調(diào)用在錄制腳本的時候通常會遇到這種情況，一個步驟需要反復(fù)執(zhí)行，但是其他步驟不需要跟著執(zhí)行，就比如活期開戶，一般分為柜員簽到、開戶操作（信息維護）、柜員簽退這三步，只有信息維護這個步驟是需要重復(fù)執(zhí)行的，登陸和退出不需要重復(fù)執(zhí)行。在決定使用多個Action調(diào)用之后需要對整個腳本有一個劃分，解決這個問題，在錄制腳本之前，先要對腳本進行劃分，還是以活期開戶為例，分為柜員簽到、開戶操作（信息維護）、柜員簽退，其中信息維護是主要部分而柜員簽到和柜員簽退是次要部分，分別對主要部分和次要部分作相應(yīng)的設(shè)置，就能達到你的要求：1. 如果是整個流程是一個Action，尚且沒有拆分使用工具欄上Action 拆分按鈕對你的腳本進行拆分；2. 對需要重復(fù)執(zhí)行的部分，即信息維護部分進行屬性修改，在關(guān)鍵字試圖中選中該Action，右鍵選擇其屬性，將該Action變?yōu)榭芍赜貌僮鳎?. 然后編寫相應(yīng)的語句就可以可：RunAction,“信息維護”O(jiān)neIteration/13/510這里OneIteration表示只運行一次，13是運行參數(shù)表的1到3行，見下文。31. Action的參數(shù)傳遞例如:在Action1中，有如下代碼:out_str=This is out_stringRunAction Action2，oneIteration，out_str在Acton2中，在其stepAction Properties中的，input參數(shù)欄，加入out_str后，msgbox(parameter(out_str))，就能正確顯示參數(shù)了32. 參數(shù)表運行位置RunAction “aaa”，oneIteration:只運行一次。（參數(shù)表只走一行）RunAction “aaa”，allIteration:參數(shù)表每行走一次RunAction “aaa”，”14”:只運行參數(shù)表14行RunAction “aaa”，oneIteration，Parameter(“Axn1_IN”)，DataTable(“Col1”，dtLocalSheet)輸入?yún)?shù)，輸出參數(shù)。Copy進來的Action要注意共享的對象庫包括了所有對象。如果你是用Peraction對象庫模式，那么從一個共享的對象庫的測試中COPY action進來。COPY進來的就是一個屬于你的副本，你對它的改動只是在你的TEST中，不會影響。OPTION ＞FOLDER來設(shè)定路徑。33. Action的運行和終止168。 RunAction用于開始運行或者調(diào)用某個Action：a) RunAction “信息維護”，OneIteration，Parameter(“Axn1_IN”)，運行該Action參數(shù)表的“Axn1_IN”一遍，這種操作是對Action的直接調(diào)用；在調(diào)用的同時，可以根據(jù)需求修改調(diào)用的內(nèi)容。b) RunAction “Copy Of信息維護”，OneIteration，Parameter(“Axn1_IN”)，運行該Action的參數(shù)表的“Axn1_IN”一遍，這種操作是對Action的副本的調(diào)用，這種調(diào)用不允許對調(diào)用的副本進行修改。168。 ExitAction用結(jié)束當(dāng)前Action的運行，不牽涉其它的Action的運行情況。如果在腳本出現(xiàn)運行錯誤或者說在循環(huán)的跳出條件的約束下結(jié)束運行，就不應(yīng)該使用這個函數(shù)，因為很可能結(jié)束當(dāng)前Aciotn的運行之后，其它的Action將會開始運行。168。 ExitRun這是最徹底的結(jié)束運行的方式，如果是在交易（運行）出錯的情況下，決定停止執(zhí)行當(dāng)前交易，則一般使用判斷條件的約束強制結(jié)束腳本的運行。這時候的結(jié)束需要徹底，就使用該函數(shù)，這個函數(shù)不需要任何參數(shù)，直接就停止所有運行。第四部分 數(shù)據(jù)庫鏈接和檢查34. 數(shù)據(jù)庫檢查點模塊: sub database_checkset con=createobject() Description=IBM_ODBC。DRIVER=SQL Server。SERVER=IBM。UID=sa。amp。_PWD=123456。APP=Quick Test Pro。WSID=IBM。DATABASE=IBM_table39。access方式: DRIVER={Microsoft Access Driver (*.mdb)}。DBQ=d:\39。Orocle方式: DRIVER={Oracle in OraHome92}。SERVER=CESHI。UID=CND_TEST。PWD=CND。DBQ=CESHI。DBA=W。APA=T。EXC=F。XSM=Default。FEN=T。QTO=T。FRC=10。FDL=10。LOB=T。RST=T。GDE=F。FRL=Lo。BAM=IfAllSuccessful。MTS=F。MDI=Me。CSR=F。FWC=F。PFC=10。TLO=O。set record=createobject()sql=select*from ibm_one_table sql，conDOif(record(ibm_table_column)=kai)then39。//查找表格中有多少kainum=num+1。end ifloop until =trueset record=nothingset con=nothingend sub35. 數(shù)據(jù)庫檢查點手動SQL寫法QTP插入數(shù)據(jù)庫檢查點，手動指定SQL語句的寫法。一、SQL Server格式(本地?zé)o需安裝SQL Server)connectionstring(連接字符串):DRIVER=SQL Server。SERVER=數(shù)據(jù)庫IP地址。UID=用戶名。PWD=密碼。APP=Microsoft Office 2003。WSID=本地主機名。