VB程序通过远程连接实现Oracle数据库的访问（vb远程连接oracle）

在微软的 Visual Basic 集成开发环境（IDE）中，我们可以通过远程连接的方式向Oracle数据库发送指令，从而实现对Oracle数据库的访问。

下图1中给出了远程连接oracle数据库的VB示例代码（利用ODP.NET方式进行连接）：

Imports Oracle.DataAccess.Client    
Dim conStr As String = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=127.0.0.1)(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=orcl)));User ID=scott;Password=tiger;"  
Dim conn As New OracleConnection(conStr)  
Try  
  conn.Open()  
Catch ex As Exception    
  MsgBox(ex.Message.ToString())    
  Return False   
End Try  
Dim cmd As New OracleCommand()  
Dim sqlstr As String = "SELECT id FROM nom_idi"  
cmd.CommandText = sqlstr  
cmd.Connection = conn  
Dim reader AsOracleDataReader=cmd.ExecuteReader()  

If reader.Read() Then  
  MsgBox(reader.Item("id").ToString())  
End If  

reader.Close()  
conn.Close()  
Return True  

在上面的VB程序中，首先我们通过 ConnectionString 连接 Oracle 数据库，并打开连接；其次我们初始化一个OracleCommand对象，用于发出要求，然后将其执行，并用 OracleDataReader 读取查询结果；最后，断开与Oracle数据库的连接。

在上述示例代码中，正如你所见，只需要很少行就能实现远程连接Oracle数据库并访问，从而开发者可以快速便捷地利用VB语言高效操纵Oracle数据库，从而实现对该数据库更好的访问。