Trabalhando Com Cdonts

Bom galéra....
este é meu primeiro tuto no web fórum.
Resolví apresentar um material completo de como baixar, instalar e utilizar este componente.

Muito bem.. vamos lá...

Pra quem não conhece, o CDONTS é um componente para envio de e-mail. Destaca-se pela facilidade de trabalhar e por não precisar usar servidor SMTP.

Para baixar o CDONTS, é só acessar http://www.wmonline....ria=componentes

A instalação é muito simples. Depois de baixar a .dll você deve copiar ela pra dentro da pasta system32, dentro do diretório do windows (C: \windows\system32).
Agora você precisa registrar a dll. Para fazer isso vá em Iniciar > Executar e digite "RegSvr32 cdonts.dll" sem aspas. Deverá aparecer a mensagem "DllRegisterServer em cdonts.dll teve êxito.". Prontinhu... você já tem o CDONTS em seu computador.

Agora vamos aprender a utilizá-lo. Vamos ter que criar um formulário e a página de envio.

form.htm

<html>
<head>
<title>Formulário</title>
</head>

<body>

<form name="sendmail" method="post" action="enviar.asp">
	Nome: <input type="text" name="nome"><br>
	E-mail:<input type="text" name="email"><br>
	Mensagem:<textarea name="mensagem"></textarea><br>
	<input type="submit" value="Enviar">
</form>

</body>
</html>

Nosso formulário está pronto. Agora vamos fazer enviar a mensagem.

enviar.asp

<html>
<head>
<title>Confirmação</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<%
	nome = request.Form("nome") 'resgata o nome'
	email = request.Form("email") 'resgata o email'
	mensagem = request.Form("mensagem") 'resgata a mensagem'
	
	Set objeto = Server.CreateObject("CDONTS.NewMail") 'cria o objeto'
	objeto.From = request("email") 'Email de quem envia a mensagem. Neste caso o email digitado no formulario'
	objeto.To = "seunome@provedor.com.br" 'Emeil que vai receber a mensagem'
	objeto.Subject = "Assunto" 'assunto da mensagem'
	objeto.Bodyformat = 0 'faz com que o cdonts envie conteudo html'
	objeto.MailFormat = 0 'faz com que o cdonts envie conteudo html'
	objeto.Body = "Olá <b>seu nome</b>!<br><b>"& nome &"</b> enviou uma mensagem para você!<br><br>Mensagem: "& mensagem &""
	objeto.Send 'envia a mensagem'
	Set objeto = Nothing 'finaliza o objeto'
%>
<div align="center">Mensagem enviada com sucesso!</div>
</body>
</html>

é issu aí galéra!
Espero que isto possa ajudar quem deseja comessar a trabalhar com este componente.

flw (y)

----------------------
Para uma maior organização desta seção, todas as duvidas relacionadas a este tutorial devem ser tiradas na seguinte sala:-
http://forum.wmonlin...p?showforum=113

Edição feita por: Agente Linhares, 20/03/2006, 16:43.

#1 gUiTaR_mAn

2 user(s) are reading this topic

Trabalhando Com Cdonts

#1 gUiTaR_mAn

2 user(s) are reading this topic

Entrar