Dim Cn As ADODB.ConnectionPrivate Sub Form_Load()
'使用合适的值代替以下用户ID,口令(PWD)和服务器名称(SERVER)
Conn = "UID=*****;PWD=*****;driver=" & "{Microsoft ODBC for Oracle};SERVER=MyOracle;"
Set Cn = New ADODB.Connection '创建Connection对象
With Cn
    .ConnectionString = Conn
    .CursorLocation = adUseClient
    .Open
End With
....
....

解决方案 »

  1.   

    你在98下设置ODBC了吗?
    将错误提示说出来!
      

  2.   

    http://www.jinesc.com/myweb/disp.asp?idd=91&room=40
      

  3.   

    ODBC 已经设置了数据源telecom.
    错误.381
    trace 进去发现open还是正常的,但执行sql返回结果始终为空
     tanaya(蜡笔小新) ,多谢了,。。但是还是不行。。一样的错误
     _1_(www.jinesc.com) ,昨天我已经找到那个帖子了,所有的oracle连接字串都是一样的错误
    愁阿
    不知道客户为啥把那喜欢98....
      

  4.   

    刚才又更新乐 oracle 得odbc driver..
    结果还是一样... 凄惨,,
      

  5.   

    hehe..找到问题了..
    win2000是用ado2.5
    win98是ado 2.0/2.1
    在VB里重新编译一次就ok了...thanx!