急请教：如何用VB连接ORACLE数据库（具体方法）？

Question

我想用VB连接ORACLE里的一个表，如何具体实现？

Answer 1

Dim oConn,strConnSet oConn=CreateObject(“ADODB.Connection”)StrConn="Driver={Microsoft ODBC for Oracle};" & _　　　　　　　　　 "Server=OracleServer.world;" & _　　　　　　　　　 "Uid=myUsername;" & _　　　　　　　　　 "Pwd=myPassword;"oConn.Open strConn

Answer 2

oConn.Open "Driver={Microsoft ODBC Driver for Oracle};" & _
　　　　　　　　　 "ConnectString=OracleServer.world;" & _
　　　　　　　　　 "Uid=myUsername;" & _
　　　　　　　　　 "Pwd=myPassword;"

Answer 3

 更细可以看这里http://www.connectionstrings.com/

Answer 4

Dim myConn AS New ADODB.Connection
myConn.open "Provider=MSDAORA;Data Source=serOracle;User ID=yourID;Password=yourPWD"

Answer 5

"Driver={Microsoft ODBC for Oracle};Server=OracleServer.world;Uid=Username;Pwd=password;" 

Answer 6

一个投机的办法
添加部件：Microsoft ado data control 6.0
在窗体上添加一个adodc控件，然后设置adodc控件的属性，选“使用连接字符串”项边上的“生成”然后选Oracle驱动，并设好其它条件(要连的库、用户、密码等)，生成的字符串拷出来,赋值给ADODB.connectionsting就可以了，然后就可以删除adodc控件了。典型的过河拆桥！这样就不用去死记connectionsting的各种参数了！
这是我老师教我的，不过分可不能给我老师哦！而且你也不能过河拆桥啊！！！

Answer 7

dim conConnection as adodb.connection
'我这个程序是连SQL Server数据库的，不过方法一样的！Public Function ConnectToServer(ByVal strDBName As String) As Boolean
On Error GoTo on_error
  Set conConnection = New ADODB.Connection
  conConnection.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=pubs;Data Source=(local)"
  conConnection.CursorLocation = adUseClient  '将游标设置在客户端
  conConnection.ConnectionTimeout = 30
  conConnection.Open
  ConnectToServer = True
  Exit Function
on_error:
  MsgBox "错误描述：" & Err.Description & vbCrLf & "；错误代码：" & Err.Number, vbCritical + vbOKOnly, "打开数据库错误"
  Err.Clear
  ConnectToServer = False
  
End Function

Answer 8

上面的"Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=pubs;Data Source=(local)"这串字符就是用adodb控件自动生成的！

Answer 9

ODBC Driver for Oracle 
　 
For the current Oracle ODBC Driver from Microsoft:oConn.Open "Driver={Microsoft ODBC for Oracle};" & _
　　　　　　　　　 "Server=OracleServer.world;" & _
　　　　　　　　　 "Uid=myUsername;" & _
　　　　　　　　　 "Pwd=myPassword;"For the older Oracle ODBC Driver from Microsoft:oConn.Open "Driver={Microsoft ODBC Driver for Oracle};" & _
　　　　　　　　　 "ConnectString=OracleServer.world;" & _
　　　　　　　　　 "Uid=myUsername;" & _
　　　　　　　　　 "Pwd=myPassword;"For more information, see: Connection String Format and Attributes