UPDATE SQL
Esse é o comando todo
Dim objCon As SqlConnection
objCon = New SqlConnection([Ô]server=localhost;uid=Comercial;pwd=cis123;database=Comercial[Ô])
objCon.Open()
Dim strSQL As String
strSQL = [Ô]update Material set Qtd = Qtd - [Ô] & dgvVenda.SelectedRows.Item(0).Cells(3).Value & [Ô] where CodMaterial=[ô][Ô] & dgvVenda.SelectedRows.Item(0).Cells(1).Value & [Ô][ô][Ô]
Dim objCon As SqlConnection
objCon = New SqlConnection([Ô]server=localhost;uid=Comercial;pwd=cis123;database=Comercial[Ô])
objCon.Open()
Dim strSQL As String
strSQL = [Ô]update Material set Qtd = Qtd - [Ô] & dgvVenda.SelectedRows.Item(0).Cells(3).Value & [Ô] where CodMaterial=[ô][Ô] & dgvVenda.SelectedRows.Item(0).Cells(1).Value & [Ô][ô][Ô]
Era essa linha que estava faltando, agora deu certo
muito obrigada pela ajuda *-*
muito obrigada pela ajuda *-*
Tópico encerrado , respostas não são mais permitidas