J'ai problème qui me fatigue depuis je ne comprend pas lorsque je clique sur le bouton j'ai automatiquement le message de connexion impossible alors que j'ai revue ma chaine de connexion elle est exacte.
J'utilise une base oracle comme vous avez pu le remarquer et une instance de connexion DEVART
Imports Devart.Data
Imports Devart.Data.Oracle
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Création de la connexion
Dim Connexion As New OracleConnection()
Connexion.ConnectionString = stringConnect
Try
Connexion.Open()
Dim MaCommande As New OracleCommand()
MaCommande.Connection = Connexion
'utilisation de requette
MaCommande.CommandType = CommandType.Text
MaCommande.CommandText = "Select id_admin, first_name from data_admin"
Dim MonAdapter As New OracleDataAdapter()
Dim MaDataTable As New DataTable("Les Employées")
MonAdapter.Fill(MaDataTable)
With DataGridView1
.AutoGenerateColumns = True
'.DataSource = MaDataTable
BindingSource1.DataSource = MaDataTable
.DataSource = BindingSource1
.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.DisplayedCellsExceptHeaders
.BorderStyle = BorderStyle.Fixed3D
.EditMode = DataGridViewEditMode.EditOnEnter
End With
Catch ex As Exception
MessageBox.Show("Connexion Impossible")
Finally
Connexion.Close()
End Try
End Sub
End Class