(Resolvido) Dúvida com envio de email !

jow · Abril 4, 2008

Bom dia estou desenvolvendo um sistema de agenda, tenho um cadastro de compromissos onde é possivel convidar um ou mais usuários do sistema, gostaria de saber como faço para enviar este convite para o email da pessoa convidada ...

Por favor se poderem me indicar um tutorial ou um script ... ficarei grato pela ajuda, é que estou precisando urgente !!!

Editado Abril 4, 2008 por jow

Thiago Airold Perez · Abril 4, 2008

Primeiramente você precisa saber qual componente é usado para enviar e-mail. Esta informação você consegue com o servidor que esta hospedado.

Segundo passo é montar o html do que você quer enviar e colocar em uma variavel todo o html.

Feito isto você pode estar inserindo o envio logo após inserir os compromissos no banco de dados.

Inseriu no banco você faz um select do banco de todos os usúários que foram enviado o compromisso e faz um while para enviar os e-mails.

Espero ter ajudado, caso você já tenha feito algo e precise de mais ajuda posta o que já foi feito para ser mais facil te ajudar.

jow · Abril 4, 2008

então cara, eu quero usar localmente no meu IIS estou usando o CDONTS ... eu um tutorial eu vi q tem q baixar uma DLL e salvar na pasta SYSTEM 32 e EXECUTAR ela, esse é o tutorial:

http://forum.plugmasters.com.br/lofiversio....php/t7850.html

meu código o mesmo do tutorial ...

<html>
<body>
<form method="POST" action="cdonts.asp">
<table border="0" width="43%">
<tr>
<td width="13%"><strong>Para:</strong></td>
<td width="87%"><input type="text" name="to" size="32"></td>
</tr>
<tr>
<td width="13%"><strong>Assunto:</strong></td>
<td width="87%"><input type="text" name="subject" size="32"></td>
</tr>
<tr>
<td width="13%"><strong>Mensagem:</strong></td>
<td width="87%"><textarea rows="7" name="body" cols="43"></textarea></td>
</tr>
<tr>
<td width="13%"></td>
<td width="87%"><input type="submit" value="enviar" name="botao"></td>
</tr>
</table>
</form>
</body>
</html>

cdonts.asp

<%
if request("botao") = "enviar" then
Dim objNewMail
Set objNewMail = Server.CreateObject("CDONTS.NewMail")
objNewMail.From = "capitaojack00@gmail.com"
objNewMail.To = request("to")
objNewMail.Subject = request("subject")
objNewMail.Body = request("body")
e=objNewMail.Send

if e then
Response.Write "Mensagem não enviada"
else
Response.Write "Mensagem enviada com sucesso"
end if
response.end
end if
%>

Entrar

(Resolvido) Dúvida com envio de email !

Pergunta

jow

Link para o comentário

Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

Thiago Airold Perez

Link para o comentário

Compartilhar em outros sites

jow

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades