1. 程式人生 > >精通QTP-自動化測試技術領航 第2章2.2.9綜合例項練習總結

精通QTP-自動化測試技術領航 第2章2.2.9綜合例項練習總結

1、瀏覽器  通過瀏覽器控制代碼來操作瀏覽器 oHwnd= Browser("51Testing軟體測試網").GetROProperty("hwnd") '獲取控制代碼 Browser("hwnd:= " &oHwnd).Close   '通過控制代碼關閉瀏覽器
qtp執行時想每次點選後定位到新的頁面可嘗試: 1、開啟IE瀏覽器,在選單欄單擊“工具”選擇“Internet 選項”。 2、在Internet 選項對話方塊單擊“常規”選項卡,單擊“設定”按鈕。 3、在選項卡瀏覽設定對話方塊選中“當建立新選項卡時,始終切換到新選項卡”,單擊“確定”按鈕。
2、webList控制元件 通過select賦值,用GetROProperty("value")獲取執行時的值 WebList("系統分類").Select "XXXX" WebList("系統分類").GetROProperty("value") 3、WebElement
賦值用object.innerText WebElement("日誌內容").object.innerText = "這是一個綜合例項!" 4、webFile  檔案上傳,上傳時只能通過彈出的對話方塊來選擇上傳的檔案,而無法直接輸入檔案地址 這時候我們要自己寫彈出視窗語句來模擬操作,解決方法就是模擬操作:1.點選按鈕;2.在彈出的dialog輸入檔名;3.點選確認選擇按鈕   WebFile("選擇檔案").Click   Browser("51Testing軟體測試網").Dialog("選擇要載入的檔案").WinEdit("檔名(N):").Set "G:\test.txt"   Browser("51Testing軟體測試網").Dialog("選擇要載入的檔案").WinButton("開啟(O)").Click 判斷檔案上傳是否成功 檔案上傳後,通過webElement控制元件來判斷上傳是否成功 eg:判斷 WebElement("指定的檔案已經成功上傳").Exist(1)的值是否等於 True 5、webTable
要操作webTable中的值,需先獲取其行 和 列 ,通過行 列來操作 兩個重要函式: getCellData(行,列)、ChildItem(行,列,"要虛擬的控制元件名",0) '從列表中查詢search tRow = .WebTable("私人箱列表").RowCount '計算行數   search = "<QTP 自動化綜合例項測試>"   '掃描私人箱列表,從第2行開始   For i = 2 to tRow   '日誌標題位於第2列     cellData = .WebTable("私人箱列表").GetCellData(i,2)     return = InStr(1,cellData,search)     If return <> 0 Then       Reporter.ReportEvent micPass,"剛釋出的內容儲存在私人箱裡","pass"       Set oCheckBox = .WebTable("私人箱列表").ChildItem(i,1,"WebCheckBox",0)       oCheckBox.set "on"   '選中該項       Set oCheckBox = nothing ‘釋放物件       Browser("個人空間管理_2").Page("個人空間管理").WebButton("立即釋出").Click       Exit for '找到後退出迴圈     else      Reporter.ReportEvent micFail,"釋出的內容未儲存在私人箱中","Failed"     End If   Next 6、InStr([start, ]string1, string2[, compare])
string1、string2的位置不要搞錯 string2-----------指定要搜尋的字串