(Resolvido) Executar Um Código De Exclusão No Sql

[Guest Carlo Castor]

Pessoal,

Tenho a seguinte exclusão SQL para executar:

delete from emprestimo where cod_emprestimo = :txt_cod_emprestimo

O :txt_cod_emprestimo é um parâmetro passada pelo usuário.

Como eu faço isto utilizando VBA?

Obrigado,

Carlo.

[Elber Carretoni]

Carlo...

dê uma olhada no código docmd.RunSQL...

acho que isso já resolve seu problema...

abraços,

[MrMALJ]

Realmente Elber o docmd.runsql resolve, mais vou deixar uma outra forma dai basta escolher o metodo....

Dim sql As String

sql = "delete * from SuaTabela" & " where NomeDoCampo '" & Me.[txt_cod_emprestimo].text

Me.[seuSubForm].form.recordsource = sql

Carlo independente de qual metodo tenha utilizado dê um retorno pra nós!

[Carlo Castor]

Pessoal, obrigado pela ajuda...

Eu tentei a primeira opção utilizando o comando DoCmd.RunSQL desta forma e deu certo.

DoCmd.RunSQL ("Delete from emprestimo where cod_emprestimo = " & txt_Cod_Emprestimo.Value)

Valeu mesmo.

Abraços.

Realmente Elber o docmd.runsql resolve, mais vou deixar uma outra forma dai basta escolher o metodo....

Dim sql As String

sql = "delete * from SuaTabela" & " where NomeDoCampo '" & Me.[txt_cod_emprestimo].text

Me.[seuSubForm].form.recordsource = sql

Carlo independente de qual metodo tenha utilizado dê um retorno pra nós!

[Elber Carretoni]

MrMalj!! vlw pela segunda opção...me deu uma idéia ótima!!

gracias...

[Elber Carretoni]

mr malj...

estava fazendo os testes aqui com a segunda opção que você deu, mas não consigui enviar o parâmetro sql para a tabela...

você tem certeza que esta certo?

me dê um luz aí amigão...rsrs...to precisando dessa parada faz tempo...

abração!