vb 6.0 如何与Oracle 11g 建立连接和读取数据？(小弟新手)

我现在想用vb 6.0与Oracle 11g 连接，并读取数据库中的数据，请大神给解决下，最好给个例子。谢谢。 --------------------编程问答--------------------

'需要安装oracle客户端驱动

With conn

    If .State = adStateOpen Then .Close

    .CursorLocation = adUseClient

    .ConnectionString = " Provider=OraOLEDB.Oracle;Password=登录密码;User ID=登录名;Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP) (HOST =服务器名)(PORT=1521))) (CONNECT_DATA=(SERVICE_NAME=数据名)));Persist Security Info=True "

    .CommandTimeout = 0

    .Open

End With

--------------------编程问答-------------------- 必须有Oracle 11g 的OLEDB驱动程序
你可以先创建一个数据库工程
窗口中添加一个adodc控件
双击adodc控件的connectionstring属性，
选择连接字符串
在列表里找到MS OLEDB for Oracle 
在高级里设置必要的属性
回到提供程序页，点测试连接，如果成功，确定返回
在adodc的datasouce里选择一个数据表
添加一个dategrid控件，其datasouce属性设置为adodc1
运行 --------------------编程问答-------------------- 每天回帖即可获得10分可用分

补充：VB ,  数据库(包含打印，安装，报表)