51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3591|回复: 9
打印 上一主题 下一主题

[Robot] ROBOT数据库查询问题

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2005-7-21 17:43:25 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我用ROBOT连接数据库,连接一个数据库,但想分别生成二个查询,将取的结果分别导入不同的二个变量中,但实际回放后,只有第二个查询语句得到的结果被取到变量中,第一个没有,请问如何做方能对同一个数据库的不同表分别取值,并赋给相应的变量?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2005-7-22 10:06:42 | 只看该作者
是不是可以把两次查询的结果保存到不同的二维数组中?
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2005-7-22 10:23:21 | 只看该作者
我的确是这样做的,而且分别赋给不同的变量,但是回放后查看结果,只有第二个变量的值被取了
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2005-7-25 17:33:19 | 只看该作者
求助大家的帮忙啊
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2005-7-25 20:49:03 | 只看该作者
我试验了一下,应该是可以的吧,你看一下我写的例子代码,是不是这个意思:

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

运行时都可以弹出查询出来的结果
回复 支持 反对

使用道具 举报

该用户从未签到

6#
 楼主| 发表于 2005-7-29 10:38:01 | 只看该作者
好像不对吧,你的查询语句怎么只有一条?
我想做的是分别对二条不同的查询语句进行调用啊
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2005-7-29 10:51:50 | 只看该作者
你把代码简化一下贴出来,应该查一次赋值再查一次赋值是可以的。
回复 支持 反对

使用道具 举报

该用户从未签到

8#
 楼主| 发表于 2005-7-30 12:27:22 | 只看该作者
多谢楼上的,的确查一次赋值一次就行了.
回复 支持 反对

使用道具 举报

该用户从未签到

9#
发表于 2005-7-31 21:59:53 | 只看该作者
不要意思,理解差了。确实如ilovejolly所说,每次执行完查询语句后把值赋给一个二维数组即可。
回复 支持 反对

使用道具 举报

该用户从未签到

10#
 楼主| 发表于 2005-8-1 16:23:17 | 只看该作者
感谢大家的帮助!!!!!!!!
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-9 02:18 , Processed in 0.069953 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表