[Resolvido]Deletar linhas de registro de um Formulário por um botão de outro Formulário.

Pessoal, to com mais uma dúvida mas essa é simples.

Eu tenho um formulario "FCadastro" com o "cod_produto" e "descricao_produto", que ao quando coloco dados no campo cod_produto e clico em salvar, ele adiciona de 3 ou mais linhas de dados no outro Formulário "FVendas" que é so para consulta...

Então queria que ao exlcuir o cod_produto ele também excluisse as linhas que foi adicionado no outro formulário "FVEndas" pelo cod_produto do primeira formulário "FCadastro"

Ai eu fiz o seguinte código, mas está dando ERRO de sintaxe no primeiro "DELETE" dentro do WHILE, e o último DELETE, que delete a linha do fomulario "FCadastro" funciona normal...

Private Sub btnExlcuirRegistro_Click()
Dim Sql As String
Dim rs As Recordset

Set Database = CurrentDb

Let Sql = "SELECT * FROM Tab_GV"
Set rs = Banco.OpenRecordset(Sql)
rs.MoveFirst

'Faça enquanto o record set percorrer todas as linhas
Do While rs.EOF = False
Let Sql = "DELETE * FROM Tab_GV WHERE cod_produto = " & Me.cod_produto
Banco.Execute Sql
rs.MoveNext
Loop

'Excluindo o dado da tabela cadastro
Sql = "DELETE * FROM Tab_Cadastro_Produto_Beneficiamento WHERE ID = " & Me.ID
CurrentDb.Execute Sql
MsgBox ("O Registro foi Excluido com Sucesso!"), vbInformation, "Exclusão"


Por favor se vocês puderem me ajudar, agradeceria muito.

Esse Erro pelo jeito do cod_produto...

Let Sql = "DELETE * FROM Tab_GV WHERE cod_produto = " & Me.cod_produto

Queria deleter todas as linhas da tabela Tab_GV quando o cod_produto desta tabela for igual aos dados digitado na caiax de texto cod_produto


o segundo formulário de consulta "FVendas", tem os campos da "Tab_GV"
o primeiro formulário de cadastro "FCadastro" , tem os campos da "Tab_Cadastro_Produto_Beneficiamento"

Caio

Verifique se o cod_produto da tabela Tab_GV é numérico ou texto.

Desconfio que seja texto, dai o erro de sintaxe, pois deveria estar

entre aspas simples.

[ ]'s

Caramba noobezinho, é isso mesmo

Matou ...

Cara muito Obrigado mesmo, Abençoado seja ti...

Deu tudo certo aqui

Muito obriagado pela atenção e por toda ajuda.

Deus te abençoe.

Que bom que pude ajudar

Valeu o retorno!

Boa sorte!