ATUALIZAR TABELAS VIA COMANDO SQL
                    Tenho duas Tabelas BaixaPed e Produtos, as duas tem um campo numerico chapado Estoque, outro Cod.
Alguem Sabe se é possivel atualizar o campo Estoque da tabela BaixaPed com os dados do campo estoque da tabela Produto, quando o Campo Cod das duas forem iguais.
Por codigo ADO eu sei, mas queria fazer por sql que mais rapido!
                
            Alguem Sabe se é possivel atualizar o campo Estoque da tabela BaixaPed com os dados do campo estoque da tabela Produto, quando o Campo Cod das duas forem iguais.
Por codigo ADO eu sei, mas queria fazer por sql que mais rapido!
                    O ADO executa um código SQL.
Faça constraint na sua base de dados (Atualização em cascata)
                
            Faça constraint na sua base de dados (Atualização em cascata)
                    Seria assim:
dim sSql as string
sSql="UPDATE BAIXAPED SET ESTOQUE=(SELECT ESTOQUE FROM PRODUTO P WHERE P.COD = BAIXAPED.COD)"
                
            dim sSql as string
sSql="UPDATE BAIXAPED SET ESTOQUE=(SELECT ESTOQUE FROM PRODUTO P WHERE P.COD = BAIXAPED.COD)"
                    Da erro FRAU:
"A Operação Deve Usar uma Consulta Atualizavel"
                
            "A Operação Deve Usar uma Consulta Atualizavel"
                    E ai alguem sabe?
                
            
                    qual erro que da?
                
            
                    A instrução ta assim:
SQL = "UPDATE BaixaPed SET BaixaPed.Estoque =(SELECT Produto.Estoque FROM Produto WHERE Produto.COD = BaixaPed.Cprod)"
mconn.Execute SQL
e o erro é:
Run-timer error '-2147467259(80004005)
A Operação Deve Usar uma Consulta Atualizavel.
                
            SQL = "UPDATE BaixaPed SET BaixaPed.Estoque =(SELECT Produto.Estoque FROM Produto WHERE Produto.COD = BaixaPed.Cprod)"
mconn.Execute SQL
e o erro é:
Run-timer error '-2147467259(80004005)
A Operação Deve Usar uma Consulta Atualizavel.
                    tenta assim:
SQL = "UPDATE BaixaPed SET BaixaPed.Estoque =(SELECT Produto.Estoque FROM Produto,BaixaPed WHERE Produto.COD = BaixaPed.Cprod)"
mconn.Execute SQL
                
            SQL = "UPDATE BaixaPed SET BaixaPed.Estoque =(SELECT Produto.Estoque FROM Produto,BaixaPed WHERE Produto.COD = BaixaPed.Cprod)"
mconn.Execute SQL
                    Deu o Mesmo ERRO!!!!!!
                
            
                    Eai tem outra ideia
                
            
                    Cascata
                
            
                        Tópico encerrado , respostas não são mais permitidas