Verbinding maken met een Oracle- database met behulp van Visual Basic.NET is niet zo ingewikkeld als u misschien denkt . Het maken van een Oracle verbinding is bijna hetzelfde als het maken van een verbinding met een SQL Server-database . Een verschil is dat voor Oracle moet u de Oracle.DataAccess.Client namespace gebruiken . Nadat u de verbinding , dan kunt u de database doorzoeken met behulp van de OracleCommand klasse . De OracleDataReader wordt gebruikt om de resultaten van de opdracht te lezen en weer te geven in uw toepassing . Instructies
1 Lancering Microsoft Visual Studio , klikt u op " File > New Project" en klik breiden " Visual Basic . " Klik op "Windows" en dubbelklik op " Windows Forms Application " om een nieuw project aan te maken . kopen van 2 de rechtermuisknop op de naam van het project in het deelvenster Solution Explorer en klik op "Add Reference . " Klik " Oracle.DataAccess " gelegen in het tabblad . NET en klik op "OK . "
3 Dubbelklik op " button " van de Toolbox deelvenster om een nieuwe knop toe te voegen . Dubbelklik op " Button1 " naar een gebeurtenis click voor de knop te maken . Voeg een label met behulp van dezelfde techniek
4 Voeg de volgende regel code op de top van je code module om de Oracle namespace gebruiken : . Imports Oracle.DataAccess.Client
Kopieer 5 en plak de volgende code om de verbinding met uw Oracle- server te definiëren : Dim oracleConn As String = " data Source = ( BESCHRIJVING = ( ADDRESS_LIST = " _ + " ( ADRES =
( PROTOCOL = TCP ) ( HOST = ) ( PORT = ) ) ) " _ + " ( CONNECT_DATA = ( SERVER = dedicated) ( = ) ) ) , " _ + " gebruikers-id = , wachtwoord = ; "
6 Voeg de volgende code toe aan de aansluiting die in de vorige stap te openen : < br Dim myConn > als Nieuwe OracleConnection ( oracleConn ) myConn.Open ( )
Copy 7 en plak de volgende code in een veld van een tabel van uw keuze te bevragen , het toevoegen van een waar staat, en weergeven van de resultaten door het label controle : Dim myOrcleCmd
als Nieuwe OracleCommandmyOrcleCmd.Connection = myConnmyOrcleCmd.CommandText = " select van waar = " ; myOrcleCmd.CommandType = CommandType.TextDim dataRdr Zoals OracleDataReader = myOrcleCmd.ExecuteReader ( ) dataRdr.Read ( ) Label1.Text = dataRdr.Item ( " " )
8 toevoegen de volgende code om objecten los te maken van het geheugen :
dataRdr.Dispose ( ) myOrcleCmd.Dispose ( ) myConn.Dispose ( )
Druk op " F5 " 9 om het programma uit te voeren en klik " Button1 " om uw Oracle database te ondervragen .
|
