Aspemail

[Zero_Call]

Galera, estou com um problema, nunka mexi com asp e um cliente meu quer que eu desenvolva um formulário do flash que faça o envio através do ASPEmail, eu até fiz, mais não funciona, já contatei meu provedor e ele me disse que a ferramente ASPEMAIL está instalada no servidor...

Eu já desenvolvi o formulário onde o botão enviar chama um arquivo chamado "email_Persits.asp"

http://www.cineliterario.com.br/nucleutecnologia

Esse Arquivo contém o seguinte código:

<%

Dim Mail

Dim msgTxt

Set Mail = Server.CreateObject("Persits.MailSender")

Mail.Host = "smtp.meudominio.com.br"

Mail.Port = "25"

Mail.From = "eu@meudominio.com.br"

Mail.FromName = "Remetente"

Mail.Subject = "Assunto"

Mail.AddAddress request.form("email@destinatario.com.br"),"Nome_destinatario"

Mail.Subject = "Assunto"

msgTxt = Request("nome") & vbCrLf

msgTxt = msgTxt & "Enviou um e-mail com os seguintes dados:" & vbCrLf & vbCrLf

msgTxt = msgTxt & "Nome: " & Request("nome") & vbCrLf

msgTxt = msgTxt & "E-mail: " & Request("email") & vbCrLf

msgTxt = msgTxt & "DDD: " & Request("ddd") & vbCrLf

msgTxt = msgTxt & "Telefone: " & Request("telefone") & vbCrLf

msgTxt = msgTxt & "Mensagem: " & Request("message")

Mail.Body = msgTxt

On Error Resume Next

Mail.Send

If Err <> 0 Then

Response.Write "Error encountered: " & Err.Description

End If

Response.Write("true")

%>

Alguém pode me ajudar???

Obrigado _ZERO_CALL_

[fantasma]

dar alguma mensagem de erro?

O problema pode estar no flash