DataGrid ADO.Net

7 posts / 0 new

ven, 13/03/2009 - 09:53

marie

DataGrid ADO.Net

slt tout le monde
j'aimerais ajouter, modifier, supprimer au niveau de Data Grid voulez vous bien me dire comment
merciiiiiiiiiii d'avance :)

ven, 13/03/2009 - 11:47

ezo-esm

Bonjour

En utilisant une base de données SQL

tu dois d'abord créer le formulaire avec les textboxes boutons et datagrid puis la connexion entre ta base de données et VS
pour afficher les information que tu veux traiter.

Public Class Form1
            Dim conn As New SqlConnection("data source=localhost;initial      catalog=nom_base_données;integrated security=true")
            Dim ds As New DataSet
            Dim da As New SqlDataAdapter("select * from nom_table", conn)
            Dim nom_table As New DataTable

puis dans ton form tu mets en double cliquant dessus


        da.Fill(ds, "nom_table")
        
        nom_table = ds.Tables("nom_table")
       
        DataGrid1.DataSource = nom_table

et dans ta datagrid (je pense je ne suis pas très sur parc que ça fait presque une année que je n'ai pas utilisé dotnet)


Dim index As Integer = DataGrid1.CurrentRowIndex
        TextBox1.Text = DataGrid1.Item(index, 0)
        TextBox2.Text = DataGrid1.Item(index, 1)
        TextBox3.Text = DataGrid1.Item(index, 2)
        TextBox4.Text = DataGrid1.Item(index, 3)

puis pour les boutons de la mise a jour tu déclare les attributs que tu as dans ta table et tu mets la requête souhaiter par exemple dans un bouton d'ajout

'
        Dim champs1 As Integer = TextBox1.Text
        Dim champs2 As String = TextBox2.Text
        Dim champs3 As String = TextBox3.Text
        Dim champs4 As Integer = TextBox4.Text
'puis tu cree une nouvelles ligne pour ajouter les information 'correspondantes au champs de ta table
        Dim ligne As DataRow = nom_table.NewRow
        ligne.Item(0) = champs1
        ligne.Item(1) = champs2
        ligne.Item(2) = chmaps3
        ligne.Item(3) = champs4
'tu ajoute cette ligne a la table
        nom_table.Rows.Add(ligne)
'puis tu ajoute  la table a datagrid
        DataGrid1.DataSource = nom_table
        Dim cmd As New SqlCommand("insert into nom_table values(" & champs1 & ",'" & chapms2 & "','" & champs3 & "'," & champs4 & ")", conn)
        da.InsertCommand = cmd
        da.Update(ds, "nom_table")

voila ce que j'ai pu Marie excuse les erreurs je ne suis pas sur de tout ça mais essayes comme même
bonne chance

ven, 13/03/2009 - 11:53

ezo-esm

Sinon si tu utilise une base de données Access voila la chaine de connexion

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;User Id=admin;Password=;

et tu peux aussi visité ce site il contient touts les types de chaine de connexion

[url]
http://www.connectionstrings.com/
[/url]

ven, 13/03/2009 - 15:13

marie

Data grid

slt
j'aimerai connaitre le code au niveau du datagrid sans etre besoin du textbox (modifier supp ajou dans datagrid a l'aide des boutton ajou, sup, mod sans les tb)
ok
merciiiiiii

ven, 13/03/2009 - 17:06

ezo-esm

dans ce cas la je crois que tu dois faire une fonction afficher() et tu l'appelles dans datagrid

Sub afficher()
        Dim cmd As New SqlCommand("select * from nom_table",conn) 

        Dim da As New SqlDataAdapter(cmd)
        Dim nom_table As New DataTable
        da.Fill(nom_table)
        DataGrid1.DataSource = nom_table
        DataGrid1.DataBind()
    End Sub

ensuite tu vas dans ta datagrid et tu applles la fonction

afficher()

bonne chance

lun, 16/03/2009 - 12:08

marie

ce code ne permet que afficher ce qui est deja existe dans la base de donner.
mais moi ce que je veux c modifier la base de donner (ajout, sup , mod) a l'aide de datagrid
merci

lun, 16/03/2009 - 13:07

ezo-esm

Bonjour

je t'avais déjà envoyer le code des boutons de la mise a jour (ajout suppression)

je ne sais pas ce que tu demande exactement

est ce que tu veux des liens devant chaque ligne qui te permettent de supprimer ?

de toute manière pour l'ajout les textbox sont obligatoire

peux tu m'expliquer exactement ce que tu cherche
et excuse moi si je n'ai pas pu t'aider par les réponses précédentes.

Bonne chance

Post reply