UPDATE NO ACCESS USANDO DATAGRIDVIEW
Bom dia a todos,
Venho aqui pedir uma forçinha pra voces no forum,
eu carrego meu datagridview com a seguinte filtro:
Imports System.Data.SqlClient
Public Class Form1
Dim provider As String
Dim dataFile As String
Dim connString As String
Dim myConnection As OleDb.OleDbConnection = New OleDb.OleDbConnection
Dim ds As DataSet = New DataSet
Dim da As OleDb.OleDbDataAdapter
Dim table As New DataTable()
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
provider = [Ô]Provider=Microsoft.ACE.OLEDB.12.0;Data Source =[Ô]
dataFile = [Ô]C:\Users\USER\Desktop\Banco1.accdb[Ô]
connString = provider & dataFile
myConnection.ConnectionString = connString
myConnection.Open()
Dim Data1 As Date
Dim Data2 As Date
Data1 = CDate(MaskedTextBox1.Text)
Data2 = CDate(MaskedTextBox2.Text)
Dim da As New OleDb.OleDbDataAdapter([Ô]select * from estagio where data BETWEEN #[Ô] & Data1 & [Ô]# AND #[Ô] & Data2 & [Ô]# Order by data Asc[Ô], myConnection)
da.Fill(table)
DataGridView1.DataSource = table
[ô]myConnection.Close()
End Sub
Eu modifico meus dados no grid e ao click em um botão ele alterasse no banco access tambem, eu tentei montar seguinte comando, só que sem sucesso:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim LR
Dim lngID
Dim a
a = 1
LR = DataGridView1.Rows.Count - 1
Do While a <= LR
lngID = Me.DataGridView1.Rows(a).Cells(1).Value
Dim da As New OleDb.OleDbDataAdapter([Ô]SELECT * FROM estagio WHERE Codigo = [Ô] & lngID, myConnection) [ô], My.Settings.LojaAConnectionString)
[ô] da = [Ô]SELECT * FROM tbLançamentos WHERE Numero = [Ô] & lngID
For Each dr As DataRow In table.Rows
With dr
dr(1) = DataGridView1.Rows(a).Cells(1).Value
dr(2) = DataGridView1.Rows(a).Cells(2).Value
dr(3) = DataGridView1.Rows(a).Cells(3).Value
End With
Next
Loop
End Sub
Alguem sabe como fazer esse update no banco de dados do access usando o datagridview
Venho aqui pedir uma forçinha pra voces no forum,
eu carrego meu datagridview com a seguinte filtro:
Imports System.Data.SqlClient
Public Class Form1
Dim provider As String
Dim dataFile As String
Dim connString As String
Dim myConnection As OleDb.OleDbConnection = New OleDb.OleDbConnection
Dim ds As DataSet = New DataSet
Dim da As OleDb.OleDbDataAdapter
Dim table As New DataTable()
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
provider = [Ô]Provider=Microsoft.ACE.OLEDB.12.0;Data Source =[Ô]
dataFile = [Ô]C:\Users\USER\Desktop\Banco1.accdb[Ô]
connString = provider & dataFile
myConnection.ConnectionString = connString
myConnection.Open()
Dim Data1 As Date
Dim Data2 As Date
Data1 = CDate(MaskedTextBox1.Text)
Data2 = CDate(MaskedTextBox2.Text)
Dim da As New OleDb.OleDbDataAdapter([Ô]select * from estagio where data BETWEEN #[Ô] & Data1 & [Ô]# AND #[Ô] & Data2 & [Ô]# Order by data Asc[Ô], myConnection)
da.Fill(table)
DataGridView1.DataSource = table
[ô]myConnection.Close()
End Sub
Eu modifico meus dados no grid e ao click em um botão ele alterasse no banco access tambem, eu tentei montar seguinte comando, só que sem sucesso:
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim LR
Dim lngID
Dim a
a = 1
LR = DataGridView1.Rows.Count - 1
Do While a <= LR
lngID = Me.DataGridView1.Rows(a).Cells(1).Value
Dim da As New OleDb.OleDbDataAdapter([Ô]SELECT * FROM estagio WHERE Codigo = [Ô] & lngID, myConnection) [ô], My.Settings.LojaAConnectionString)
[ô] da = [Ô]SELECT * FROM tbLançamentos WHERE Numero = [Ô] & lngID
For Each dr As DataRow In table.Rows
With dr
dr(1) = DataGridView1.Rows(a).Cells(1).Value
dr(2) = DataGridView1.Rows(a).Cells(2).Value
dr(3) = DataGridView1.Rows(a).Cells(3).Value
End With
Next
Loop
End Sub
Alguem sabe como fazer esse update no banco de dados do access usando o datagridview
Use o for.
Google tem exemplos de com faz.
Google tem exemplos de com faz.
Obrigado pela atenção OMAR2011, eu tentei procurar no google, achei varios exemplos só que meio confusos para mim, então resolvi montar para aprender observando os que encontrei no google, só que até agora não consegui resolver..
Achou, caso tenha perdido as estribeira vou colocar um lugar para ver como faz.
srsr ainda estou perdido nessa questão OMAR2011, se você fazer esse favor de mostrar o lugar onde mostra como fazer ou algo parecido eu agradeço...
http://social.msdn.microsoft.com/Forums/en-US/5980181e-f666-4f0a-ab50-c4ebecf96f02/datagridview-update-?forum=Vsexpressvb
Basta mudar para comando Oledb
Basta mudar para comando Oledb
Valeu pela dica OMAR2011, consegui fazer ufaaa srsr
Obrigado pela ajuda, até..
Obrigado pela ajuda, até..
Tópico encerrado , respostas não são mais permitidas