Formulario ASP, No funciona

[360]

Hola amigos:

He conseguido un ASP ( el codigo) junto con un FLA y bueno lo he insertado en mi website pero al momento de se llenan los campos del formulario y se envian estos no proceden, quisiera saber si para que funcione bien el ASP tengo que tener mi propio dominio y un servidor, ya que tengo mi pagina hospedada en un hosting gratuitoy bueno quisiera que los mails del formulario llegaron a mi "hotmail", sera esto posible o que solucion me proponen ( solamente que no sea un 'mailto', ya que quiero algo mas personalisado).


Gracias de antemano por cualquier ayuda..


R A M .

[rickoe]

Hola

Para poderte ayudar hace falta mas información como:

- El codigo que usas

- Tu hosting gratuito soporta ASP?

- Que medio estas usando para enviar el mail CDONT ASPMAIL u otro?

Tengo entendido que no en todos los hosting gratuitos puedes enviar mails

La primera solucion que te propongo es que busques un hosting gratuito en el cual puedas enviar mails

Ya despues se te podra ayudar en la forma de como enviarlos

Saludos

Rickoe

[byte]

Mira, primero que nada tienes que saber si el server donde alojas soporta asp y envios con CDonts, puedes leer varias guias en faqsdelweb.com.

salu2

[360]

Aqui pongo el codigo del ASP y bueno no se si mi hosting soporte el envio de mail ( eso no lo sabia ) ya que es de angelfire.com y bueno me puedes explicar como esta eso ultimo que dices del CDONT ASPMAIL, porque estoy muy perdido en ese tema... gracias !

<%


Destino = "[email protected]"
servidor = "mail.hotmail.com"
titulo = "Formulario de contacto"



Origen = Request("email")
nombre = Request("nombre")
empresa = Request("empresa")
Mensaje = Request("mensaje")




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



strBody = strBody & "<font face='Verdana, Arial, Helvetica, sans-serif' size='2' color='#555555'>"
strBody = strBody & "Mi nombre es: "
strBody = strBody & "<b>" & nombre & "</b><br><br>"
strBody = strBody & "Mi e-mail es: "
strBody = strBody & "<b>" & Origen & "</b><br><br>"
strBody = strBody & "Trabajo en la empresa: "
strBody = strBody & "<b>" & empresa & "</b><br><hr><br>"
strBody = strBody & "Mi mensaje es: <br>"
strBody = strBody & Mensaje & chr(10)
strBody = strBody & "</font>"



Mail.Host = servidor
Mail.Port = 25
Mail.From = "[email protected]"
Mail.FromName = Email
Mail.Subject = titulo
Mail.Body = strBody
Mail.IsHTML = True
Mail.AddAddress Destino

On Error Resume Next

Mail.Send




If Err <> 0 Then
Response.Write "popup.mensaje=Error, envíelo mas tarde " & Err.Description
Else
Response.Write "popup.mensaje=Mensaje enviado correctamente."
End If


Set Mail = Nothing

%>

[etmoreno]

Debe estar instalado en tu servidor el componente Persits.Mailsender (?)

Para mayor información fijate en:

http://www.aspemail.com/Manual.htm

o en:

http://www.persits.com/

Saludos