在VB6.0中如何连接Oracle数据库表？如何取得表中数据？

--先连接数据库，再打开记录集，搞定。\x0d\x0aDim conn_ora As New ADODB.Connection '用于连接ORACLE数据源的连接\x0d\x0aconn_ora.ConnectionString = "Provider=MSDAORA.1Password=111User ID=system Data Source=orclPersist Security Info=True"\x0d\x0aconn_ora.Open\x0d\x0aDim myrs_ora As New ADODB.Recordset'用于连接ORACLE数据库的记录集\x0d\x0a myrs_ora.ActiveConnection = conn_ora.ConnectionString\x0d\x0a myrs_ora.Open ("Select * From AAA")

VB6.0可通过Adodc数据访问控件的属性页进行连接Oracle数据库。

1）建立数据工程，在窗体添加Adodc数据访问控件。鼠标选中Adodc控件-右键-Adodc属性-使用连接字符串-生成。

2）选Microsoft OLE DB Provider For Oracle，下一步。

3）根据数据链接属性对话框填写所需内容，测试连接。点确定，最终在Adodc属性页获得连接字符串，复制该字符串，即可作为Adodc数据访问控件直接使用，或在代码中用于Adodc控件或ADO数据访问对象。

---