Discussion :

[pjimenez]

J'ai programmé en Vb, et maintenant je voudrais continuer avec Visual Studio
Je trouve beaucoup de problèmes avec l'utilisation de la base de données, et crois que ne sais pas me prendre.
J'ai parcours le cours ADO.Net et à chaque fois que je copie une partie de programme cela se plante.
Je cherche un exemple complet (depuis la déclaration de variables) d'utilisation que je puisse copier et l'étudier.
J'utilise Visual Studio 2013 express

Quelqu'un pourrait m'aider ?

[jopopmk]

Salut,

quel SGBD utilise-tu ? Et montre nous un peu ton code actuel, avec l'erreur/exception obtenue et où elle a été levée.

[pjimenez]

salut à toi jopopmk

je suppose que SGBD est la base de données. Elle est sous access

je voudrais remplir un datagridview inclus dans une Form, avec les données d'une table (Groupe2) de ma base de données

je ne trouve pas comment faire pour t'envoyer les copies d'écran de la base

[jopopmk]

Re,

à vrai dire la DB en elle-même (comprendre "les données") m'intéressent pas tellement, je voulais juste savoir quel SGBD tu utilisais (en l'occurrence Access).

Par contre, comme demandé plus tôt, tu peux me faire un copier/coller de ton code (dans des balises CODE pour que ce soit plus lisible), avec l'erreur obtenue (et sur quelle ligne). Je suis pas du genre à donner du code tout fait. De plus il semble qu'avec du code repiqué (cf. les tuto/exemples que tu as lus) tu n'arrives pas à tes fins. La meilleure technique pour que tu avances est donc qu'on repère les erreurs dans ton code actuel.

[pjimenez]

Salut jopopmk


Quand je lance l'application elle s'arrette en me disant que
EuroMillions.EuroMillionsDataSet n'esta declaré

Me.EuroMillionsDataSet = New EuroMillions.EuroMillionsDataSet()

et me propose de changer par

Me.EuroMillionsDataSet = New Global.EuroMillions.EuroMillionsDataSet()

A partir de ce moment le programme se deroule et quand je lui dis d'afficher sur la datagrid la table Groupe2 rien ne se passe
(ce phénomène revient de temps à autre. Je ne sais pas pourquoi)


Voici le code

Imports System.Data.OleDb
Imports System.Data

Public Class VisuTables

' Déclaration Objet Connection
Private ObjetConnection As OleDbConnection

' Déclaration Objet Commande
Private ObjetCommand As OleDbCommand

' Déclaration Objet DataAdapter
Private ObjetDataAdapter As OleDbDataAdapter

' Déclaration Objet DataSet
Private ObjetDataSet As New DataSet

' Déclaration Objet DataTable
Private ObjetDataTable As New DataTable

'String contenant la 'Requête SQL'
Private strSql As String

'Paramêtres de connexion à la DB
Private strConn As String

' Déclaration d'un OleDbCommandBuilder
Private ObjetCB As OleDbCommandBuilder


Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.Close()

End Sub


Sub VisuTables_Load(sender As Object, e As EventArgs) Handles MyBase.Load



End Sub



Private Sub ButtonAfficheGrid_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonAfficheGrid.Click

Imports System.Data.OleDb
Imports System.Data

Public Class VisuTables

' Déclaration Objet Connection
Private ObjetConnection As OleDbConnection

' Déclaration Objet Commande
Private ObjetCommand As OleDbCommand

' Déclaration Objet DataAdapter
Private ObjetDataAdapter As OleDbDataAdapter

' Déclaration Objet DataSet
Private ObjetDataSet As New DataSet

' Déclaration Objet DataTable
Private ObjetDataTable As New DataTable

'String contenant la 'Requête SQL'
Private strSql As String

'Paramêtres de connexion à la DB
Private strConn As String

' declaration d'un OleDbCommandBuilder
Private ObjetCB As OleDbCommandBuilder


Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.Close()

End Sub


Sub VisuTables_Load(sender As Object, e As EventArgs) Handles MyBase.Load

'Initialisation de la chaîne de paramètres pour la connexion
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\AppVs\EuroMillions\EuroMillions\EuroMillions.mdb;"

'Instanciation d'un Objet Connexion
ObjetConnection = New OleDbConnection()

'Donner à la propriété ConnectionString les paramètres de connexion
ObjetConnection.ConnectionString = strConn

'Ouvrir la connexion
ObjetConnection.Open()

End Sub


Private Sub ButtonAfficheGrid_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonAfficheGrid.Click

' Table Groupe2

'Initialisation de la chaîne contenant l'instruction SQL
strSql = "SELECT Groupe2.* FROM Groupe2"

'Instancier un objet Commande
ObjetCommand = New OleDbCommand(strSql)

'Instancier un objet Adapter
ObjetDataAdapter = New OleDbDataAdapter(ObjetCommand)

'initialiser l'objet Command
ObjetCommand.Connection() = ObjetConnection

'Avec l'aide de la propriété Fill du DataAdapter charger le DataSet
ObjetDataAdapter.Fill(ObjetDataSet, "Groupe2")

'Mettre dans un Objet DataTable une table du DataSet
ObjetDataTable = ObjetDataSet.Tables("Groupe2")


End Sub

Private Sub FillByToolStripButton_Click(sender As Object, e As EventArgs) Handles FillByToolStripButton.Click
Try

Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try

End Sub

End Class
End Sub

Private Sub FillByToolStripButton_Click(sender As Object, e As EventArgs) Handles FillByToolStripButton.Click
Try

Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try

End Sub

End Class