51Testing软件测试论坛

标题: ROBOT数据库查询问题 [打印本页]

作者: cdy90 时间: 2005-7-21 17:43
标题: ROBOT数据库查询问题
我用ROBOT连接数据库，连接一个数据库，但想分别生成二个查询，将取的结果分别导入不同的二个变量中，但实际回放后，只有第二个查询语句得到的结果被取到变量中，第一个没有，请问如何做方能对同一个数据库的不同表分别取值，并赋给相应的变量？

作者: dionysus 时间: 2005-7-22 10:06
是不是可以把两次查询的结果保存到不同的二维数组中？

作者: cdy90 时间: 2005-7-22 10:23
我的确是这样做的，而且分别赋给不同的变量，但是回放后查看结果，只有第二个变量的值被取了

作者: cdy90 时间: 2005-7-25 17:33
求助大家的帮忙啊

作者: dionysus 时间: 2005-7-25 20:49
我试验了一下，应该是可以的吧，你看一下我写的例子代码，是不是这个意思：

Sub Main
Dim Result As Integer
Dim connect as long
Dim query as string
Dim out1(1 to 2,1 to 1) as variant
Dim out2(1 to 2,1 to 1) as variant
'这里定义两个二维数组
dim retcode as variant
dim i as integer
'Initially Recorded: 2005-7-18  22:16:12
'Script Name: sqltest
connect = SQLOpen("DSN=te;UID=sa;PWD=")

query = "select bookname,popular from book where authorid = 1 "

call SQLExecquery(connect,query)

call SQLRetrieve(connect,out1())

call SQLRetrieve(connect,out2())

msgbox out1(1,1)
msgbox out1(2,1)
msgbox out2(1,1)
msgbox out2(2,1)

call sqlclose(connect)

End Sub

运行时都可以弹出查询出来的结果

作者: cdy90 时间: 2005-7-29 10:38
好像不对吧,你的查询语句怎么只有一条?
我想做的是分别对二条不同的查询语句进行调用啊

作者: ilovejolly 时间: 2005-7-29 10:51
你把代码简化一下贴出来，应该查一次赋值再查一次赋值是可以的。

作者: cdy90 时间: 2005-7-30 12:27
多谢楼上的,的确查一次赋值一次就行了.

作者: dionysus 时间: 2005-7-31 21:59
不要意思，理解差了。确实如ilovejolly所说，每次执行完查询语句后把值赋给一个二维数组即可。

作者: cdy90 时间: 2005-8-1 16:23
感谢大家的帮助!!!!!!!!

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)