！请问vb怎么连接oracle数据库

！请教vb如何连接oracle数据库

Private Sub Form_Load()
Dim ConnX As New ADODB.Connection
Dim sql As String

ConnX.ConnectionString = "Provider=MSDAORA.1;Password=***;User ID=***;Data Source=100.100.100.100;Persist Security Info=True"


On Error GoTo ConnErr
    '连接数据库
    ConnX.Open
    MsgBox "连接数据库成功！服务已启动...", vbInformation, "连接"
    'ConnX.Execute sql
    'MsgBox 2222
    End
    Exit Sub
ConnErr:
    MsgBox "连接数据库错误！", vbInformation, "连接"
    End
    End Sub

================================
请教各位大虾，如何在vb上连接oracle数据库呢？这样语句写可以吗？
------解决方案--------------------
ADO或者ODBC都可以的。
------解决方案--------------------
data source不是这么写，你要用客户端配置一下本地服务名，然后data source填本地服务名
------解决方案--------------------
都封装在 数据源里面了,ADO,ODBC都可以直接连得