Discussion :

[tomtom24]

Bonjour,

j'essaie depuis qq jours de trouver une solution a mon pb, mais rien....

je veux recuperer les donnees d'une base access dans un dataset et une datagrid. jusque la pas de probleme.
voir code a la fin

Mais ce que je veux, c 'est afficher des requetes variables a la demande, pouvoir modifier les donnees dans le datagrid, et mettre a jour avec un update la base access.

Créer la requete de l'update n 'est pas un probleme, la question est comment gérer l'update, c'est a dire la descente d'infos de la datagrid vers le dataset et le data adapter ?

Je sais que Visual Studio génere automatiquement le codage, mais les requetes sont fixes, ou paramétrées. Moi, je vais effectuer des requetes dynamiques, c 'est a dire que les parametres peuvent passer de 1 a plusieurs

ex requete 1
SELECT date, nom, valeur FROM table WHERE (valeur => '100')
j affiche, je modifie, j envoie dans la base
puis dans la userform, je mets de nouveaux parametres
SELECT date, nom, valeur, type FROM table WHERE (valeur <> '100') AND (type = 'A')
j affiche le resultat dans le meme datagrid, puis je modifie, j'envoie dans la base.......et ainsi de suite

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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim cn As Odbc.OdbcConnection
 
        Dim connectionString As String = "Dsn=mydatabase;dbq=C:\mabase.mdb;driverid=25;fil=MS Access;maxbuffersize=2048;pagetimeout=5;uid=admin"
 
 
        cn = New Odbc.OdbcConnection(connectionString)
 
        cn.Open()
 
        Dim cmd As New Odbc.OdbcCommand("select * from matable", cn)
 
        Me.dataAdapter = New Odbc.OdbcDataAdapter(cmd)
 
        ' With dataGridView1.ColumnHeadersDefaultCellStyle
 
        With DataGridView1
 
            .AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells
 
            .AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.ColumnHeader
 
            .AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.ColumnHeader
 
        End With
 
        Dim commandBuilder As New Odbc.OdbcCommandBuilder(Me.dataAdapter)
 
        Dim table As New DataTable()
 
        table.Locale = System.Globalization.CultureInfo.InvariantCulture
 
        Me.dataAdapter.Fill(table)
 
        Me.bindingSource1.DataSource = table
 
        Me.DataGridView1.DataSource = Me.bindingSource1
 
        Me.DataGridView1.AlternatingRowsDefaultCellStyle.BackColor = Color.Aqua
 
        Me.DataGridView1.AutoResizeColumns(DataGridViewAutoSizeColumnsMode.AllCells)
 
        Dim data As New DataSet()
 
        data.Locale = System.Globalization.CultureInfo.InvariantCulture
 
    End Sub

[elsuket]

Bonjour,

Vous devriez plutôt poser votre question sur le forum VB.NET

@++

[mikedavem]

Bonsoir,

Il suffit de construire votre requête SQL en fonction de vos conditions de code. (Pour avoir fait un peu de VB )

Exemple

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
Dim cmdString As String
 
cmd = 'SELECT colonne1, colonne2 FROM dbo.table WHERE '
 
If (votre predicat) Then
  cmdString = cmdString & '(valeur => ''100'')'
Else
  cmdString = cmdString & '(valeur <> ''100'') AND (type = ''A'')'
End If
 
..
 
Dim cmd As New Odbc.OdbcCommand(cmdString,cn)
 
..

++

[tomtom24]

Bonjour, merci pour la rapidité de réponse.
Mais le problème n 'est pas dans la création des requetes sql, mon problème est comment prendre en compte les modification faite dans le datagrid par l'utilisateur pour les envoyer et mettre a jour la base de données.

J'arrive a faire des requetes pour afficher ce que je veux dans le datagrid, mais comment faire en MANUEL pour UPDATER la base access avec les modifications.
Je sais que VISUAL STUDIO génére automatiquement ce code, mais pour mon projet, je vais avoir des requetes DYNAMIQUES, donc je dois le faire en codant à la main.


Merci d avance

[Hinault Romaric]

http://webman.developpez.com/article...rameter/vbnet/