QTP學習筆記 Excel資料來源

直接讀取excel**的function摘自此處  特此感謝！

excel作為qtp自動化測試的資料來源，有兩種方式可應用到指令碼中

一、匯入到datatable中

1 importdata("

login")
2function
importdata(sheetname)
3 datatable.importsheet environment.value("
testdir
")&"
\testdata.xls
",sheetname,"
global"4
end function

說明：importsheet的第二個引數可用sheet編號，從1開始

qtp11不支援word2007及以上的excel檔案（.xlsx）

二、使用excel com直接讀取excel

1

'****************************************2'
名 稱：qtp_readexcel3'
作 用：從excel讀資料4'
參 數：sfilename：excel檔名 ssheetname：sheet表名5'
返回值：把excel變為2維陣列返回(第一行為資料表列名)6'
****************************************
7function
qtp_readexcel(sfilename,ssheetname)
8dim
oexcel
9dim
osheet
10dim
orange
11dim
arrrange
1213
onerror
resume
next14'
建立excel應用程式物件
15set oexcel = createobject("")
16if err.number <> 0
then
17msgbox
"未能初始化excel
" & vbcrlf & "
請確保excel已安裝
", vbcritical
18exit function
19end
if20
onerror
goto021
22on
error
resume
next23'
開啟excel檔案
24oexcel.workbooks.open(sfilename)
25if err.number <> 0
then
26msgbox
"未能載入excel檔案
" & vbcrlf & "
請確保excel檔案路徑正確或格式正確
", vbcritical
27exit function
28end
if29
onerror
goto030
31'獲取**的使用範圍
32set osheet =oexcel.worksheets(ssheetname).usedrange33'
獲取從a列到z列，從第1行到第1000行的範圍i中的所有值
34set orange = osheet.range("
a1:z1000")
35'把excel資料轉換到陣列
36 arrrange =orange.value37'
關閉工作簿
38 oexcel.workbooks.item(1
).close
3940
'退出excel
41oexcel.quit
42set oexcel = nothing43'
返回包含excel資料的陣列
44 qtp_readexcel =arrrange
45end function

資料來源筆記

python第三方庫 google hacking語法 msf後滲透利用整理 msf命令大全 資訊收集方法 openvas安裝 滲透師 安全基礎資料 實戰滲透經驗 滲透測試漏洞例項文章資源 msfvenom免殺木馬 後滲透之meterpreter使用攻略 vscode支援的markdown語法參考 ...

Delphi ADO 連線Excel資料來源

將乙個excel 當作是乙個資料庫，利用ado元件實現獲取excel中的資料顯示到介面中，如下 unit unit1 inte ce uses windows,messages,sysutils,variants,classes,graphics,controls,forms,dialogs,db,...

SpringBoot學習 資料來源（一）單資料來源

springboot2.1.9預設支援三種資料來源 connection pool com.zaxxer.hikari.hikaridatasource org.apache.tomcat.jdbc.pool.datasource org.apache.commons.dbcp2.basicdata...