HELP!VB如何连接ORACLE数据库

HELP!VB如何连接ORACLE数据库?  
  问题点数：20、回复次数：2Top

1 楼CityBird（鹰扬九洲——只有想不到的，没有做不到的）回复于 2003-12-03 18:08:04 得分 0

在odbc中有一个microsoft   odbc   for   oracle驱动,用它应该能连上Top

2 楼online（龙卷风V4.0--决战江湖(MS MVP-VB)）回复于 2003-12-03 20:00:13 得分 20

没有用过  
  Dim   OraSess   as   Object  
  Dim   OraDb   as   Object  
  Dim   Dyna   as   Object  
   
  Set   OraSess   =   CreateObject("OracleInProcServer.XOraSession")  
  Set   OraDb   =   OraSess.DbOpenDatabase("oracle8","scott/tiger",0&)  
  '   In   the   Above   Command  
  'FirstParameter   ("oracle8")   is   the   Database   Name   or   the   HostString  
  'SecondParameter   ("scott/tiger")   is   the   UserName/Password  
  Set   Dyna   =   OraDb.CreateDynaSet("Select   *   from   Emp",0&)  
  for   i   =   0   to   Dyna.RecordCount  
  text1   =   Dyna.Fields(0).Value  
  text2   =   Dyna.Fields(1).Value  
  text3   =   Dyna.Fields(2).Value  
  text4   =   Dyna.Fields(3).Value  
  Dyna.DbMoveNext  
  Next   i  
  Top

相关问题

• 数据库
• 连接
• vb
• tiger
• oracle
• dyna
• valuetext
• orasess
• oradb
• 连接oracle数据库

• 帖主：coyue
• online

• Visual Basic类图书
• Visual Basic类源码下载