51Testing软件测试论坛

标题: 使用代码连接数据库 [打印本页]

作者: jinsen    时间: 2007-11-19 09:50
标题: 使用代码连接数据库
我在网上找了一点资料,大概了解了一下。但是,在试验的时候总是报错。希望各位高手能帮我一下。我的问题出在连接子上,一到打开连接的时候("conn.open")就出错了。
(1)这个连接子应该如何写?我用的是Oracle,Server是另一台机器(已知IP,UserID,Password)。"DRIVER","SERVER","DBQ"应该如何写?
(2)("DBA=W;APA=T;EXC=F;XSM=Default;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;GDE=F;FRL=Lo;BAM=IfAllSuccessful;MTS=F;MDI=Me;CSR=F;FWC=FFC=6000;TLO=O;")是什么意思?
(3)我本机还需要什么配置?
(4)可以的话,请给我个例子。
作者: xiaonan    时间: 2007-11-20 09:27
这样的例子,我想在以往的帖子啊,blog里啊,已经有很多了,你可以找一下
作者: jinsen    时间: 2007-11-21 09:54
谢谢,我的问题已经解决了。
作者: caodongjian    时间: 2007-11-21 10:09
说下怎么解决的嘛.
作者: jinsen    时间: 2007-11-22 11:37
我做了例子,有兴趣的话可以看下。
作者: pxwcypx    时间: 2007-11-22 17:07
Set Conn = CreateObject("ADODB.Connection" )
str="DRIVER=Oracle in OraHome92;SERVER=192.168.180.115;DBQ=testdb;user id=zffzxt ; password=5166091"
Conn.open str
Set Rs = CreateObject ("ADODB.Recordset" )
sql = "select * from zffzxt_gsdjb t where kb_dm='13401053600' "
Rs.open sql,conn',1,3

Rs.Movefirst
For i=0 to (总信息条数-1)
MsgBox Rs(0)
MsgBox Rs(1)
MsgBox Rs(2)
Rs.movenext
Next

[ 本帖最后由 pxwcypx 于 2007-11-22 17:08 编辑 ]
作者: overfly    时间: 2007-11-22 17:23
请问,本机也要装oracle client的是吗?不然貌似会fail对吧
作者: jinsen    时间: 2007-11-22 17:34
对本机要装Oracle的。




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