Como salvar registros de email quando a internet cai?

por **camis** em 5/1/2011, 07:41

Bom dia, olha eu aqui de novo!!

Bom a situação é a seguinte: Tenho uma programação aqui que envia email, só q a internet é 3G, então ela sempre cai, ai queria saber como faço pra salavar os registros que foram enviados antes da internet cair, e depois quando o usuário entrar novamente na tela ela esteja carregada com os emails q não foram enviadas por causa da queda da internet!!
Alguém conseguiu entender?

Já tenho boa parte do código feita, mas falta essa parte de salvar quando a net cair, da maneira como estou fazendo só da certo quando clico no ESC para interromper o envio de email! ¬¬

Se alguém puder me ajudar ficarei mto agradecida!

Origada pela atenção!!

por **Marcos Guedes** em 5/1/2011, 07:52

Talvez não seja a melhor solução, mas você poderia criar uma tabela temporária.

Após confirmado o envio do email, você registra nesta tabela o email de destino.

Então poderás enviar emails a partir de um SELECT que consulta os emails ainda não enviados.

por **camis** em 5/1/2011, 08:16

Então eu criei uma tabela onde é salvo somente u ultimo email enviado, mas a programação não está dando certo quando a internet cai!
Na programação e pra ser salvo somente os emails q foram enviados, mas não está acontecendo isso...
Está sendo salvo todos os emails selecionado, quando cai a internet Sad

por **Marcos Guedes** em 5/1/2011, 10:08

como estais fazendo?

por **camis** em 5/1/2011, 10:17

Então marcos é assim:
A progrmação de enviar email já existe, já foi feita por outra pessoa!
O q eu fiz foi criar uma tabela para q fosse salvo somente o ultimo registro valido, ou seja salvar somente o ultimo email enviado, isso está sendo feito,
mas ai quando faço teste com a interrupção da minha internet os emails q não estão sendo enviados estão sendo salvos tbm, mas smente o ultimo.

A rotina de salvar estou fazendo dentro do evento click do botão q vai enviar o email...

por **Marcos Guedes** em 5/1/2011, 10:22

Isto entendi, mas para saber onde está o problema, precisamos ver como estais fazendo o código.

por **camis** em 5/1/2011, 10:29

tah vou te mandar então...
cm faço pra colocar um arquivo aqui?

por **Marcos Guedes** em 5/1/2011, 10:31

camis escreveu:tah vou te mandar então...
cm faço pra colocar um arquivo aqui?

Veja este tópico:
[Você precisa estar registrado e conectado para ver este link.]

No seguinte link você encontrará informações que poderão ajudá-la a utilizar melhor o site:
[Você precisa estar registrado e conectado para ver este link.]

por **camis** em 5/1/2011, 10:36

Veja se vc consegue vizualizar algo!
- Clique aqui para baixar o arquivo!

por **Marcos Guedes** em 5/1/2011, 14:13

Baixe o arquivo que você me enviou e tente abri-lo e você verá os arquivos que estão faltando.

Para tentarmos ajudá-la, basta você postar trecho do código que está utilizando.

por **camis** em 5/1/2011, 14:37

ah tah ok..

por **camis** em 5/1/2011, 14:41

Eh q eu to achando um pouco dificil de te explicar viu?!
E as rotinas são do emu trabalho então fica complicado de te mandar..
Sad

por **camis** em 5/1/2011, 14:50

Marcos vc fica aqui no fórum a noite tbm?
ai faço um exemplo na minha casa e te mando!!
Pode ser....eh q aqui no trampo to um pouco enrolada, ai não dá pra te mostrar bem...
ai mais tarde te mostro pode ser?

Mto obrigada!!

por **Marcos Guedes** em 6/1/2011, 07:37

camis, não precisas mandar o código que estais desenvolvendo no trabalho.
Apenas algo do tipo:

m.retornoEmailEnviado = funcaoEnviaEmail()

Código:: IF (m.retornoEmailEnviado) THEN registraNaTabelaEmailEnviado(m.emailDestino) ELSE *!* Não faz nada ENDIF

por **alceu11** em 6/1/2011, 09:24

No codigo do Marcos
vou colocar um campo logico = .f. caso o emial nao enviou sera falso
sendo assin no else gravaria .f.
assim vc saberia quias os email nao foram enviando ainda
a unica coisa que queria que criar um camplo logico na sua tabela envio como tipo logoico.
***********
Se vc nao quise um campo logico crie um campo caracter de 3 envio c(3)
E grave Nao no envio no elxe que o marcos coloco no codigo
no Else
select suatabelaemail
replace envio with 'NAO'
******

m.retornoEmailEnviado = funcaoEnviaEmail()

Código:: IF (m.retornoEmailEnviado) THEN registraNaTabelaEmailEnviado(m.emailDestino) Selecione suaTabelaEmail replace Suatabela.envio with .T. ELSE * Não envio grava como falso ,,,,,,,envio é um campo na sua Selecione suaTabelaEmail replace SuatabelaEmail.envio with .F. ENDIF

Como salvar registros de email quando a internet cai?

Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?

Re: Como salvar registros de email quando a internet cai?