dim conn as adodb.connection
dim rs as adodb.Recordset
form_load()
set conn=new adodb.connection
conn.open"Provider=MSDAORA.1;Password=密码;User ID=用户名;Data Source=数据库服务器名;Persist Security Info=True"

解决方案 »

  1.   

    dim cn as new adodb.connection
    cn.connectionstring="Provider=OraOLEDB.Oracle; Data Source=; User ID=; Password="
    cn.open
      

  2.   

    Dim Conn As adodb.connection
    CnStr="Provider=OraOLEDB.Oracle.1;Persist Security Info=True;User ID=user1;Password=pass1;Data Source=oradb"
    conn.Open Cnstr
    VB6 使用Oracle Data Control控件访问 Oracle
    http://www.oradb.net/setup/vbora_002.htmASP 中通过OLEDB访问 Oracle 的代码
    http://www.oradb.net/setup/asp_001.htm---------------------------------------------------------------十年生死两茫茫。不思量,自难忘。千里孤坟,无处话凄凉。纵使相逢应不识。尘满面,鬓如霜。夜来幽梦忽还乡。小轩窗,正梳妆。相顾无言,惟有泪千行。料得年年肠断处。明月夜,短松岗。
      

  3.   

    先点击菜单中工程——应用,然后选择
    Microsoft ActiveX Data Objects 2.5 Library
    在程序中:
    dim conn as adodb.connection
    dim rs as adodb.Recordset
    set conn=new adodb.connection
    set rs=new adodb.Recordset
    conn.open"Provider=MSDAORA.1;Password=密码;User ID=用户名;Data Source=数据库服务器名;Persist Security Info=True"
    rs.open "select * from 表名", conn, adOpenStatic, adLockReadOnly
    Set DataGrid1.DataSource = rs  ‖天天写程序‖    ‖夜夜泡小妞‖
    ‖身兼数职做代码‖‖晚晚工作到天明‖
    ‖为何人生如此苦‖‖泡妞消费数目高‖
    ‖我看世俗本无趣‖‖程序伤神妞伤人‖
      ‖不再见女人‖    ‖不想写程序‖
      

  4.   

    我用了以上方法,但运行出错,
    具体报错是“未找到提供者,可能未被正确安装”
    是什么原因啊
    另外Data Source=
    我写了个ip地址,有没有关系的?
      

  5.   

    请安装Oracle客户端或相应的驱动程序。
      

  6.   

    先在odbc建一个 oracle odbc.
    然后在程序中写
    Dim conn As ADODB.Connection
    Set conn = New ADODB.Connection
    conn = "DSN=;UID=;PWD=;SERVER="
      

  7.   

    使用ODBC,方法应该与连接SQL差不多.