none
Création d'un nouvel enregistrement avec datagrid et vb 2005 RRS feed

  • Question

  • Bonjour,

    Voici le code que j'utilise :

    Dim EnCours As Integer
    EnCours= Grid_client.CurrentRowIndex
    Dim Cle As String
    Cle = Grid_client.Item(EnCours, 0)
    Dim LaTable As DataTable
    LaTable = DtSet.Tables("annuaire")
    Dim LaLigne As DataRow()
    LaLigne = LaTable .Select("Cle = " & Cle)
    LaLigne(0)(1) = TCivilite.Text
    LaLigne(0)(2) = Tnom.Text
    LaLigne(0)(3) = Tprenom.Text
    LaLigne(0)(4) = TFixe.Text
    LaLigne(0)(5) = TFax.Text
    LaLigne(0)(6) = TCommentaires.Text
    MiseAJour(AdapTelephone, "annuaire")
    

    Ce code crée bien la ligne mais elle est vide.

    Ai-je loupé quelque chose ?

    Merci.

    jeudi 29 avril 2010 21:43

Toutes les réponses

  • Bonjour,

    Qu'est-ce que tu as dans ta procédure MiseAJour ?

    Cordialement,

    Pascal

    vendredi 30 avril 2010 09:25
  • Bonjour,

     

    J’ai testé votre code et il marche, avec quelques modifications.

     Dim EnCours As Integer

            EnCours = Grid_client.CurrentRow.Index

            Dim Cle As String

            Cle = Grid_client.Item(0, EnCours).Value.ToString()

            Dim LaTable As DataTable

            LaTable = TestDBDataSet.Tables("Table_1")

            Dim LaLigne As DataRow()

            LaLigne = LaTable.Select("Col1=" & Cle)

     

     LaLigne(0)(1) = "aaa"

     

     

     

    Premièrement, pour Grid_client.Item() il faut mettre la colonne comme premier paramètre et la ligne comme deuxième paramètre. Ensuite, j’ai utilisé aussi .Value.ToString(), car mon Visual Studio ne compilait pas votre exemple.

    Si vous voulez aussi modifier les données de la base, il faut poster le code de la méthode MiseAJour.

     

    Cordialement,

    Alex


    Appel à contribution ! http://social.msdn.microsoft.com/Forums/fr-FR/vbasicfr/thread/bd974e0e-5519-4122-b8fc-3b998207c34f
    lundi 3 mai 2010 09:44