51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2858|回复: 6
打印 上一主题 下一主题

[求助] 怎样将SQL server2000查询结果读取或者用数组的方式存储

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2009-9-29 17:14:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
Dim Cnn '//定义变量

                         Dim Rst '//定义变量

                         Dim strCnn '//定义变量
                        strCnn="rovider=SQLOLEDB.1ersist Security Info=False;User ID=saWD=1111;;Data Source=10.206.20.8" '//将获得的连接字符串赋值到


                         Set Cnn=CreateObject("ADODB.Connection")' //生成数据库连接对象
                         Set Rst=CreateObject("ADODB.Recordset")' //生成记录集对象

                         Cnn.Open strCnn '//打开数据库
                 

                        'Rst.Open "use gzcsmmis update S_USER Set realname='456'where UNAME='王强'",Cnn' //书写SQL语句
                        Rst.Open "use gzcsmmis select realname from S_USER where UNAME='王强'"

                        msgbox realname

                         'Rst.MoveFirst' //将焦点定在第一行

描述:小弟想通过select语句,将realname字段中的值取出来使用,但是发现无从下手,如果执行update语句,数据库里面字段是变了的,说明数据库链接这些是对了的,就是不知道如何操作select语句,将查询结果取出,请各位高手赐教。

[ 本帖最后由 ChanJian910 于 2009-9-29 17:18 编辑 ]
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
 楼主| 发表于 2009-9-29 17:16:48 | 只看该作者
执行select语句的报错信息如图,并求高人给出后续诸如关闭链接的代码

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

x
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2009-9-29 17:27:03 | 只看该作者
请参考QuickTest Professional Code Samples Plus 帮助文档,里面有针对数据库的方法
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2009-9-30 10:02:32 | 只看该作者
哪个高手看下嘛,就是看不懂help里面的东东
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2009-9-30 10:17:11 | 只看该作者
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2009-9-30 10:34:14 | 只看该作者
通过ADO执行sql时是无法使用use关键字的,需要在connection string中指定Initial Catalog
回复 支持 反对

使用道具 举报

该用户从未签到

7#
 楼主| 发表于 2009-9-30 10:59:40 | 只看该作者
原帖由 blueeagle9999 于 2009-9-30 10:17 发表
http://www.cnblogs.com/xuben/archive/2009/09/01/1558258.html

随便找个给你参考下



执行“rs.open sql,con”的时候提示test1对象无效,怎么回事儿呢?
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-27 04:13 , Processed in 0.074906 second(s), 28 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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