Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/02/2009, 11:33
Avatar de gabriel720
gabriel720
 
Fecha de Ingreso: febrero-2007
Ubicación: Guatemala
Mensajes: 96
Antigüedad: 17 años, 1 mes
Puntos: 1
formulario flash php y asp

buenos dias a todos, mi duda es la siguiente, compre una plantilla web flash, y trae un formulario de contacto pero no se que modificar para que funcione el envio de informacion

en el movie clip tiene el siguiente codigo:

rec="[email protected]";
serv="php";

var fields_descriptions= Array ("",
Array("t1", "your_name", "Your Name:"),
Array("t2", "your_email", "Your Email:"),
Array("t3", "telephone", "Telephone:"),
Array("t4", "message", "Message:"),
Array("t5", "field_2", "E-mail:"),
Array("t6", "field_3", "Address:"),
Array("t7", "field_4", "fax:")
);



for (i=1; i<=fields_descriptions.length; i++) {
this["k"+i].text=fields_descriptions[i][2];
}

el codigo de php dice lo siguiente:

Your message was successfully sent!<script>
resizeTo(300, 300);
</script>

y en el archivo asp dice lo siguiente:

<%
for i=1 to 7
message=Request("message")
next
message=message + Request("message")
smtpServer = "enter your SMTP SERVER HERE"
smtpPort = 25


name = Request("Your_Name:")
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "from " & name
myMail.From = Request("Your_Email:")
myMail.To = Request("recipient")
myMail.HTMLBody = "<html><head><title>Contact letter</title></head><body><br>" & message & "</body></html>"
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = smtpPort
myMail.Configuration.Fields.Update
myMail.Send

%>


de antemano muchas gracias si alguien me puede ayudar para que los datos ingresados al formulario llegen a mi correo