Conectando a um banco de dados Oracle usando o Visual Basic.NET não é tão complicado como você pode pensar. Fazer uma conexão Oracle é quase o mesmo que fazer uma conexão com um banco de dados SQL Server. Uma diferença é que para Oracle que você precisa para usar o namespace Oracle.DataAccess.Client . Depois de fazer a conexão, em seguida, você pode consultar o banco de dados usando a classe OracleCommand . O OracleDataReader é usado para ler os resultados do comando e exibi-los em sua aplicação. Instruções
1
Abra o Microsoft Visual Studio , clique em " File> New Project " e clique em expandir "Visual Basic". Clique em " Windows" e clique duas vezes em " Windows Forms Application " para criar um novo projeto .
2
botão direito do mouse no nome do projeto no painel Solution Explorer e clique em " Add Reference. " Click " Oracle.DataAccess " localizado na NET . e clique em " OK".
3
clique duas vezes em "Button" no painel de caixa de ferramentas para adicionar um novo botão. Clique duas vezes em "Button1 " para criar um evento de clique do botão. Adicione um rótulo usando a mesma técnica
4
Adicione a seguinte linha de código no topo do seu módulo de código para usar o namespace Oracle: . Importações Oracle.DataAccess.Client
5
Copiar e colar o seguinte código para definir a conexão com o servidor Oracle:
Dim oracleConn as String = " Data Source = (DESCRIPTION = ( ADDRESS_LIST =" _ + "( ADDRESS = ( PROTOCOL = TCP) ( HOST = ))) " _ +" ( CONNECT_DATA = ( SERVER = DEDICATED ) ( SERVICE_NAME = ; "
6 Adicione o seguinte código para abrir a conexão definida na etapa anterior :
Dim myConn as New OracleConnection ( oracleConn ) myConn.Open ()
7
Copie e cole o seguinte código para consultar um campo de uma tabela de sua escolha , acrescentando uma condição em que , e apresentar os resultados através do controle de rótulo :
Dim myOrcleCmd as New OracleCommandmyOrcleCmd.Connection = myConnmyOrcleCmd.CommandText = "select de onde = valor " ; myOrcleCmd.CommandType = CommandType.TextDim dataRdr Como OracleDataReader = myOrcleCmd.ExecuteReader () dataRdr.Read () = Label1.Text dataRdr.Item ( " " )
8 Adicionar o seguinte código para liberar os objetos da memória :
dataRdr.Dispose () myOrcleCmd.Dispose () myConn.Dispose ()
9
Pressione " F5 " para executar o programa e clique em "Button1 " para consultar o banco de dados Oracle.
