精通QTP-自動化測試技術領航 第2章2.2.9綜合例項練習總結
阿新 • • 發佈:2019-02-05
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-----------指定要搜尋的字串
qtp執行時想每次點選後定位到新的頁面可嘗試: 1、開啟IE瀏覽器,在選單欄單擊“工具”選擇“Internet 選項”。 2、在Internet 選項對話方塊單擊“常規”選項卡,單擊“設定”按鈕。 3、在選項卡瀏覽設定對話方塊選中“當建立新選項卡時,始終切換到新選項卡”,單擊“確定”按鈕。
2、webList控制元件 通過select賦值,用GetROProperty("value")獲取執行時的值 WebList("系統分類").Select "XXXX" WebList("系統分類").GetROProperty("value") 3、WebElement