1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Fazer um DELETE da BD utilizando vb6

Discussão em 'Programação' iniciada por leinad, 15 de Março de 2007. (Respostas: 2; Visualizações: 1511)

  1. leinad

    leinad Power Member

    Não estou a conseguir fazer um delete de alguns registos da BD (em acess), utilizando o vb6, com o DAO 3.51...

    De seguida mostro como eu tou fazendo os meus Selects....




    Dim TabVirtValores_Recibs As Recordset
    Dim SQLvalor_docs As String



    SQLvalor_docs = "select F.valor_documento " & _
    "from Factura as F " & _
    "where F.id_cliente=" & CCur(lblCodCli.Caption)

    Set TabVirtValores_docs = BaseDeDados.OpenRecordset(SQLvalor_docs, dbOpenDynaset)



    o que é k terei k alterar, na sintaxe para em vez de Select'ss fazer Delete's?
     
  2. HecKel

    HecKel The WORM

    Queres alterar o select para delete?

    Primeiro vê isto: http://www.w3schools.com/sql/sql_delete.asp

    Depois vê se isto te ajuda:
    Código:
    "DELETE FROM Factura where Factura.id_cliente=" & CCur(lblCodCli.Caption)
    O Delete remove uma LINHA da tabela, portanto não vais ter a selecção de campos, apenas a(s) tabela(s) e a(s) condição(ões).

    abraços, HecKel
     
  3. leinad

    leinad Power Member

    o delete tá feito:
    "Delete From facturas_servicos Where id_factura=3"

    a minha dificuldade é saber a sintaxe (em VB)... para executar o delete...


    o que eu necessitade de saber era:

    SQLDELFact_Serv = "Delete From facturas_servicos Where id_factura=3"

    BaseDeDados.Execute SQLDELFact_Serv, dbSQLPassThrough


    valeu a força!! HecKel, obrigado na mesma...
     
    Última edição: 15 de Março de 2007

Partilhar esta Página