[Resolvido]Exclusão no mysql

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.

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

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

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

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.

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.

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

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.

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

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.