Connexion à une base de données Oracle en utilisant Visual Basic.NET n'est pas aussi compliqué que vous le pensez . Faire une connexion Oracle est presque le même que celui d'établir une connexion à une base de données SQL Server. Une différence est que pour Oracle , vous devez utiliser l'espace de noms Oracle.DataAccess.Client . Une fois que vous établissez la connexion , vous pouvez interroger la base de données en utilisant la classe OracleCommand . Le OracleDataReader est utilisé pour lire les résultats de la commande et les afficher dans votre application. Instructions
1
Lancement de Microsoft Visual Studio , cliquez sur " File> New Project " et cliquez sur Développer " Visual Basic ". Cliquez sur " Windows" et double-cliquez sur "Application Windows Forms " pour créer un nouveau projet .
2
un clic droit sur le nom du projet dans le volet de l'Explorateur de solutions et cliquez sur « Ajouter une référence . " cliquez sur " Oracle.DataAccess " situé dans l'onglet . NET et cliquez sur " OK".
3
Double- cliquez sur "Button " dans le volet Boîte à outils pour ajouter un nouveau bouton. Double -cliquez sur " Button1" pour créer un événement clic du bouton . Ajouter une étiquette en utilisant la même technique
4
Ajoutez la ligne de code suivante au sommet du module de code pour utiliser l'espace de noms Oracle: . Importations Oracle.DataAccess.Client
5
Copiez et collez le code suivant pour définir la connexion à votre serveur Oracle:
oracleConn As String = "Data Source = ( DESCRIPTION = ( ADDRESS_LIST =" _ + "( ADDRESS = (PROTOCOLE = TCP ) ( HOST = ) ( PORT = ))) " _ +" ( CONNECT_DATA = ( SERVER = dédié) ( SERVICE_NAME = ))) , "_ + " User Id = ; "
6 Ajoutez le code suivant pour ouvrir la connexion définie dans l'étape précédente:
myconn As New OracleConnection ( oracleConn ) myConn.Open ()
7
Copiez et collez le code suivant pour interroger un champ d'une table de votre choix , en ajoutant une condition WHERE , et afficher les résultats à travers le contrôle de l'étiquette :
myOrcleCmd As New OracleCommandmyOrcleCmd.Connection = myConnmyOrcleCmd.CommandText = " select de où = " ; myOrcleCmd.CommandType = CommandType.TextDim dataRdr Comme OracleDataReader = myOrcleCmd.ExecuteReader () dataRdr.Read () Label1.Text = dataRdr.Item ( " " )
8 Ajouter le code suivant pour libérer les objets de la mémoire :
dataRdr.Dispose () myOrcleCmd.Dispose () myConn.Dispose ()
9
Appuyez sur " F5" pour exécuter le programme et cliquez sur " Button1" pour interroger votre base de données Oracle.