使用代码连接数据库

jinsen

我在网上找了一点资料，大概了解了一下。但是，在试验的时候总是报错。希望各位高手能帮我一下。我的问题出在连接子上，一到打开连接的时候("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)可以的话，请给我个例子。

jinsen

对本机要装Oracle的。

overfly

请问，本机也要装oracle client的是吗？不然貌似会fail对吧

pxwcypx

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 编辑 ]

jinsen

我做了例子，有兴趣的话可以看下。

caodongjian

说下怎么解决的嘛.

jinsen

谢谢，我的问题已经解决了。

xiaonan

这样的例子,我想在以往的帖子啊,blog里啊,已经有很多了,你可以找一下