DELETAR FILTROS

USUARIO.EXCLUIDOS 15/09/2005 09:59:51
#104323
Blz

Com eu faço para deletar os registros filtrados.

Ex. Eu filtro o Cargo tal e quero deletar so eles, deletar todos de uma fez so.

A parte de filtrar não e problemas.

Grato.
USUARIO.EXCLUIDOS 15/09/2005 10:07:52
#104327 Resposta escolhida
WESBTER

Simples.

Após a consulta, ira retornar os dados no recordset correto.

Agora é só vc implementar em um loop.


While objRSFiltro.EOF = False
          ConnBD.Execute ("DELETE FROM TABELA WHERE REGISTRO = '" & objRSFiltro(0) & "'")
          objRSFiltro.Movenext
    Wend
    objRSFiltro.Close
    Set objRSFiltro = Nothing


Espero ter Ajudado
USUARIO.EXCLUIDOS 15/09/2005 10:13:06
#104330
No caso eu estou usando do DataGrid para filtrar os dados.

Esses dados são retornados nesse DataGrid, muda alguma coisa ou não?

E so fazer o botão e executar?
USUARIO.EXCLUIDOS 15/09/2005 10:27:54
#104332
é so vc efetuar o loop no proprio recordset que carregou o grid.

Pois o grid vai te exibir os dados mas o recordset vai ficar em aberto.

Completando então o codigo anterior.


'Movendo o recordset para o primeiro registro
objRSFiltro.first
While objRSFiltro.EOF = False
          ConnBD.Execute ("DELETE FROM TABELA WHERE REGISTRO = '" & objRSFiltro("NOME_DA_COLUNA") & "'")
          objRSFiltro.Movenext
    Wend
    objRSFiltro.Close
    Set objRSFiltro = Nothing


Acho que isso já resolve o seu problema.
LIONHEART 15/09/2005 13:01:16
#104370
depois vc dá um refresh
Tópico encerrado , respostas não são mais permitidas
Voltar