双11狂欢大促

盲盒赢 定制羽绒服

开启惊喜盲盒，抽取你的专属好礼

— 惊喜奖品抢先看 —

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

求连接访问ORCAL数据库的代码

2004-11-18 02:57:46 518 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

lcllcl987 墨衍会员 · AI 创作全网分发关注 + 加入社区

Java JDBC连接Oracle详解一）JDBC简介 JDBC是一种数据库连接，全称Java Database Connectivity，简称JDBC。作用：主要是用来规范客户端如何访问数据库的应用程序接口，提供了增删改查等API接口。 API概述： DriverManager：负责加载各种不同的驱动，并返回对应的数据库连接。 Connection：数据库连接，负责和数据库通讯。 PreparedStatemen... 阅读详情

求用来连接访问ORCAL数据库的代码.
不需要在控制面版中手动设置ODBC的

...全文

组态软件与oracle数据库的连接简介组态软件自身拥有强大的实时数据库，可以与关系数据库灵活地相衔接。Oracle数据库是第一个开放式商品化的关系型数据库，主要满足银行、金融、保险等企事业单位。下面就笔者的经验，对紫金桥组态软件与oracle数据库的连接做简要论述。阅读详情

lcllcl987

数据库(包含打印，安装，报表) 1,218 成员 55,949 内容

+ 关注 + 加入社区

切换为时间正序

阿泰 2004-11-19

打赏
举报

Provider=OraOLEDB.Oracle;是Oracle自己带的引擎
MSDAORA是微软引擎，使用起来与数据库版本和操作环境都些关系：）

lcllcl987 2004-11-19

打赏
举报

Conn = "Provider=OraOLEDB.Oracle;Persist Security Info=False;Data Source=dl;User ID=developer;Password=pwsc"
我换成Provider=OraOLEDB.Oracle就好了
不知道是什么原应啊

lcllcl987 2004-11-19

打赏
举报

Provider=MSDAORA;
是不是这个有问题？
这是驱动程序吧？
怎么检查我的机器有没有这个驱动？
我急啊

aohan 2004-11-19

打赏
举报

顶

lcllcl987 2004-11-19

打赏
举报

感谢啊
万分感谢

flyingZFX 2004-11-19

打赏
举报

呵呵，，
还有，，Java我不懂，向你学习，有时间教教我。

flying_zfx@hotmail.com

flyingZFX 2004-11-19

打赏
举报

除非你只想返回一条记录的结果

才可以使用

set rs=conn.Execute(sql) 的方式。

flyingZFX 2004-11-19

打赏
举报

Dim rs As Adodb.Recordset

应该这样定义

还有就是，我劝你最好不要用Set rs = objConn.Execute(qsql) 这种格式

我绝对不推荐使用，因为这样，返回的结果集，Oracle缓冲区会进行优化的，

根据不同的服务器配置，，这个优化的数量会不同，

也就是说，你的qsql = "select * from jh_yjh" 这个查询本来应该返回100条记录

可是用这种方法的话，就有可能只返回10条，20条，30 条，等等不一定的记录集。

所有，我建议你使用 rs.open sql ,conn,adOpenForwardOnly, adLockReadOnly, adCmdText
的方式来返回结果集。

lcllcl987 2004-11-19

打赏
举报

顶

lcllcl987 2004-11-19

打赏
举报

Dim objConn As New Adodb.Connection
Dim connString As String
Dim rs As Recordset

connString = "Provider=OraOLEDB.Oracle;Persist Security Info=False;Data Source=dl;User ID=developer;Password=pwsc"
objConn.Open connString
qsql = "select * from jh_yjh"
Set rs = objConn.Execute(qsql)

执行到最后一句rs = objConn.Execute(qsql)，报错，说类型不匹配
我是做JAVA的，现在突然做一个VB小项目，许多东西不懂，望大哥指教

flyingZFX 2004-11-19

打赏
举报

Public Function Conn_Oracle() As Boolean
On Error GoTo ERR1
Dim strConn As String
Dim i As Long

If Not Conn Is Nothing Then Set Conn = Nothing

Set Conn = New ADODB.Connection

strConn = ""
strConn = strConn & "Provider=OraOLEDB.Oracle;"
strConn = strConn & "Data Source=" & ServerName & ";"
strConn = strConn & "User ID=" & UserName & ";"
strConn = strConn & "PassWord=" & PassWord & ";"

'Conn.ConnectionString = "Provider=OraOLEDB.Oracle;data source=gyx_kjc-gyx;user id=flyingzfx;password=xiangxiang;"
'Conn.ConnectionString = "Provider=OraOLEDB.Oracle;Data Source=FLYING;OSAuthent=1;"
strConnectionString = strConn

Conn.ConnectionString = strConn
Conn.CommandTimeout = 60
Conn.CursorLocation = adUseClient
Conn.Open

' For i = 0 To Conn.Properties.Count - 1
' Debug.Print Conn.Properties(i).Name, Conn.Properties(i).Type, Conn.Properties(i).Value, Conn.Properties(i).Attributes
' Next i

'Conn.Execute "begin system.createtablespace('ZZZ'); end;", , adCmdText

'Conn.Execute "CREATE TABLESPACE ""FLYINGZFX"" DATAFILE 'D:\flyingzfx.dbf' SIZE 5m autoextend on", , adCmdText

'Conn.Execute "alter database 'D:\flyingzfx.dbf' offline drop", , adCmdText

Debug.Print "Connection Success!!!" & " (Conn_Oracle)"
Conn_Oracle = True
Exit Function

ERR1:
Conn_Oracle = False

Debug.Print Err.Description
Err.Clear

If Not Conn Is Nothing Then
If Conn.State <> 0 Then Conn.Close
Set Conn = Nothing
End If

End Function

flyingZFX 2004-11-19

打赏
举报

首先，你必须要安装Oracle的客户端程序，，这样，才会有Oracle的OLE驱动程序。

阿泰 2004-11-18

打赏
举报

我用同样的代码测试成功，启动一下你的Oracle客户端看看是否Oracle的问题？

lcllcl987 2004-11-18

打赏
举报

Private Sub Form_Load()
Dim objConn As New Adodb.Connection
Dim connString As String
connString = "Provider=MSDAORA;Persist Security Info=False;Data Source=dl;User ID=developer;Password=pwsc"
objConn.Open connString
End Sub
运行到objConn.Open connString就报错:"发生一个ORACLE错误,但无法从ORACLE中恢复错误信息"
请教了

阿泰 2004-11-18

打赏
举报

是 dl
就是这段最开始的那个

lcllcl987 2004-11-18

打赏
举报

babyt(阿泰) :::

dl =
(DESCRIPTION =
(ADDRESS_LIST =
(ADDRESS = (PROTOCOL = TCP)(HOST = 192.168.1.99)(PORT = 1521))
)
(CONNECT_DATA =
(SID = pwsc)
)
)
这是客户端的ORACLE配置
不知道可不可以看出Data Source是什么?

bboos 2004-11-18

打赏
举报

Persist Security Info=False;意思是不需要密码验证

lcllcl987 2004-11-18

打赏
举报

Data Source： Oracle的数据库实例
我就是这个不知道怎么设置啊
我怎么知道Oracle的数据库实例名?
不好意思啊

阿泰 2004-11-18

打赏
举报

:)

Provider ：数据引擎
Persist Security Info ：字面意思是保持安全信息
如果使用了True的话，数据库连接的安全信息（如帐号和密码会作为连接的一部分在返回）会保持在连接中，据说会有安全性问题
我所做过的程序中这里的值一律是False，别的值我没有试验过，它可以接受的值是
true、false、yes 、 no。

这个参数我了解得就这么点，真的是不求甚解了
后面的几个一看就明白了

Data Source： Oracle的数据库实例
User ID : 帐号
Password: 密码

lcllcl987 2004-11-18

打赏
举报

babyt(阿泰) ( ) :
我以前研究水晶报表的时候看过你的贴子,很好!
现在可否讲解一下连接字符串各个参数的意思啊,万分感谢
connString = "Provider=MSDAORA;Persist Security Info=False;Data Source=DBserver;User ID=test;Password=test"

加载更多回复（6）

✦双11狂欢大促✦

求连接访问ORCAL数据库的代码

相关推荐

双11狂欢大促