软件测试开发技术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

文章来源于领测软件测试网 https://www.ltesting.net/