以前有一个农夫，他有一块贫瘠的农田。他抱怨着："如果神让我来控制天气，一切的事情都会变得更好， 因为它很显然不是很懂得农作物需要的天气。" 
      神对他说："我会给你一年的时间让你控制天气， 你想要有什么天气，就可以有什么天气。"这个可怜的人非常高兴，马上试着说："我现在要晴天。"然后太阳就出来了。后来他又说："下雨吧！"然后就下雨了。 这一整年他就这样先让阳光出现，然后再下雨。
      种子越长越大，看着农作物的成长变成了一种快乐。他很得意的说："现在神可以了解如何控制天气了吧！" 这些农作物从来没有那么大、那么绿、颜色绿得那么深。
      然后丰收的时候到了。农夫带着他的镰刀去收割小麦，但是他的心沉到了谷底，因为植物的茎上面什么都没有。 神去找他："你的农作物怎样了？" 这个人开始抱怨："很惨，我的主啊，非常惨！" "但是你不是如愿以偿控制了天气吗？""你想要的东西不是都变得很好吗？" "当然！这就是我困惑的地方，我得到了我想要的雨水与阳光， 但是还是没有收成。" 然后神对他说："但是你从来没有要求风、暴雨、 冰雪以及每一件会净化空气与让根更坚硬、更有抵抗力的东西， 那就是长不出农作物的理由。"
      只有经历挑战才可能有生命。只有当你拥有好天气与坏天气、喜悦与痛苦、冬天与夏天、沮丧与快乐、不适与舒服才可能有生命。
      生命在这两极之间移动，在这两极之间，你就学到了如何保持平衡。在这两只翅膀间，你就学到了如何去生活。我想不只这一件事是必需找到平衡，还有很多事情也是一样的，在两极之间，寻找一个平衡点，其实是人生中的一种考验。

1， 操作系统

由于要使用IIS和SQL SERVER数据库,考虑到运行的稳定性,选用的操作系统为WIN2000 SERVER 或 WIN 2003 SERVER版。

2，安装IIS

安装TD工具前一定要先安装IIS服务。

3，安装MS-SQL SERVER

TD的支持的数据库有Sybase、MS-SQL SERVER、Oracle和Access，以用来存储TD项目的相关数据。在这里我们使用MS-SQL SERVER做为TD的连接数据库。至于SQL SERVER的安装就很简单了，在这里就不多说了。

4，安装TD

1）在安装好IIS与MS-SQL SERVER后，进行TD的安装。进入到图下步骤时，输入：

Maintenance no.：KSQMQSQ-HQSQDQS-Q3QSQ3S-Q2SSQI8

License no.：B343P-44B44-43444-6444S 

 

2）【Next】后，进入到图下步骤，默认是选择了Access 做为TD的数据库，我们同时选择MS-SQL SERVER。

 

3）【Next】后，进入到图下步骤，此时注意，MS SQL Alias最好更改为当前的SQL Server名，我当前的为“LJZ”。否则在安装完成后，必须再对客户端网络实名进行设置。

 

  4）【Next】后，

进入到图下步骤，此时输入当前系统帐户的用户名和密码。

 

5）【Next】后，进入到图下步骤，这里设置的是TD项目文件的储存库路径，保存着如每个项目用户的界面布局样式以及项目上传的附件等等。

6）【Next】后，会弹出提示框，提示你是否共享该文件夹，我们选择【Yes】。

7）【Yes】后，又弹出提示框，提示你设置该文件夹的共享名，默认为TD_Dir.

8）【OK】后，进入到图下步骤，这里是对TD的邮件服务进行设置，我们不使用邮件服务，所以不进行任何选择或设置。

 

9）【Next】后，进入到图下步骤，这里是设置TD的IIS虚拟目录，Host Name默认为当前的计算机名，而Virtual Directory Name 默认为TDBIN， Physiical Location则为该虚拟目录所在的物理路径，默认在IIS的文件目录InetPub下。TDBIN中将存放的是TD系统的核心服务文件，我们可以进行自定义的设置，但这里我们使用默认的值。

 

10）【Next】后，弹出提示框，提示你该目录不存在，是否创建。

11）【Yes】后，进入到图下步骤，此处不进行选择，因为安装包没有包含该插件。

12）【Next】后，进入到图下步骤，这里默认是选择的，是安装TD的演示项目与TD的演示系统Mercury Tours，该系统部是署于Tomcat V3.3上。我们不进行选择。

13）一直【Next】后，进入到图下步骤，TD开始进行安装，安装比较耗资源，不要做太多操作，耐心等待。

14）安装完成后会有在线注册的按钮，不进行点击，直接NEXT

15）【Next】后，会弹出提示框，提示你重起计算机以完成TD的安装，推荐立即重起。

 

5，TD的配置

TD的安装完成后，下面还要进行TD的一些基本配置，让TD更符合我们的需求，更好的工作，包括界面汉化以及字段的汉化和自定义等。

1）  汉化

在安装目录TDBIN/Install/下存放的是一些为连接服务的客户端加载的系统文件。其中的tdclientui80.xco文件，该文件会自动加载到客户端的C:\Program Files\Common Files\Mercury Interactive\TD2000_80目录下，并生成为tdclientui80.ocx文件。注意其中两个文件的后缀名区别。文件后缀可通过更改方式变换为OCX或XCO。

由于Mercury并为发行官方的汉化包，所以采用第三方的资源包进行汉化。汉化方式，把得到的汉化资源dclientui80.xco文件粘贴到服务器 InetPub/TDBIN/Install/ 目录下，覆盖掉原文件即可。在之前访问过服务器的客户端，在下次连接时由于不再加载更新后的数据，所以必须得删除客户端下的 C:\Program Files\Common Files\Mercury Interactive\TD2000_80 目录下覆盖tdclientui80.ocx文件，使再次访问时自动加载汉化后的新组件。也可以通过在客户端 C:\Program Files\Common Files\Mercury Interactive\TD2000_80 目录下覆盖tdclientui80.ocx文件达到汉化的目的。

从测试过程的角度来说我们也可以把数据库测试分为
系统测试
传统软件系统测试的测试重点是需求覆盖，而对于我们的数据库测试同样也需要
对需求覆盖进行保证。那么数据库在初期设计中也需要对这个进行分析,测试.例
如存储过程，视图，触发器，约束，规则等我们都需要进行需求的验证确保这些
功能设计是符合需求的.另一方面我们需要确认数据库设计文档和最终的数据库相
同，当设计文档变化时我们同样要验证改修改是否落实到数据库上。
这个阶段我们的测试主要通过数据库设计评审来实现。
集成测试
集成测试是主要针对接口进行的测试工作，从数据库的角度来说和普通测试稍微
有些区别对于数据库测试来说，需要考虑的是
数据项的修改操作
数据项的增加操作
数据项的删除操作
数据表增加满
数据表删除空
删除空表中的记录
数据表的并发操作
针对存储过程的接口测试
结合业务逻辑做关联表的接口测试
同样我们需要对这些接口考虑采用等价类、边界值、错误猜测等方法进行测试
单元测试
单元测试侧重于逻辑覆盖，相对对于复杂的代码来说，数据库开发的单元测试相
对简单些，可以通过语句覆盖和走读的方式完成
系统测试相对来说比较困难，这要求有很高的数据库设计能力和丰富的数据库测
试经验。而集成测试和单元测试就相对简单了。
而我们也可以从测试关注点的角度对数据库进行分类
功能测试
对数据库功能的测试我们可以依赖与工具进行
DBunit
一款开源的数据库功能测试框架，可以使用类似与Junit的方式对数据库的基本操
作进行白盒的单元测试，对输入输出进行校验
QTP
大名鼎鼎的自动测试工具，通过对对象的捕捉识别，我们可以通过QTP来模拟用户
的操作流程，通过其中的校验方法或者结合数据库后台的监控对整个数据库中的
数据进行测试。个人觉得比较偏向灰盒。
DataFactory
一款优秀的数据库数据自动生成工具，通过它你可以轻松的生成任意结构数据库
，对数据库进行填充，帮助你生成所需要的大量数据从而验证我们数据库中的功
能是否正确。这是属于黑盒测试
数据库性能
虽然我们的硬件最近几年进步很快，但是我们需要处理的数据以更快的速度在增
加。几亿条记录的表格在现在是司空见惯的，如此庞大的数据量在大量并发连接
操作时，我们不能像以前一样随意的使用查询，连接查询，嵌套查询，视图，这
些操作如果不当会给系统带来非常巨大的压力，严重影响系统性能
性能优化分4部分
1物理存储方面
2逻辑设计方面
3数据库的参数调整
4SQL语句优化.
我们如何对性能方面进行测试呢，业界也提供了很多工具
通过数据库系统的SQL语句分析工具，我们可以分析得到数据库语句执行的瓶颈，
从而优化SQL语句
Loadrunner
这个不用多说，我们可以通过对协议的编程来对数据库做压力测试
Swingbench（这是一个重量级别的feature，类似LR，而且非常强大，只不过专门
针对oracle而已）
数据库厂商也意识到这点，例如
oracle11g已经提供了real application test，提供数据库性能测试，分析系统
的应用瓶颈。
还有很多第三方公司开发了SQL语句优化工具来帮助你自动的进行语句优化工作从
而提高执行效率。
安全测试
软件日益复杂，而数据又成为了系统中重中之重的核心，从以往对系统的破坏现
在更倾向于对数据的获取和破坏。而数据库的安全被提到了最前端
自从SQL 注入攻击被发现，冒失万无一失的数据库一下从后台变为了前台，而一
旦数据库被攻破，整个系统也会暴露在黑客的手下，通过数据库强大的存储过程
，黑客可以轻松的获得整个系统的权限。而SQL的注入看似简单缺很难防范，对于
安全测试来说，如何防范系统被注入是测试的难点。
业界也有相关的数据库注入检测工具，来帮助用户对自身系统进行安全检测。
对于这点来说业界也有标准，例如ISO IEC 21827，也叫做SSE CMM 3.0，是CMM和
ISO的集成的产物，专门针对系统安全领域的
另外一方面，数据库的健壮性，容错性和恢复能力也是我们测试的要点
我们也可以发现功能测试，性能测试，安全测试，是一个由简到繁的过程，也是
数据库测试人员需要逐步掌握的技能，这也是以后公司对数据库测试人员的要求
。

QTP除了可以获取到被测对象的主属性、辅助属性值外，还可以获取到被测对象的Ordinal Identifier值。当QTP发现有多个对象具有相同的主属性值、辅助属性值而无法对它们进行唯一识别时， Ordinal Identifier会获取每个对象的序列值，以将它们区别开来。 由于序列值是一个相对值，任何页面的变更都有可能导致这些值发生改变，因此，只在主属性与辅助属性无法唯一识别对象的情况下，QTP才会获取该序列值。 在运行测试脚本时，如果使用对象的属性值以及Smart Identification机制都无法唯一识别应用程序中的对象，才会使用到序列值。如果QTP可以通过其它属性值对对象进行识别，则会忽略序列值。 QTP可以使用以下类型的ordinal identifiers来识别对象： Index      表示对象在程序代码中的出现顺序，这个顺序是相对于其它具有相同属性的对象而言的。 Location 表示对象在窗口、Frame或对话框中出现的顺序，这个顺序是相对于其它具有相同属性的对象而言的。 CreationTime（仅适用于Browser对象） 表示Browser对象打开的顺序，这相顺序是相对于其它已打开的具有相同属性的对象而言的。 一般情况下，Ordinal Idenfifier类型适用于所有类。在Object Identification窗口，通过Ordial identifier下拉框，可以选择其它类型。 注：QTP在录制脚本时，如果通过主属性与辅助属性已能够唯一识别对象，则不会获取对象的ordinal identifier顺序值。你可以在脚本录制完成后，在Object Properties或Object Repository对话框中使用Add/Remove操作，手动添加顺序值。     1. 使用Index属性识别对象 QTP在录制过程中，可以获取到对象的Index属性值来唯一识别对象。QTP根据对象在程序代码中的出现顺序来决定该属性值。第1个出现的对象的值是0。 Index属性值object-specific的。因此，假如一个WebEdit测试对象的Index属性值为3时，QTP会查找程序页面中的第4个WebEdit对象；但是，如果一个WebElement对象的Index属性值为3，则QTP查看程序页面中的第4个Web对象，而不管对象是属于Web对象的哪种类型，因为WebElement对象可以是任何Web对象。 例如，假设一个页面包括以下对象： 一个Image对象，名为Apple； 一个Image对象，名为UserName； 一个Webedit对象，名为UserName； 一个Image对象，名为Password； 一个Webedit对象，名为Password。 下面的语句指的应该是上表第3行所描述的对象，因为它是第1个名为UserName的WebEdit对象。 WebEdit("Name:=UserName", "Index:=0") 下面的语句指的应该是上表第2行所描述的对象，因为它是第1个名为UserName的Web对象。 WebElement("Name:=UserName", "Index:=0") 2. 使用Location属性识别对象 QTP在录制脚本时，可以获取被测对象的Location属性值来唯一识别对象。这个属性值就是多个相同对象在窗口、框架、对话框中的出现顺序。第1个出现的对象，属性值为0。顺序值的分配是先列后行，先左后右。 在下面的例子中，对话框中的单选按钮按它们的位置排序。 Location属性值是object-specific的。因此，当一个WinButton对象的Location属性值为3时，QTP从顶端向底端搜索，然后从左向右搜索，直到找到页面中的第4个WinButton对象。但是，如果被搜对象是WinObject，则QTP从顶端向底端搜索，然后从左向右搜索，直到找到第4个Standard对象，因为WinObject对象可以是任何Standard对象。 例如，假设一个对话框中包括以下对象： 一个Button对象，名为OK； 一个Button对象，名为Add/Remove； 一个Check Box对象，名为Add/Remove； 一个Button对象，名为Help； 一个Check box对象，名为Check spelling。 下面的指句指应该是第3行中所描述的对象，因为它是第1个名为Add/Remove的Check Box对象。 WinCheckBox("Name:=Add/Remove", "Location:=0") 下面的指句指应该是第2行中所描述的对象，因为它是第1个名为Add/Remove的WinObject对象。 WinObject("Name:=Add/Remove", "Location:=0")     本文转自：http://hi.baidu.com/devonline/blog/item/4b1a69da9b44c2ddb7fd4810.html

 

使用：

File----->settings----->Resources----->add a new file to the file list

 

请教创建的函数库文件的调用语句

在QTP中通过File－－New－－Fuction Library创建了一个后缀名为qfl的文件，请问如何在测试文件里调用它？
如调用vbs脚本文件可以这样写：ExecuteFile "MyFunctions.vbs"
有没有相应的语句来调用一个后缀名为qfl的文件？*.qfl 为自己创建的函数库文件。

创建函数库方法：

1.Choose File > New > function liberay.
2.Create a new function library
3.enter the following lines exactly:
public Function myfunc()
msgbox "one"
msgbox "two"
msgbox "three"
End Function

然后保存，然后加入resource中，然后在expert view中直接用myfunc()
就可以了．

本人今天又仔细阅读了英文帮助，有另外一种方法，就是将自己定义的函数定义为测试对象方法，在keyword view的Item选项中选定相应的对象，在Operation中就会出现你定义的方法名称，进而选定该方法即可。无须用语句调用。

检查点类型：!y xU#K/VRo202848

\,Q@'N6O'W;e/^2028481.标准检查点（Standard Checkpoint）检查对象的属性，如可以检查某个按钮的是否被选取；51Testing软件测试网#y4{+SF@*@,DMw
2.页面检查点（Page Checkpoint） 检查网页的特性，如可以检查加载页面所需的时间，或者检查网页是否包含损坏的链接；
9xsI8af Na2028483.图片检查点（Image Checkpoint）检查应用程序或网页中的图像的值，如可以检查所选图像的源文文件是否正确；
%S"n%r
G.u\!Q
A c2028484.位图检查点（Bitmap Checkpoint）检查位图格式的网页或应用程序区域；如。被测应用程序中有一个按钮，显示<查看文档>其中<号码>会被输入到应用程序中其它位置窗体的四位数字代码替换。可以创建一个文本区域检查点，以确认在该按钮上显示与窗体中的号码相同；
'ctF9KQ
cz?0[!V2028485.文本检查点（Text Checkpoint）检查网页或窗口中的文字内容是否正确；51Testing软件测试网0~eP*{9T!Rw
6.文本区域检查点（Text Area Checkpoint）检查网页或窗口中的文字是否在指定的区域显示；51Testing软件测试网O ^ R.DHN
7.表检查点（Table Checkpoint）检查表内部信息，假设被测试应用程序包含一个表，改表列出了从纽约到旧金山所有可用航班。可以添加一个表检查点，以检查该表中的第一个航班的时间是否正确；
)C S*Ao,G&tHje2028488.数据库检查点（Database Checkpoint）检查由应用程序访问的数据库到内容，如使用数据库检查点来检查网站上包含航班信息的数据库内容；51Testing软件测试网*s/n t6Q Q p)s0o-\

vU|@5q2028489.Output Value 输出值检查，如输出网页中某一图片的属性（长宽高等）；51Testing软件测试网a G l6JY4Q
10.可访问性检查点（Accessibility Checkpoint）对网站区域属性进行识别，以检查是否符合可访问性规则的要求；51Testing软件测试网#V~/cD(L pV
11.XML检查点（XML Checkpoint） 检查xml文件数据内容；51Testing软件测试网}B`7[2|2x_0rVg~

51Testing软件测试网 M7uO,uEH

-----------------------------------------------------------51Testing软件测试网CdQ;@K

51Testing软件测试网Y4Z7H(l&D@

51Testing软件测试网oBI_-]3Z

1) 理解检查点51Testing软件测试网#`/|9qVV

QuickTest enables you to add checks to yourtestor component.51Testing软件测试网8V^Z$Ve

检查点比较指定属性的当前值与期望值，以判断当前的程序（或站点）功能是否正常。

%Fj M{;v ~1r3R!W:U2[202848

当你增加了一个检查点以后，在KeyWord模式下会增加一个CheckPoint，在Expert模式下会增加一条CheckPoint语句。在运行测试时，QTP比较CheckPoint的期望值与当前值，如果结果不匹配，则检查点失败，你可以在TestResults窗口中查看到检查点的结果。51Testing软件测试网'[S&~TR%w2ow+W5@
?

如果你想获取 checkpoint的返回值（一个布尔值，表示检查成功或失败），你必须在专家模式下将checkpoint 参数两端加上括号。如51Testing软件测试网"m_TgN;`;I

a = browser("MyBrowser").page("MyPage").check (checkPoint("MyProperty"))

-kk4yW
g C{+?G202848

 51Testing软件测试网9F8i_*x1[Y?.]T ]

2) 向测试脚本中添加检查点

o/oq3zohZf4g1y Ay202848

可以在录制脚本的过程中添加，也可以在修改脚本的过程中添加。51Testing软件测试网f5L_\ _!O'fW

途径：菜单 Insert－checkpoint、或按钮；在Keywork视图中选择一个STEP，然后选右键菜单Insert Standard Checkpoint；在Active Screan中选择任意一个object，然后选右键菜单Insert Standard Checkpoint。51Testing软件测试网a} @ ` w

 51Testing软件测试网-i.B~9E;FE4B[ W

3) checkpoint的种类：

P k)^ J/j202848

可以在站点或应用程序中插入不同种类的checkpoint。51Testing软件测试网4tz(VS ^.pz

l         Standard Checkpoint （标准检查点）

h U2W U;`f202848

检查程序或网页object的属性值，检查对象如buttons, radio buttons, combo boxes, lists, 等等。51Testing软件测试网
u}!i O$L;N b

标准检查点支持所有的add-in 环境 (see Supported Checkpoints).51Testing软件测试网,B;v2?)KPF,SC{a

l         Image Checkpoint （图像检查点）51Testing软件测试网:VL&@On

检查程序或网页中图像的值，如你可以检查图像 的源文件是否正确。51Testing软件测试网X H-]&o2a(o+K:F6M

注：你也可以给图片object插入一个标准检查点，这个标准检查点也是图像检查点。

8LM8UYdVm1p _Ab202848

l         Bitmap Checkpoint（图片检查点）

]b_qQ;j202848

将程序或网页的某个区域作为一个图片，建立检查点。如，某个站点可以展示一个城市的地图，这个地图有控制地图缩放的按钮，你点击1次“zoom in”按钮后，录制下放大了的地图快照。通过建立bitmap 检查点，可以检查“zoom in”功能是否正确。51Testing软件测试网H y8K(eD

l         Table Checkpoint（表检查点）

$K(i/I-c&\G202848

检查一个表中的信息。例如，假设被测的程序或网站包括一个table，本table中包含了所有的从New York到San Fransisco的有效航班。你可以通过Table检查点来检查第1个航班的时间是否正确。51Testing软件测试网 PeSmp L+t$p

注意：你也可以通过为表Object插入标准检查点的方法创建表检查点。

OxB#k.v202848

l         Text Checkpoint（文本检查点）

R.SSn Y(B202848

检查位于程序或网站某个位置的字符串。例如，假设程序或网站显示“Flight departing from New York to San Francisco”的语句，你可以创建一个文本检查点检查"New York" 是否显示于"Flight departing from" 与 "to San Francisco"之间。

4TdM/}I5hH"~0N202848

所有的add-in环境都支持文本检查点。51Testing软件测试网d"MT9U;Y?(]x

l         Text Area Checkpoint51Testing软件测试网iL$L5^5O"j hq:`

l         Accessibility Checkpoint51Testing软件测试网3` S|.B"T%N8y

l         Page Checkpoint

)T8q2u0x/m_,d3P202848

l         Database Checkpoint51Testing软件测试网N{]ACaX[

检查database的内容。例如，可以使用数据库检查点来检查包含航班信息的数据库的内容。

e5e
h5i&[%V:Gc202848

所有环境都支持数据库检查点。

4B.NX _ co/K`202848

l         XML Checkpoint51Testing软件测试网 \I(L0L"^ bG*q

l         下表是QTP中在不同环境下对各类检查点的支持情况。51Testing软件测试网0q"NJ:U;i.z7qK3?G,A

)e:q A#`'T#}5?d202848

51Testing软件测试网LO*A:P GD6^ p	Web51Testing软件测试网n WF5w,V2g	Std Rx zB [ G]7I202848	VB51Testing软件测试网 u@ZKj e kr	ActiveX )W6y'Ar d N | a202848	Other Object51Testing软件测试网 y5D-Z2~/[W?/v
Standard51Testing软件测试网1r)w,c X.e6O^?'@	S wRW8Ti'^4u |202848	S51Testing软件测试网ih8h U6s+D	S51Testing软件测试网Yw ad0Y p9i+M;H	S51Testing软件测试网(f+zO0}-P A$qo/vW w	NA ;\Rw.P%t-M Lrn202848
Image51Testing软件测试网4H ^"C,[_@N E	S51Testing软件测试网(}.n3C W Zx	NS pOJwx;n6HC uJ202848	NS51Testing软件测试网3q1y5Yb1P6|,`,S-}	NS51Testing软件测试网N6r/E%|s)N7U(P/L	NA51Testing软件测试网|AlX*c'K)kL+P;Y
Table Zr.aq u$bR202848	S51Testing软件测试网ky ~h0\I	NS51Testing软件测试网f,t ^e8`	NS51Testing软件测试网 Y Bd_iy^I&O	S51Testing软件测试网&@CC-UxY	NA Lq|7qY202848

p7a{ v%yHBe20284851Testing软件测试网x!~ gc8^A8q'n#F

 

C(yw2^x-E;k202848

{?6v:|'@202848---------------------------------------------

.V
Lal8{R202848

因为第一次弄，又不熟悉VBS，弄了半天，多谢网上的各位前辈提供的资料

实现效果：连接Oracle数据库，在里面查出数据，并逐行显示

最后的脚步，如下：

Dim Conn
Set Conn = CreateObject("ADODB.Connection")

'----------------------------------------------------------
'方法一： '利用*.udl文件，建立连接后，复制地址
'Conn.ConnectionString = "Provider=OraOLEDB.Oracle.1;Password=jonathan;Persist Security Info=True;User ID=system;Data Source=jonathan;Server=192.168.1.25"
'      conn.open= "Provider=OraOLEDB.Oracle.1; Password=密码; Persist Security Info=True;User ID=用户名;Data Source=数据源服务名;Server=数据库服务器地址"         '利用*.udl文件
'-------------------------------------------------------------

'方法二： 添加数据库检查点，复制那个ConnectionString 
 Conn.ConnectionString =  "DSN=192.168.1.25;UID=SYSTEM;PWD=JONATHAN;DBQ=JONATHAN;DBA=W;APA=T;EXC=F;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;GDE=F;FRL=F;BAM=IfAllSuccessful;MTS=F;MDI=F;CSR=F;FWC=F;PFC=10;TLO=0;"
Conn.Open

'查看是否连接成功，成功状态值为1
'msgbox Conn.state
If Conn.State = 0 Then
     msgbox  "连接数据库失败"
else
    msgbox   "连接数据库成功"
End If

''创建数据库记录集对象(也就是查询结果)
Set res = createobject("ADODB.Recordset") 

''打开以指定查询语句查询所得的记录集 
res.Open"select * from qtp",conn,2,2  

'从查询结果的指定字段取出值,循环输出

while(not Res.eof)

userid = res("userid")
username = res("name")
password = res("password")

msgbox userid
msgbox username
msgbox password
Res.MoveNext
wend

'msgbox res("userid")
'msgbox res("name")
'msgbox res("password")

res.close        '关闭记录集
Set res=nothing        '释放对象
conn.close        '关闭连接
Set conn=nothing        '释放对象

 

=============================================================

一、利用*.udl文件获得连接字符串的方法：

二、利用插入数据库检查点的方法，获得连接字符串，就不说了

    Insert--->CheckPoint---->Database Checkpoint---->

其他：

有位仁兄说:odbc的文件数据源方式估计快淘汰了

看来要弄个更加通用的连接方法，继续摸索……