DELETAR VARIOS REGISTRO VB

STEWARTCINTRA 17/05/2010 11:39:53
#341938
Ola galera, tenho um programa de restaurante, ai quando o cara fecha a conta, eu preciso deletar da tabela Comandas todos os registro que possuam Mesa = 001 exemplo, como fazer isso??

Uso vb6 com acess 2003
MSMJUDAS 17/05/2010 11:58:29
#341941
DELETE FROM COMANDAS WHERE MESA = 1


OU


DELETE FROM COMANDAS WHERE MESA = [ô]001[ô] (Se estiver como string)
STEWARTCINTRA 17/05/2010 18:40:29
#341989
Citação:

:
DELETE FROM COMANDAS WHERE MESA = 1


OU


DELETE FROM COMANDAS WHERE MESA = [ô]001[ô] (Se estiver como string)



ate aii tudo bemm, mas eh que no banco tenho varios registros de Mesa = 001 entende? ai precisava deletar todos, precisa que ele deletasse enquanto tiver algum registro com mesa = 001..

acredito que seja usando alguma instrucao do tipo Do while ou FOR mas naum sei como fazer..

por favor me ajudem
MICROSCHEME 17/05/2010 18:57:34
#341990

Cara.

A query que o msmjudas te passou vai deletar exatamente todos os registros das comandas para a mesa = 1 se no banco mesa for dado numérico
e/ou para mesa = [Ô]001[Ô] se no banco mesa for dado tipo string sem a necessidade de nenhum tipo de loop

Vai deletar todas

. . .
STEWARTCINTRA 17/05/2010 19:13:44
#341991
DESCOBRI GALERA, FICA AQUI CASO ALGUEM PRECISE DISSO TBM ALGUM DIA

Busca = [Ô]SELECT * FROM Comandas WHERE Mesa LIKE [ô]%[Ô] & frmInfoMesas.lblNumMesax.Caption & [Ô]%[ô][Ô]
CON.Execute (Busca)

NumRegistros = RS.RecordCount

For i = 1 To NumRegistros

SQLDEL = [Ô]DELETE FROM Comandas WHERE Mesa = [ô][Ô] & frmInfoMesas.lblNumMesax.Caption & [Ô][ô][Ô]
CON.Execute (SQLDEL)

Next i
Tópico encerrado , respostas não são mais permitidas
Voltar