MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Exclusão no mysql

    marcelo3092
    marcelo3092
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 232
    Registrado : 19/08/2010

    [Resolvido]Exclusão no mysql Empty [Resolvido]Exclusão no mysql

    Mensagem  marcelo3092 em 17/4/2019, 20:10

    Boa tarde pessoal gostaria de pedir uma ajuda referente a um código para exclusão via mysql pois ela esta incompleta;

    Public Sub Delete_MySQL(sMySQL, FrMy)

    Call Conexao_Open(sMySQL) 'Abre a conexão para a tabela informada

    Dim FormAberto As Form
    Dim Controle As Control

    Set FormAberto = Forms(FrMy)




    rs.Delete
    rs.Close
    cn.Close

    End Sub



    e onde ela é chamada


    Call Delete_MySQL("select * from tblcliente where Cod_Cliente=" & Me.Lista.Column(0), Me.Form.Name)


    Porem não tem nada nela para poder executar sera que alguem pode me da uma mão.
    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 318
    Registrado : 12/01/2015

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  renpv em 9/6/2019, 22:01

    Ao invés de usar todo esse código considere usar apenas o comando a seguir:

    Código:
    DoCmd.RunSQL "DELETE FROM tblcliente WHERE Cod_Cliente =" & Me.Lista.Column(0)

    Espero ter ajudado
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2137
    Registrado : 22/11/2016

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  DamascenoJr. em 17/1/2020, 03:02

    Marcelo, novidade aqui? Se sim, como ficou o código?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    marcelo3092
    marcelo3092
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 232
    Registrado : 19/08/2010

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  marcelo3092 em 21/1/2020, 14:33

    Ola pessoal a chamada para a função ficou,
    Call Delete_MySQL("tblcandidato where idcandidato=" & Me.idCandidato)

    e o código:


    Public Sub Delete_MySQL(Smysql)

    Call Conexao_Open 'Abre a conexão para a tabela informada

    sSQL = (Smysql)
    rs.Open sSQL, cn, adOpenDynamic, adLockOptimistic

    'Dim FormAberto As Form
    'Dim Controle As control

    ' Set FormAberto = Forms(FrMy)


    rs.Delete

    rs.Close
    cn.Close

    Resolvendo o problema
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1028
    Registrado : 13/12/2016

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  Alexandre Fim em 21/1/2020, 16:55

    Marcelo,

    Crie uma procedure no db:
    Código:


    CREATE PROCEDURE sp_ExcluiCliente
    (
       pCodcliente as INT

    )

       DELETE FROM tblcliente WHERE Cod_Cliente = pCodcliente
       
    END




    E no botão de comando vc coloca:

    Código:



    Call Conexao_Open

    sSQL = "CALL sp_ExcluiCliente  " & Me.Lista.Column(0) &""
    cn.Execute sSQL




    Boa sorte.




    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Avelino João
    Avelino João
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 314
    Registrado : 10/03/2012

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  Avelino João em 24/1/2020, 09:46

    Bom Dia!

    No exemplo abaixo tens a melhor forma de trabalhar com MSQL usando classe, a técnica do Mestre Plino Mabesi me ajudou muito a trabalhar com Mysql se dor de cabeça.

    arquivo


    Se ninguem conseguir adaptar o Genesis para gerar já as classes com conexão directa ao MySQL, irei tirar um dia para fazer isso e postar uma nova versão do Genesis em executavel gerar codigo com MySQL.


    .................................................................................
    Proaccess - Angola
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2137
    Registrado : 22/11/2016

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  DamascenoJr. em 24/1/2020, 21:53

    concordo! Procedures e uma classe para conexão com o mysql facilitam muito a vida do desenvolvedor.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    marcelo3092
    marcelo3092
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 232
    Registrado : 19/08/2010

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  marcelo3092 em 25/1/2020, 13:42

    Bom dia Todos e sempre bom melhorar cada vez mais o jeito de programa pra ficar mais instável, gostaria de uma breve explicação sobre essas classes Avelino João ou Damasceno so para saber como funciona e como pode melhorar no sistema.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2137
    Registrado : 22/11/2016

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  DamascenoJr. em 25/1/2020, 16:22

    Veja um exemplo que utiliza classes
    https://www.maximoaccess.com/t35051-gerenciador-de-licencas-online-em-mysql#240092

    Stored Procedures:
    As procedures fazem o trabalho pesado do lado de servidor. Quando comecei a trabalhar com o MySQL, eu tinha uma rotina que salvava um registro e depois buscava o último ID gerado. Me incomodava fazer esses dois serviços. Em um ambiente com uns 50 ou 100 usuários o risco de pegar o ID incorreto era grande. Com uma Stored Procedure posso fazer esse salvamento, e na mesma operação de conexão já retornar com o ID gerado para o registro. E isso é uma utilidade bem simples. Poderiam ser feitas outras operações: como ao comprar um determinado produto já registrar a baixa no estoque, isso tudo numa operação de conexão só.

    Classes
    Assim que comecei a estudar VBA no Youtube - uma playlist do Plínio Mabesi, uma das coisas que ele sempre falava era da importância da indentação para organização e leitura do código. Daí em diante sempre prezei pela organização da escrita do código. Depois, quando me propus a aprender a programar utilizando classes, vi que poderia atingir um nível de organização ainda maior (onde além da escrita, poderia organizar também como e onde o código funcionaria).

    Antes, sem classes, nas linhas de execução do clique de um botão salvar eu preparava os dados, abria uma conexão, executava uma operação de salvamento dos dados, e fechava a conexão. Tudo em um só local. Imagine isso para cada botão salvar do seu projeto. Imagine o trabalho que daria fazer manutenção nas operações de salvamento de todos os botões.

    Agora, com classes, nas linhas de execução do clique de um botão salvar eu controlo a captura dos dados, tenho um local adequado para tratar os dados, tenho um local também para abrir a conexão e salvar os dados tratados. Resisti muito antes para utilizar classes, me parecia trabalho dobrado. Mas o nível de organização que obtenho com o uso de classes faz valer a pena.

    Para além da organização, descobri a vantagem da fácil manutenção assim como da reutilização do código de forma facilitada em outros projetos.

    Segue links para estudo do uso classes
    youtube.com/watch?v=KlIL63MeyMY
    usandoaccess.com.br/tutoriais/utilizando-classe-no-access-introducao.asp?id=1


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Avelino João
    Avelino João
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 314
    Registrado : 10/03/2012

    [Resolvido]Exclusão no mysql Empty Re: [Resolvido]Exclusão no mysql

    Mensagem  Avelino João em 25/1/2020, 18:27

    Prezados Boa Noite,


    Segue o link da aula de classe no site do Mestre Avelino Sampaio
    Aula Sobre classe


    Outro Exemplo


    Arquivo que me ajudou aprender muito sobre stored procedure.
    Exemplo é com SQL Server pode ser adaptado para Mysql.
    Anexos
    [Resolvido]Exclusão no mysql AttachmentRio2012.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (492 Kb) Baixado 3 vez(es)


    .................................................................................
    Proaccess - Angola

      Data/hora atual: 10/8/2020, 06:47