Problème dans création NewRow

Version imprimable

Bonjour,

voici le code que jai ecrit pour ajouter une nouvelle ligne dans un datatable:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 Dim produit As DataRow = dtProduits.NewRow() produit("nom") = txtNom.Text.Trim produit("prix") = txtPrix.Text.Trim ' on ajoute la ligne à la table 'Application.Lock() Try dtProduits.Rows.Add(produit) lblInfo3.Text = "Ajout réussi" ' nettoyage txtNom.Text = "" txtPrix.Text = "" Catch ex As Exception lblInfo3.Text = String.Format("Erreur : {0}", ex.Message) End Try
mais a l'execution je recois le message suivant sur la ligne

Code:

Dim produit As DataRow = dtProduits.NewRow()

:

Citation:

Erreur 1 'System.Data.DataRow.Protected Friend Sub New(builder As System.Data.DataRowBuilder)' n'est pas accessible dans ce contexte, car il est 'Protected Friend'.

Si quelqu'un a deja rencontré cet erreur peut il m'expliquer SVP.
Cordialement.

Bonjour jeune developpeur,

Essai avec un Array(of Object) = {"param1", "param2"} ou paramX est le contenu de tes TextBoxes.

Je reprend ton code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Dim produit As String() = {txtNom.Text.Trim(), txtPrix.Text.Trim()}
      ' on ajoute la ligne à la table
      'Application.Lock()
 
      Try
        dtProduits.Rows.Add(produit)
      Catch ex As Exception
        lblInfo3.Text = String.Format("Erreur : {0}", ex.Message)
      End Try
 
      lblInfo3.Text = "Ajout réussi"
      ' nettoyage
      txtNom.Text = ""
      txtPrix.Text = ""

06/10/2009, 15h03
Redouane

Bonjour,

essaye d'appeler tt le namespace, au lieu de DataRow, faire System.Data.DataRow :

Code:

Dim produit As System.Data.DataRow= dtProduits.NewRow()

je pense que tu utilise un constructeur (nouvelle instance) DataRow qui déstiné uniquement pour un usage interne.

merci beaucoup redouane.

le code a bien marché pour moi mais l'ajout ne passe pas coté base de données.

Si vous pouvez encore m'eclaircir cette etape, j'en serais reconnaissante.

Voici le code complet :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
  Private Sub btnAjouter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAjouter.Click
      ' ajout d'un nouvel élément à la table des produits
      ' il faut tout d'abord que les données soient valides
      rfvNom.Validate()
      rfvPrix.Validate()
      cvPrix.Validate()
      If Not rfvNom.IsValid Or Not rfvPrix.IsValid Or Not cvPrix.IsValid Then
        ' de nouveau le formulaire de saisie
        afficheAjout()
        Exit Sub
      End If
      ' on crée une ligne
      Dim produit As String() = {txtNom.Text.Trim(), txtPrix.Text.Trim()}
      ' on ajoute la ligne à la table
      Application.Lock()
      Try
        dtProduits.Rows.Add(produit)
        lblInfo3.Text = "Ajout réussi"
        ' nettoyage
        txtNom.Text = ""
        txtPrix.Text = ""
      Catch ex As Exception
        lblInfo3.Text = String.Format("Erreur : {0}", ex.Message)
      End Try
      Application.UnLock()
    End Sub

Cordialement.

06/10/2009, 16h14
Redouane

C'est Nasame qui t'a donné cette solution ;)

Citation:

Envoyé par Nasame

Essai avec un Array(of Object) = {"param1", "param2"} ou paramX est le contenu de tes TextBoxes[/code]
06/10/2009, 16h18
informaticienne_2009

Desolée jai pas fait attention:calim2:

Grand merci a Nasame.:ccool:
07/10/2009, 11h50
Nasame

;)

Ton objet DataTable est "une vue" en mémoire de ta table en base donc si tu le modifies, la source de données n'est pas impactée...
Il te faut des méthodes d'insert, modif, delete et les appeler..

Mais je n'ai pas l'habitude de travailler avec des dataTable, je me trompe peut-être...

Bon courage,

Nasame.