Verbinden mit einer Oracle-Datenbank mit Visual Basic.NET ist nicht so kompliziert, wie Sie vielleicht denken. Erstellen Sie ein Oracle-Verbindung ist fast das gleiche wie das Herstellen einer Verbindung zu einer SQL Server-Datenbank. Ein Unterschied ist, dass für Sie die Oracle Oracle.DataAccess.Client Namespace verwenden müssen. Sobald Sie die Verbindung herstellen , dann können Sie die Datenbank mithilfe der OracleCommand Klasse abzufragen. Die OracleDataReader wird verwendet, um die Ergebnisse aus dem Befehl lesen und zeigt sie in der Anwendung. Anleitung
1
Starten Sie Microsoft Visual Studio , klicken Sie auf " Datei> Neues Projekt " und klicken Sie erweitern " Visual Basic. " Click "Windows " und doppelklicken Sie auf "Windows Forms Application" , um ein neues Projekt zu erstellen .
2
der rechten Maustaste auf den Namen des Projekts auf dem Solution Explorer-Fenster und klicken Sie auf "Add Reference." Klicken Sie auf " Oracle.DataAccess " in der Registerkarte. NET befindet und klicken Sie auf " OK".
3
Doppelklicken Sie auf "Button" aus dem Bereich Toolbox auf eine neue Schaltfläche hinzufügen. Doppelklicken Sie auf " Button1 ", um eine Click-Ereignis für die Schaltfläche erstellen. Fügen Sie ein Etikett mit der gleichen Technik
4
Fügen Sie die folgende Codezeile an der Spitze Ihrer Code-Modul , um die Oracle -Namespace verwenden : . Importe Oracle.DataAccess.Client
5
Kopieren Sie den folgenden Code, um die Verbindung zu Ihrem Oracle -Server zu definieren :
Dim oracleConn As String = " Data Source = ( DESCRIPTION = ( ADDRESS_LIST =" _ + "( ADRESSE = (PROTOKOLL = TCP ) ( HOST = ) ( PORT = ))) "_ +" ( CONNECT_DATA = (SERVER = Dedicated ) ( SERVICE_NAME = ))) ; "_ + " User Id = ; Password = ; "
6 Fügen Sie den folgenden Code , um die Verbindung in dem vorherigen Schritt definiert öffnen:
Dim As New myConn OracleConnection ( oracleConn ) myConn.Open ()
7
Kopieren Sie den folgenden Code , um ein Feld einer Tabelle Ihrer Wahl abzufragen , wo das Hinzufügen einer Bedingung , und die Ergebnisse durch das Label-Steuerelement :
Dim As New myOrcleCmd OracleCommandmyOrcleCmd.Connection = myConnmyOrcleCmd.CommandText = "select von wo = " ; myOrcleCmd.CommandType = CommandType.TextDim dataRdr Wie OracleDataReader = myOrcleCmd.ExecuteReader () dataRdr.Read () = Label1.Text dataRdr.Item ( " " )
8 hinzufügen Mit dem folgenden Code , um Objekte aus dem Speicher freizugeben :
dataRdr.Dispose () myOrcleCmd.Dispose () myConn.Dispose ()
9
Presse "F5 ", um das Programm zu starten , und klicken Sie " Button1 " zur Abfrage der Oracle-Datenbank .