软件测试开源工具Rational Robot SQABasic数据库操作相关命令[4]

发布: 2009-11-19 09:32 | 作者: 不详 | 来源: 领测软件测试网采编 | 查看: 35次 | 进入软件测试论坛讨论

Dim retcode as Variant

　　Dim query as String

　　Dim outputStr as String

　　'' The following will open the datasource SBLTESTW and execute the query

　　'' specified by query and return the results in destination

　　''query = "select * from class"

　　retcode = SQLRequest("DSN=SBLTESTW;UID=DBA;PWD=SQL",query,outputStr,prompt,0,destination())

　　End Sub

　　SQLRetrieve 功能函数

　　在由connection指定的连接上获取待定查询结果并将结果返回到destination()数组里。

　　SQLRetrieve( connection& , destination() , maxColumns% , maxRows% , columnNames% , rowNumbers% , fetchFirst% )

　　语法：

　　参数解释

　　connection& 长型long

　　destination() 2维变量数组

　　maxColumns% 整形，可选参数，用来指定在查询中取回的栏列数目

　　maxRows% 整形，可选参数，用来指定在查询中取回的行的数目

　　columnNames% 整形，可选参数，默认为0

　　rowNumbers% 整形，可选参数，默认为0

　　fetchFirst% 整形，可选参数，默认为0

　　注解：

　　返回值是结果集的行的数目或请求的最大行。如果函数不能在指定连接上获得结果，返回-1。如果没有发现数据，函数返回0。