研究一下ado与Oracle数据库连接的实现

Question

Dim  CON 
Dim  RS 
Private Sub Form_Load()  
    Set CON=CreateObject("adodb.connection")  
    CON.Open "UID=CDITS;PWD=CDITS;driver={Microsoft ODBC for  Oracle};SERVER=CDITS;"  
    Dim mysql As String 
 
    mysql = "select distinct(vid) from HTELEFEEINFORMATION where driverid=0 " 
    CON.Execute mysql  
    Set RS = CON.Execute(mysql)  
    Do While Not RS.EOF  
    Text1.Text = Text1.Text & RS("vid") & Chr(13) & Chr(10)  
    RS.MoveNext  
    Loop     
End Sub 或
Conn.Open  "PROVIDER=MSDAORA.1;Password=Test;User ID=TestUser;Data  Source=LocalOracle;Persist Security Info=True"

Answer 1

Provider=MSDAORA.1;User ID=UserID;Data Source=ServerName;Persist Security Info=False

Answer 2

Provider=MSDAORA.1;Data Source=AAAA;User ID=BBBB;Password=CCCC

Answer 3

大侠们说得确实不错，用了一下感觉不错。想问一下，这种连接方式不用ODBC，那么他通过什么通道走的呢？是通过微软的OLE DB吗？它是否直接就和Oracle连接了而没有通过任何中介结构？

Answer 4

我突然发现这样连接在程序分发时特别不方便，ODBC还是有它的好处的