Recuperando Dados

[neo]

:(

Galera como posso fazer pra enviar um email atraves de um formulario e ao mesmo tempo postar os dados no banco. já sei como fazer o insert mas não estou conseguindo mandar os dados por email.

No form vai ter os seguintes campos.

Nome

Telefone

Email

Mensagem

Quando o cliente fazer o cadastro automaticamente vai receber um email de boas vindas.

O codigo que estou usando pra inserir e o seguinte.

<%
Option Explicit
Response.Expires = 0
Dim objConn, objRs, strQuery, strConnection, nome, telefone, email, mensagem
nome = Request.Form("nome")
telefone = Request.Form("telefone")
email = Request.Form("email")
mensagem = Request.Form("mensagem")
Set objConn =  Server.CreateObject("ADODB.Connection")
objConn.Open "DBQ=" & Server.MapPath("\julliano\db\contato.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password"
strQuery = "INSERT INTO contato (nome,telefone,email,mensagem) VALUES ('"&nome&"','"&telefone&"','"&email&"','"&mensagem&"')"
On error Resume Next
Set ObjRs = objConn.Execute(strQuery)
objConn.close
Set objRs = Nothing
Set objConn = Nothing
if err = 0 Then
    response.redirect "sucesso.asp"
end if
%>

[pgmador]

Você precisa saber qual é o componente que o seu servidor usa.

Pode ser CDONTS, ASPMAIL, etc...

Pergunte para eles, e peça para eles enviarem um exemplo, que eles fazem isto pra voce.

[]´s

Nelson Soares

[neo]

Vou utilizar o JMail.message.