Como eu faço para selecionara apenas os registros que tenham um certo código de pedido e alterar apenas um campo destes registros?
Estou utilizando o seguinte cógio mas está dizendo que a tabela Pedcompras_chapas não existe!

Dim db As Database
Dim rs As Recordset
Dim Selped As QueryDef

Set db = area.OpenDatabase(App.Path & "martam.mdb")
Set Selped = db.CreateQueryDef("")
Selped.SQL = "select * from Pedcompras_chapas where codped = txtnped"
Set rs = Selped.OpenRecordset()

Do Until rs.EOF
   rs.Edit
   rs("valtotped") = TxtValorPed.Text
   rs.Update
   rs.MoveNext
Loop
Desde já agredeço ! Obrigada

Nào teria de ser assim????

Selped.SQL = "select * from Pedcompras_chapas where codped =" & txtnped

 

Se n, v c assim resolve para vc???

SQLSTR = "Update pedcompras_chapa Set valtotped = '" & txtvaltotpe & "' where codped=" & txtnped

db.Execute (SQLSTR)

 

 

vc tem toda razão amigo! Eu já tinha resolvido o erro ! obrigada