ActiveDelphi

[lucasferreto]

Olá a todos!!

É o seguinte, estou criando uma aplicação que vai enviar e-mails para uma lista de e-mails cadastrados no sistema, no qual utiliza o banco Firebird, porém, além de ser possível cadastrar os e-mails pelo sistema, também preciso pegar os e-mails do banco de dados de um site, que utiliza MySQL e inserir esses e-mails na tabela de e-mails do banco Firebird. A estrutura da tabela de e-mails do Firebird é bem simples, apenas um campo ID (integer) e um campo EMAIL(varchar).

Sei que preciso de dois FDConnections, cada um conectado em um banco de dados, mas como posso fazer para passar a informação do banco MySQL para o banco Firebird? E como fazer para evitar duplicações (transferir somente os e-mails que não existam no Firebird)? Grato a todos.

[imex]

Boa tarde,

Seguindo o seu raciocínio inicial, você poderia utilizar uma consulta simples ligada a um dos FDConnections para ler os e-mails que estão no banco de dados MySQL. Seria necessário um looping para ler cada registro retornado para passar o e-mail como parâmetro para um Insert no Firebird que teria uma clausula Where para evitar as duplicações. Ex: