51Testing软件测试论坛

标题: QTP连接oracle报错“未发现数据源名称并且未指定默认驱动程序” [打印本页]
作者: 2004021099    时间: 2013-5-22 15:30
标题: QTP连接oracle报错“未发现数据源名称并且未指定默认驱动程序”
qtp使用代码连接oracle数据库，总是报错“未发现数据源名称并且未指定默认驱动程序”，代码如下。我把代码保存成.vbs文件，手动执行了一下这个vbs文件，是可以通过的。
  1. Dim adoConn '定义ADO连接对象
  2. Dim ConnectionStr '定义数据库连接字符串
  3. '获取数据库连接字符串
  4. 'ConnectionStr = "Driver=MySQL ODBC 5.1 Driver;SERVER=localhost;UID=root;PWD=root;DATABASE=test;PORT=3306"
  5. ConnectionStr = "DRIVER={Oracle in OraClient11g_home3};SERVER=10.22.11.4;UID=test;PWD=test_4;DBQ=ANHUI;DBA=W;APA=T;EXC=F;XSM=Default;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;BTD=F;BNF=F;BAM=IfAllSuccessful;NUM=NLS;DPM=F;MTS=T;MDI=Me;CSR=F;FWC=F;FBS=60000;TLO=O;MLD=0;ODA=F;PORT=1521;"
  6. '创建数据库连接对象
  7. Set adoConn = CreateObject("adodb.Connection")
  8. '利用数据库连接字符串打开数据库
  9. adoConn.Open ConnectionStr
  10. If adoConn.state <> 0 Then
  11. MsgBox "成功"
  12. Else
  13. MsgBox "失败"
  14. End If
  15. 'wait 2
  16. '******************
  17. '此处进行数据库操作
  18. '******************
  19. '关闭数据库
  20. adoConn.Close
  21. '释放数据库对象
  22. Set adoConn = Nothing
复制代码
psracle客户端已经安装了，在控制面板下的数据源里已经能成功添加数据源了。
作者: joykao    时间: 2013-5-22 17:25
Driver;SERVER=localhost;UID=rootWD=root;DATABASE=testORT=3306"

这句话做啥？
作者: 2004021099    时间: 2013-5-22 18:00
回复 2# joykao
我
qtp新手，这段代码是从一个教程上复制的，这行是原来的数据库连接。忘记删除了，呵呵~~~
作者: wsryyffs    时间: 2013-5-22 19:58
回复 3# 2004021099


odbc：
Cnn.ConnectionString ="rovider=MSDASQL.1assword=xxersist Security Info=True;User ID=xx;Data Source=xx"
oracle的tnsnames：
Cnn.ConnectionString ="rovider=MSDAORA.1assword=xx;User ID=xx;Data Source=xxersist Security Info=True"
作者: 2004021099    时间: 2013-5-23 09:04
回复 4# wsryyffs
骚瑞，这个不行的说~
作者: joykao    时间: 2013-5-23 22:17
回复 3# 2004021099


连接字符串可以通过QTP拿到的。。。。在datatable 中试着去连接你要连的数据库，最后测试拿到正确的连接字符串比你从书上拷贝或者自己敲的要靠谱的多



欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2