Logica para aspemail / mailing

[Diego Ronan 1]

pessoal pensei em fazer algo do tipo

 

<%call abre_conotSet rsdados  = server.createobject ("ADODB.Recordset")if request.QueryString("codigo") = "" then	sql = "select * from usuarios where atualizacoes='Sim'"else	sql = "select * from usuarios where atualizacoes='Sim' and codigo >="&request.QueryString("codigo")end ifSet rsdados = conot.execute(sql)If rsdados.EOF then 	Response.Write "Não há usuários com atualizações aceitas"elseServer.ScriptTimeout = 1000000emails = 0while not rsdados.eof		strHost = "mail.brinkster.com"		Set Mail = Server.CreateObject("Persits.MailSender")		Mail.Username = "admin@ipodclub.com.br"		Mail.Password = "XXXXXXXXXXXXX"   		Mail.Host = strHost   		Mail.From = "admin@ipodclub.com.br"		Mail.FromName = "iPodClub.com.br"    		Mail.AddAddress rsdados("email")		'Mail.AddAddress "dronan@terra.com.br"		Mail.IsHTML = True   		Mail.Subject = request.form("assunto")   		Mail.Body = request.form("mensagem")   		strErr = ""   		bSuccess = False   		Mail.Send ' send message	Response.Write "E-mail enviado para : " & rsdados("email") & "<br>"	rsdados.movenext	emails = emails + 1if emails = 50 then	response.Redirect "envia_atualizacoes.asp?codigo="&rsdados("codigo")end ifwendend ifrsdados.closecall fecha_conot%>E-mail's enviados com sucesso!

Resumindo .. ele vai puxa do banco de dados, e manda os emails, a variavel somou 50, ele joga o codigo no qual parou num redirect pra mesma pagina e refaz o envio a partir do codigo, somou mais 50, armazena dinovo e reefaz o envio....

 

Duvida: Da certo?!

 

Assim não tenho problemas de fica expirando por muitos registos certo?!

 

Verifiquei tambem que as vezes da uns problemas que faz com que nao autentique a conta junto ao server, como posso contornar para algo como "se nao conectou, da um refresh e selecione a partir de tal registro que deu o erro"?!

 

conto com vcs :)

[Salgado 4]

Ao invéz de utilizar o redirect em ASP utilize por JS, é mais garantido de não haver estouro por tempo limite.

[Diego Ronan 1]

Pessoas...Esqueci de um detalheTeria que adicionar tambem um input type hidden com o mesmo nome do campo que esta puxando do form certo? Senão qdo der o refresh, ele vai mandar o corpo da msg em branco... correto?Esse codigo não pode ter erro que tem 300 emails reais de cobaia que num posso mandar uns 10 teste pra todos :P

[Alexandre B. 0]

Faz um teste com uma base de dados Access e seus e-mails ;D