UFT試用版下載

使用UFT調(diào)用psql.exe操作postgresql

UFT中有一個CMD，在CMD中可以做很多事情。在這里，我們?yōu)榇蠹抑v解在UFT中怎樣通過psql.exe操作數(shù)據(jù)庫。

psql.exe 是pgAdmin的一個工具，默認(rèn)存儲位置在“C:\Program Files\PostgreSQL\9.3\bin”（視具體情況而定）。

如下所示：

    SystemUtil.Run "cmd"
    Window("cmd").Type "C:"
    Window("cmd").Type micReturn
    Window("cmd").Type "cd C:\Program Files\PostgreSQL\9.3\bin"
    Window("cmd").Type micReturn
    Window("cmd").Type "psql.exe -h localhost -U root -d security_db -p 5432"
    Window("cmd").Type micReturn

1. 使用UFT自帶的SystemUtil 打開一個cmd 窗口
2. 使用UFT定位得到這個CMD窗口
3. 切換到psql.exe所在的目錄（也是可以不用的，直接帶路徑就可以，Program Files 有空格，需要引號）
4. 連接到postgresql
   • 主機(jī)地址
   • 數(shù)據(jù)庫用戶名
   • 數(shù)據(jù)庫密碼
   • 數(shù)據(jù)庫實例名稱
   • 連接之后就是各種CURD了

UFT加載函數(shù)庫的3種方式

UFT加載函數(shù)庫包含以下3種方式：

• 靜態(tài)加載函數(shù)庫：File-Setting-Resources
• 動態(tài)調(diào)用VBS文件：ExecuteFile
• 動態(tài)調(diào)用函數(shù)：LoadFunctionLibrary

UFT加載函數(shù)庫3種方式的區(qū)別：

• 靜態(tài)加載方式與LoadFunctionLibrary方式都能加載vbs、txt、qfl格式，而ExecuteFile只能加載vbs格式
• 靜態(tài)加載方式后，我們可以使用F7（stepgenerator）來生成步驟
• 當(dāng)腳本中設(shè)置斷點后，用靜態(tài)加載方式和LoadFunctionLibrary方式會回到腳本中，而ExecuteFile不會
• 當(dāng)腳本中含有類時，使用ExecuteFile；腳本中不含類時使用LoadFunctionLibrary方便排查錯誤

QTP連接MSsql數(shù)據(jù)庫操作

    Dim AdoCnn ,strDb,Rst,strCnn,ilen ,strsql '//定義變量
    strCnn=" DSN=qtp;Description=study_Qtp;UID=sa;PWD=123;APP=UFTBase;WSID=.;DATABASE=suooter" 'qtp為ODBC數(shù)據(jù)源

    'strCnn=" DRIVER=SQL Server;SERVER=.;UID=sa;PWD=123;APP=Microsoft Office 2003;WSID=.;DATABASE=suooter "  '無ODBC數(shù)據(jù)源方式

    Set AdoCnn=CreateObject("ADODB.Connection") '//生成數(shù)據(jù)庫連接對象
    AdoCnn.Open strCnn   '   //打開數(shù)據(jù)庫
    If AdoCnn.State=0 Then '判斷是否鏈接數(shù)據(jù)庫成功
    msgbox "Connect Fail"
    else
    msgbox "Connect Success"
    End If

    strsql="Select x  FROM PlayerInfo"
    Set Rst =AdoCnn.Execute(strsql)
    ' 得到所有列值
    While not Rst.EOF
    msgbox Rst.Fields.Item("x").Value
    Rst.MoveNext
    Wend

    Rst.Close
    AdoCnn.close
    Set AdoCnn=Nothing
    Set Rst=Nothing

回放時只訪問Datatable第一行數(shù)據(jù)的解決方法

在for循環(huán)內(nèi)的最后一行添加：

    DataTable.GetSheet("***").SetNextRow '

    可獲取DataTable中的下一行數(shù)據(jù)