軟件測試開發技術SQABasic數據庫命令

       返回值是結果集的行的數目或請求的最大行。如果函數不能在指定連接上獲得結果，返回-1。如果沒有發現數據，函數返回0。

　　參數是必需參數。返回變量。

　　如果maxColumns或maxRows被缺省，數組大小被用來確定獲得的行列的最大數目，并返回整個結果集是一個嘗試。通過再次使用 SQLRetrieve和把fetchFirst設置為0，額外行可以被獲得。如果maxColumns指定比結果中可用的更少的列， SQLRetrieve拋棄右邊結果列只到結果與指定大小相適合。

　　當columnNames是非0，數組的第1行將放置數據庫計劃(database schema)指定的列名稱。 當 rowNumbers是非0，行數目返回到destination()的第1列。SQLRetrieve將清空用戶的數組來獲得結果。

　　當fetchFirst 是非0，它將結果重新配置到第一行，前提是如果數據庫支持此功能。如果數據庫不支持此功能，結果設置 –1錯誤被返回。

　　如果結果集有比可以被destination()數組包含還多的行或比用maxRows請求還多的行，用戶可以重復調用SQLRetrieve只到返回值為0為止。

　　SQLRetrieve Example

　　This example retrieves information from a data source.

　　Sub main

　　'''' Declarations

　　''''

　　Dim connection As Long

　　Dim destination(1 To 50, 1 To 125) As Variant

　　Dim retcode As long

　　Dim query as String

　　Dim outputStr as String

　　connection = SQLOpen("DSN=SblTest",outputStr,prompt:=3)

　　[NextPage]

　　'''' Execute the query

　　query = "select * from customer"

　　retcode = SQLExecQuery(connection,query)

　　'''' retrieve the first 50 rows with the first 6 columns of each row into

　　'''' the array destination, omit row numbers and put column names in the

　　'''' first row of the array

文章來源于領測軟件測試網 http://www.kjueaiud.com/