51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2818|回复: 10
打印 上一主题 下一主题

[原创] 求助,qtp连接数据库的脚本,找不到数据源

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2011-10-10 00:48:41 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
Const strconn = "DRIVER={Microsoft Access Driver  (*.mdb)};DBQ=D:\QTPWorking\samples\flight\app\flight32.mdb"
Set objDB = createObject("ADODB.connection")
objDB.ConnectionString= strconn
objDB.Open
Dialog("Login").WinButton("Cancel").Click
sqlQuery = "select o.*,f.Ticket_Price from orders o,flights f where o.flight_number = f.flight_number"
Set objResults = objDB.Execute(sqlQuery)
sumTickets = 0
sumCustomers = 0
sumMoney = 0
objResults.MoveFirst
While not objResults.EOF
        sumTickets = sumTickets + objResults.Fields("Tickets_Ordered")
        sumCustomers = sumCustomers + 1
        sumMoney = sumMoney + objResults.Fields("Tickets_Ordered")*objResults.Fields("Ticket_Price")
        objResults.MoveNext
Wend
reporter.ReportEvent micPass,"Database总票数","总票数="&sumTickets
reporter.ReportEvent  micPass,"Database顾客数","顾客数="&sumCustomers
reporter.ReportEvent micPass,"Database总价钱","总价钱="&sumMoney

objResults.Close
objDB.Close
Set objResults = Nothing
Set objDB = nothing
执行到第四句时提示未发现数据源名称并且未指定默认驱动程序,请问我应该怎么解决
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

  • TA的每日心情
    擦汗
    2017-2-4 09:49
  • 签到天数: 145 天

    连续签到: 1 天

    [LV.7]测试师长

    11#
    发表于 2012-6-13 09:39:04 | 只看该作者
    是不是strconn 不正确
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    10#
    发表于 2012-6-12 12:47:48 | 只看该作者
    有没驱动呢,可配置一个数据源用数据源试试
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    9#
    发表于 2012-6-11 17:06:50 | 只看该作者
    需要在数据源中建立一个链接即可
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    8#
    发表于 2012-6-4 14:40:16 | 只看该作者
    我也遇到了这个问题了。当前电脑上因某种原因,没有成功安装上ACCESS数据库,不知这会不会对连接数据库有影响
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    7#
    发表于 2012-6-4 14:09:24 | 只看该作者
    回复 4# hututu


        请问是什么原因,我也遇到了这个问题 感觉自己ODBC设置的也没有问题啊?
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    6#
     楼主| 发表于 2011-10-11 13:08:34 | 只看该作者
    回复 3# wangyanzhao
    不过我想请教您,ODBC中配置数据库,在QTP中使用,这种情况您熟悉吗,如果熟悉想跟您学一下
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    5#
     楼主| 发表于 2011-10-11 13:08:10 | 只看该作者
    回复 3# wangyanzhao
    不过我想请教您,ODBC中配置数据库,在QTP中使用,这种情况您熟悉吗,如果熟悉想跟您学一下
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    4#
     楼主| 发表于 2011-10-11 13:04:14 | 只看该作者
    回复 3# wangyanzhao


        O(∩_∩)O谢谢,我会好好看看的,多谢
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    3#
    发表于 2011-10-10 13:27:32 | 只看该作者
    可参照下我的博客有关和数据库链接的脚本
    http://hi.baidu.com/wyztester/bl ... 5bb81aa08bb75c.html
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    2#
    发表于 2011-10-10 13:27:25 | 只看该作者
    可参照下我的博客有关和数据库链接的脚本
    http://hi.baidu.com/wyztester/bl ... 5bb81aa08bb75c.html
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

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

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

    GMT+8, 2024-11-24 08:40 , Processed in 0.083659 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

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