on (release) { loadVariablesNum("http://www.jbctour.com.br/teste/duv.asp", 0, "POST"); } <% Dim iMail, Nome, Email, Assunto, Mensagem Nome = Request.form("dnome") Email = Request.form("dmail") Mensagem = Request.form("dmessa") meu_email = "eddota@hotmail.com" Assunto = Request.form("dassu") corpo = "Nome:" & Nome & "<BR>" corpo = corpo & "E-mail:" & Email & "<BR>" corpo = corpo & "Mensagem:" & Mensagem & "<BR>" Set iMail = server.CreateObject("CDONTS.NewMail") iMail.From = email iMail.To = meu_email iMail.Subject = Assunto iMail.MailFormat = 0 iMail.BodyFormat = 0 iMail.Body = corpo iMail.Send %>
Vejam se descobrem onde esta o erro, pois esta dificil de funcionar...