VENDIDOS
Nessa linha amarela dá o erro?
antes de fazer essa alteração tava dando erro nesta linha:
rs.Close
Set Rs = Notthing
rs.Close
Set Rs = Notthing
Resolvido
so falta colocar isso
dim conex as new adodb.connection
dim rs as new adodb.recordset
Obrigado a todos
Outra Duvida pra terminar esse topico[txt-color=#e80000] [/txt-color]
como faço para saber os produtos q foi vendidos no dia de hoje ? e apois isso apagar todos ?
so falta colocar isso
dim conex as new adodb.connection
dim rs as new adodb.recordset
Obrigado a todos
Outra Duvida pra terminar esse topico[txt-color=#e80000] [/txt-color]
como faço para saber os produtos q foi vendidos no dia de hoje ? e apois isso apagar todos ?
E se vc por
conex.close?
vc pode criar uma tabela temporaria e ir armazenando.... isso se vc não tiver na sua tabela vendidos a data da venda
não teho mas vou criar um campo Data em [Ô]Vendidos[Ô]
como faço para quando ultrapassar essa data , deletar tudo da tabela vendido?
como faço para quando ultrapassar essa data , deletar tudo da tabela vendido?
A Sql ficaria assim
Delete * From Vendidos Where DataVenda > #[Ô] & Format(txtDataReferência, [Ô]MM/DD/YYYY[Ô]) & [Ô]# [ô] essa configuração de data vai de acordo com o banco q usa
caraca, sem querer criticar, refaz este código, ele cai bem uns 50%..........e ta sem tratamento nenhum, vai dar pau direto..
Tópico encerrado , respostas não são mais permitidas