Ansluta till en Oracle-databas med hjälp av Visual Basic.NET är inte så komplicerat som du kanske tror . Göra en Oracle -anslutning är nästan samma sak som att göra en koppling till en SQL Server-databas . En skillnad är att för Oracle måste du använda Oracle.DataAccess.Client namnrymden . När du gör anslutningen , så du kan söka i databasen med hjälp av OracleCommand klassen . Den OracleDataReader används för att läsa resultaten från kommandot och visa dem i din ansökan . Instruktioner
1
Launch Microsoft Visual Studio , klicka på " Arkiv > Nytt projekt " och klicka på expandera " Visual Basic . " Klicka på " Windows " och dubbelklicka på " Windows Forms Application " för att skapa ett nytt projekt .
2
Högerklicka på projektnamnet på Solution Explorer fönstret och klicka på " Add Reference . " Klicka " Oracle.DataAccess " ligger i . NET fliken och klicka på " OK . "
3
Dubbelklicka på " Button " från Toolbox rutan för att lägga till en ny knapp . Dubbelklicka på " Button1 " för att skapa en click-händelse för knappen . Lägg en etikett med samma teknik
4
Lägg till följande kodrad högst upp på din kod modul för att använda Oracle namespace : . Import Oracle.DataAccess.Client
5
Kopiera och klistra in följande kod för att definiera anslutningen till Oracle-server :
Dim oracleConn As String = " Data Source = ( Beskrivning = ( ADDRESS_LIST = " _ + " ( ADRESS = ( PROTOKOLL = TCP ) ( HOST = ) ( PORT = ) ) ) " _ + " ( CONNECT_DATA = ( SERVER = dedikerat) ( SERVICE_NAME = namn> ) ) ) , " _ + " Konto -ID = ; Lösenord = ; "
6 Lägg till följande kod för att öppna anslutningen definieras i föregående steg :
Dim myConn som New OracleConnection ( oracleConn ) myConn.Open ( )
7
Kopiera och klistra in följande kod för att ifrågasätta ett fält i en tabell i ditt val , att lägga till en där tillstånd , och visa resultaten genom etiketten kontroll :
Dim myOrcleCmd Som ny OracleCommandmyOrcleCmd.Connection = myConnmyOrcleCmd.CommandText = " select från där = " ; myOrcleCmd.CommandType = CommandType.TextDim dataRdr Som OracleDataReader = myOrcleCmd.ExecuteReader ( ) dataRdr.Read ( ) Label1.Text = dataRdr.Item ( " " )
8 Lägg följande kod för att släppa objekt från minnet :
dataRdr.Dispose ( ) myOrcleCmd.Dispose ( ) myConn.Dispose ( )
9
Tryck " F5 " för att köra programmet och klicka " Button1 " att fråga din Oracle-databas .
