Probléme en DataGridView

**asmaw** · 21/07/2012, 13h32

Bonjour,
svp je veux afficher les lignes d'une table "Personne" d'une base données sous SQL Server CE, le code que j'ai utilisé ne génére aucun erreur mais rien ne s'affiche sur mon DataGridView!!
svp est ce que qlq peut m'aider car je suis bloké

le code utilisé est le suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
27
28
29
 
 Dim con As SqlCeConnection = Nothing
        Dim cmd As SqlCeCommand = Nothing
        Dim DAptr As SqlCeDataAdapter =Nothing
 
        Dim DSet As New DataSet
        Dim DTable As New DataTable
        Dim strSql As String = "Select * from Personne  "
        Dim strCon As String = "data source =Mybasepointage.sdf"
        Dim objetcb As SqlCeCommandBuilder
 
        Try
            con = New SqlCeConnection
            con.ConnectionString = strCon
 
            con.Open()
            cmd = New SqlCeCommand(strSql)
            DAptr = New SqlCeDataAdapter(strSql, con)
            cmd.Connection = con
 
            objetcb = New SqlCeCommandBuilder(DAptr)
            DAptr.Fill(DSet, " Personne")
            DTable = DSet.Tables("Personne")
            DataGridView1.DataSource = DSet.Tables("Personne")
            DataGridView1.Refresh()
 
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Erreur")
        End Try

**hunteshiva** · 21/07/2012, 14h19

Bonjour,

tu utilise une source faite pour charger des bases access (OLEDB)
je pense que tu devrais regarder ce post, il explique comment faire avec un SQL serveur CE

1. Se connecter a une BDD SQLCE

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim con As SqlCeConnection = New SqlCeConnection("Data Source=C:\Northwind.sdf")

2. Lire un BDD SQL CE

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim cmd As SqlCeCommand = SqlCeCommand("Select * FROM Users", con)
If con.State = ConnectionState.Closed Then con.Open()
Dim myDA As SqlCeDataAdapter = New SqlCeDataAdapter(cmd)  
Dim myDataSet As DataSet = New DataSet()  
myDA.Fill(myDataSet, "MyTable")  
DataGridView1.DataSource = myDataSet.Tables("MyTable").DefaultView

Bonne continuation